X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=bacula%2Fsrc%2Fstored%2Fdev.c;h=0e72db6a84530de7182b80d605238ad46ff934b3;hb=ce462cd94d90f4785b622cedc2ca48d616fe3f07;hp=17d5aff19349e78cce978acf43b01b2b5b67c4ea;hpb=ad14d3946b4817451e48f990f8592d5eac9dca76;p=bacula%2Fbacula diff --git a/bacula/src/stored/dev.c b/bacula/src/stored/dev.c index 17d5aff193..0e72db6a84 100644 --- a/bacula/src/stored/dev.c +++ b/bacula/src/stored/dev.c @@ -1,3 +1,30 @@ +/* + Bacula® - The Network Backup Solution + + Copyright (C) 2000-2008 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 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 + 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. + The licensor of Bacula is the Free Software Foundation Europe + (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich, + Switzerland, email:ftf@fsfeurope.org. +*/ /* * * dev.c -- low level operations on device (storage device) @@ -5,7 +32,7 @@ * Kern Sibbald, MM * * NOTE!!!! None of these routines are reentrant. You must - * use lock_device() and unlock_device() at a higher level, + * use dev->r_dlock() and dev->unlock() at a higher level, * or use the xxx_device() equivalents. By moving the * thread synchronization to a higher level, we permit * the higher level routines to "seize" the device and @@ -20,28 +47,8 @@ * 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$ */ -/* - 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 - version 2 as amended with additional clauses defined in the - file LICENSE in the main source directory. - - 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 - the file LICENSE for additional details. - - */ /* * Handling I/O errors and end of tape conditions are a bit tricky. @@ -49,7 +56,7 @@ * 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 - * to include ST_EOT, which is ephimeral, and ST_WEOT, which is + * to include ST_EOT, which is ephemeral, and ST_WEOT, which is * persistent. Lots of routines clear ST_EOT, but ST_WEOT is * cleared only when the problem goes away. Now when ST_WEOT * is set all calls to write_block_to_device() call the fix_up @@ -80,9 +87,9 @@ #endif /* Forward referenced functions */ -void set_os_device_parameters(DEVICE *dev); +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 @@ -102,6 +109,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 */ @@ -110,7 +118,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)) { @@ -118,7 +126,14 @@ init_dev(JCR *jcr, DEVRES *device) } 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; + 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"), @@ -131,7 +146,7 @@ init_dev(JCR *jcr, DEVRES *device) dev = (DEVICE *)malloc(sizeof(DEVICE)); memset(dev, 0, sizeof(DEVICE)); - dev->Slot = -1; /* unknown */ + dev->clear_slot(); /* unknown */ /* Copy user supplied device parameters from Resource */ dev->dev_name = get_memory(strlen(device->device_name)+1); @@ -154,6 +169,7 @@ init_dev(JCR *jcr, DEVRES *device) dev->drive_index = device->drive_index; dev->autoselect = device->autoselect; dev->dev_type = device->dev_type; + dev->init_backend(); if (dev->is_tape()) { /* No parts on tapes */ dev->max_part_size = 0; } else { @@ -179,9 +195,8 @@ init_dev(JCR *jcr, DEVRES *device) 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; + Jmsg2(jcr, M_ERROR_TERM, 0, _("Unable to stat mount point %s: ERR=%s\n"), + device->mount_point, be.bstrerror()); } } if (dev->is_dvd()) { @@ -193,7 +208,17 @@ init_dev(JCR *jcr, DEVRES *device) } } - 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; @@ -206,44 +231,85 @@ init_dev(JCR *jcr, DEVRES *device) dev->errmsg = get_pool_memory(PM_EMSG); *dev->errmsg = 0; - if ((errstat = pthread_mutex_init(&dev->mutex, NULL)) != 0) { + 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); } +#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; } +/* Choose the right backend */ +void DEVICE::init_backend() +{ + +#ifdef HAVE_WIN32 + if (is_tape()) { + d_open = win32_tape_open; + d_write = win32_tape_write; + d_close = win32_tape_close; + d_ioctl = win32_tape_ioctl; + d_read = win32_tape_read; + + } else { + d_open = ::open; + d_close = ::close; + d_ioctl = win32_ioctl; /* dummy function */ + d_write = win32_write; /* win32 read/write are not POSIX */ + d_read = win32_read; + } + +#else /* POSIX / UNIX Interface */ + if (is_vtape()) { /* test backend */ + d_open = vtape_open; /* vtape isn't available for WIN32 or FreeBSD */ + d_write = vtape_write; + d_close = vtape_close; + d_ioctl = vtape_ioctl; + d_read = vtape_read; + + } else { /* tape and file are using normal io */ + d_open = ::open; + d_write = ::write; + d_close = ::close; + d_ioctl = ::ioctl; + d_read = ::read; + } +#endif +} + /* * Open the device with the operating system and * initialize buffer pointers. @@ -263,13 +329,9 @@ DEVICE::open(DCR *dcr, int omode) int preserve = 0; if (is_open()) { if (openmode == omode) { - return fd; + return m_fd; } else { - if (is_tape()) { - tape_close(fd); - } else { - ::close(fd); - } + d_close(m_fd); clear_opened(); Dmsg0(100, "Close fd for mode change.\n"); preserve = state & (ST_LABEL|ST_APPEND|ST_READ); @@ -279,10 +341,9 @@ DEVICE::open(DCR *dcr, int omode) bstrncpy(VolCatInfo.VolCatName, dcr->VolumeName, sizeof(VolCatInfo.VolCatName)); } - Dmsg4(29, "open dev: type=%d dev_name=%s vol=%s mode=%s\n", dev_type, + Dmsg4(100, "open dev: type=%d dev_name=%s vol=%s mode=%s\n", dev_type, print_name(), VolCatInfo.VolCatName, 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); @@ -294,8 +355,8 @@ DEVICE::open(DCR *dcr, int omode) open_file_device(dcr, omode); } state |= preserve; /* reset any important state info */ - Dmsg2(100, "preserve=0x%x fd=%d\n", preserve, fd); - return fd; + Dmsg2(100, "preserve=0x%x fd=%d\n", preserve, m_fd); + return m_fd; } void DEVICE::set_mode(int new_mode) @@ -323,69 +384,95 @@ void DEVICE::set_mode(int new_mode) void DEVICE::open_tape_device(DCR *dcr, int omode) { file_size = 0; - int timeout; - int nonblocking = O_NONBLOCK; - Dmsg0(29, "open dev: device is tape\n"); + int timeout = max_open_wait; +#if !defined(HAVE_WIN32) + struct mtop mt_com; + utime_t start_time = time(NULL); +#endif + + + Dmsg0(100, "Open dev: device is tape\n"); get_autochanger_loaded_slot(dcr); + openmode = omode; set_mode(omode); - timeout = max_open_wait; + + if (timeout < 1) { + timeout = 1; + } 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); } - /* If busy retry each second for max_open_wait seconds */ - Dmsg3(100, "Try open %s mode=%s nonblocking=%d\n", print_name(), - mode_to_str(omode), nonblocking); - /* Use system open() */ - + Dmsg2(100, "Try open %s mode=%s\n", print_name(), mode_to_str(omode)); #if defined(HAVE_WIN32) - if ((fd = tape_open(dev_name, mode)) < 0) { - berrno be; - dev_errno = errno; - Mmsg2(errmsg, _("Unable to open device %s: ERR=%s\n"), - print_name(), be.strerror(dev_errno)); - Jmsg0(dcr->jcr, M_FATAL, 0, errmsg); + /* Windows Code */ + if ((m_fd = d_open(dev_name, mode)) < 0) { + dev_errno = errno; } + #else - while ((fd = ::open(dev_name, mode+nonblocking)) < 0) { - berrno be; - 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 (dev_errno == EBUSY && timeout-- > 0) { - Dmsg2(100, "Device %s busy. ERR=%s\n", print_name(), be.strerror()); - bmicrosleep(1, 0); - continue; + + /* UNIX Code */ + /* If busy retry each second for max_open_wait seconds */ + for ( ;; ) { + /* Try non-blocking open */ + m_fd = d_open(dev_name, mode+O_NONBLOCK); + if (m_fd < 0) { + berrno be; + dev_errno = errno; + 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(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() && (d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com) < 0)) { + berrno be; + dev_errno = errno; /* set error status from rewind */ + d_close(m_fd); + clear_opened(); + Dmsg2(100, "Rewind error on %s close: ERR=%s\n", print_name(), + 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 */ + d_close(m_fd); + m_fd = d_open(dev_name, mode); /* open normally */ + if (m_fd < 0) { + berrno be; + dev_errno = errno; + 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; + lock_door(); + set_os_device_parameters(dcr); /* do system dependent stuff */ + break; /* Successfully opened and rewound */ + } } - Mmsg2(errmsg, _("Unable to open device %s: ERR=%s\n"), - print_name(), be.strerror(dev_errno)); - /* Stop any open timer we set */ - if (tid) { - stop_thread_timer(tid); - tid = 0; + bmicrosleep(5, 0); + /* Exceed wait time ? */ + if (time(NULL) - start_time >= max_open_wait) { + break; /* yes, get out */ } - Jmsg0(dcr->jcr, M_FATAL, 0, errmsg); - break; } #endif - if (this->is_open()) { - openmode = omode; /* save open mode */ - set_blocking(); - Dmsg2(100, "openmode=%d %s\n", openmode, mode_to_str(openmode)); - dev_errno = 0; - set_os_device_parameters(this); /* do system dependent stuff */ - } else { - clear_opened(); + if (!is_open()) { + berrno be; + Mmsg2(errmsg, _("Unable to open device %s: ERR=%s\n"), + print_name(), be.bstrerror(dev_errno)); + Dmsg1(100, "%s", errmsg); } /* Stop any open() timer we started */ @@ -393,27 +480,9 @@ void DEVICE::open_tape_device(DCR *dcr, int omode) stop_thread_timer(tid); tid = 0; } - Dmsg1(29, "open dev: tape %d opened\n", fd); + Dmsg1(100, "open dev: tape %d opened\n", m_fd); } -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); - 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); - } -} /* * Open a file device @@ -434,7 +503,7 @@ void DEVICE::open_file_device(DCR *dcr, int omode) * we simply use the device name, assuming it has been * appropriately setup by the "autochanger". */ - if (!device->changer_res) { + if (!device->changer_res || device->changer_command[0] == 0) { if (VolCatInfo.VolCatName[0] == 0) { Mmsg(errmsg, _("Could not open file device %s. No Volume name given.\n"), print_name()); @@ -442,7 +511,7 @@ void DEVICE::open_file_device(DCR *dcr, int omode) return; } - if (archive_name.c_str()[strlen(archive_name.c_str())-1] != '/') { + if (!IsPathSeparator(archive_name.c_str()[strlen(archive_name.c_str())-1])) { pm_strcat(archive_name, "/"); } pm_strcat(archive_name, VolCatInfo.VolCatName); @@ -453,23 +522,23 @@ 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 ((fd = ::open(archive_name.c_str(), mode, 0640)) < 0) { + 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", - fd, part, num_dvd_parts, part_size); + Dmsg4(100, "open dev: disk fd=%d opened, part=%d/%d, part_size=%u\n", + m_fd, part, num_dvd_parts, part_size); } /* @@ -486,8 +555,8 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode) /* * Handle opening of DVD Volume */ - Dmsg3(29, "Enter: open_dvd_dev: %s dev=%s mode=%s\n", is_dvd()?"DVD":"disk", - archive_name.c_str(), mode_to_str(omode)); + Dmsg2(100, "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 @@ -497,13 +566,13 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode) * catalog in dcr->VolCatInfo, and thus we refresh the dev->VolCatInfo * copy here, when opening. */ - memcpy(&VolCatInfo, &dcr->VolCatInfo, sizeof(VolCatInfo)); + VolCatInfo = dcr->VolCatInfo; /* structure assignment */ Dmsg1(100, "Volume=%s\n", VolCatInfo.VolCatName); if (VolCatInfo.VolCatName[0] == 0) { - Dmsg1(10, "Could not open file device %s. No Volume name given.\n", + Dmsg1(10, "Could not open DVD device %s. No Volume name given.\n", print_name()); - Mmsg(errmsg, _("Could not open file device %s. No Volume name given.\n"), + Mmsg(errmsg, _("Could not open DVD device %s. No Volume name given.\n"), print_name()); clear_opened(); return; @@ -523,7 +592,8 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode) * 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); + Dmsg2(100, "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); @@ -541,7 +611,7 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode) Dmsg3(99, "open_dvd_device: part=%d num_dvd_parts=%d, VolCatInfo.VolCatParts=%d\n", part, num_dvd_parts, dcr->VolCatInfo.VolCatParts); - if (mount_dvd(this, 1)) { + if (mount(1)) { Dmsg0(99, "DVD device mounted.\n"); if (num_dvd_parts == 0 && !truncating) { /* @@ -553,24 +623,52 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode) 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_dvd(this, 1); /* Unmount the device, so the operator can change it. */ + 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.bstrerror()); + 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_free_space_dev(this)) { + 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()); + Dmsg1(100, "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); @@ -585,7 +683,7 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode) } } - Dmsg5(29, "open dev: DVD dev=%s mode=%s part=%d npart=%d volcatnparts=%d\n", + Dmsg5(100, "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; @@ -593,16 +691,16 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode) /* If creating file, give 0640 permissions */ - Dmsg3(29, "mode=%s open(%s, 0x%x, 0640)\n", mode_to_str(omode), + Dmsg3(100, "mode=%s open(%s, 0x%x, 0640)\n", mode_to_str(omode), archive_name.c_str(), mode); /* Use system open() */ - if ((fd = ::open(archive_name.c_str(), mode, 0640)) < 0) { + 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()); + be.bstrerror()); // 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); + Dmsg1(100, "open failed: %s", errmsg); /* Previous open failed. See if we can recover */ if ((omode == OPEN_READ_ONLY || omode == OPEN_READ_WRITE) && @@ -612,27 +710,27 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode) * 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()); + Dmsg1(100, "Creating last part on spool: %s\n", archive_name.c_str()); omode = CREATE_READ_WRITE; set_mode(CREATE_READ_WRITE); - fd = ::open(archive_name.c_str(), mode, 0640); + m_fd = ::open(archive_name.c_str(), mode, 0640); set_mode(omode); } } - Dmsg1(100, "after open fd=%d\n", fd); + 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(fd, &filestat) < 0) { + 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); + be.bstrerror()); + Dmsg1(100, "open failed: %s", errmsg); /* Use system close() */ - ::close(fd); + d_close(m_fd); clear_opened(); } else { part_size = filestat.st_size; @@ -654,12 +752,12 @@ bool DEVICE::rewind(DCR *dcr) unsigned int i; bool first = true; - Dmsg3(400, "rewind res=%d fd=%d %s\n", reserved_device, 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 (fd < 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"), @@ -676,11 +774,11 @@ bool DEVICE::rewind(DCR *dcr) * retrying every 5 seconds. */ for (i=max_rewind_wait; ; i -= 5) { - if (tape_ioctl(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 @@ -690,10 +788,10 @@ bool DEVICE::rewind(DCR *dcr) */ if (first && dcr) { int open_mode = openmode; - tape_close(fd); + d_close(m_fd); clear_opened(); open(dcr, open_mode); - if (fd < 0) { + if (m_fd < 0) { return false; } first = false; @@ -712,58 +810,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()) { - if (lseek(dcr, (off_t)0, SEEK_SET) < 0) { + 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) -{ - lock_device(this); - block_device(this, why); - V(mutex); -} - -void DEVICE::unblock() -{ - P(mutex); - unblock_device(this); - V(mutex); -} - -const char *DEVICE::print_blocked() const -{ - switch (dev_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 @@ -799,11 +862,11 @@ void DEVICE::set_ateot() bool DEVICE::eod(DCR *dcr) { struct mtop mt_com; - struct mtget mt_stat; bool ok = true; - off_t pos; + boffset_t pos; + int32_t os_file; - if (fd < 0) { + if (m_fd < 0) { dev_errno = EBADF; Mmsg1(errmsg, _("Bad call to eod. Device %s not open\n"), print_name()); return false; @@ -813,7 +876,7 @@ bool DEVICE::eod(DCR *dcr) return fsf(VolCatInfo.VolCatFiles); #endif - Dmsg0(29, "eod\n"); + Dmsg0(100, "eod\n"); if (at_eot()) { return true; } @@ -821,11 +884,11 @@ 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, (off_t)0, SEEK_END); + pos = lseek(dcr, (boffset_t)0, SEEK_END); // Dmsg1(100, "====== Seek to %lld\n", pos); if (pos >= 0) { update_pos(dcr); @@ -835,14 +898,14 @@ 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()); return false; } #ifdef MTEOM if (has_cap(CAP_FASTFSF) && !has_cap(CAP_EOM)) { Dmsg0(100,"Using FAST FSF for EOM\n"); /* If unknown position, rewind */ - if (!dev_get_os_pos(this, &mt_stat)) { + if (get_os_tape_file() < 0) { if (!rewind(NULL)) { return false; } @@ -865,26 +928,27 @@ bool DEVICE::eod(DCR *dcr) mt_com.mt_count = 1; } - if (tape_ioctl(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()); return false; } - if (!dev_get_os_pos(this, &mt_stat)) { + os_file = get_os_tape_file(); + if (os_file < 0) { berrno be; clrerror(-1); Mmsg2(errmsg, _("ioctl MTIOCGET error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); return false; } - Dmsg2(100, "EOD file=%d block=%d\n", mt_stat.mt_fileno, mt_stat.mt_blkno); + Dmsg1(100, "EOD file=%d\n", os_file); set_ateof(); - file = mt_stat.mt_fileno; + file = os_file; } else { #else { @@ -908,13 +972,13 @@ bool DEVICE::eod(DCR *dcr) /* * Avoid infinite loop by ensuring we advance. */ - if (file_num == (int)file) { - struct mtget mt_stat; + if (!at_eot() && file_num == (int)file) { Dmsg1(100, "fsf did not advance from file %d\n", file_num); set_ateof(); - if (dev_get_os_pos(this, &mt_stat)) { - Dmsg2(100, "Adjust file from %d to %d\n", file , mt_stat.mt_fileno); - file = mt_stat.mt_fileno; + os_file = get_os_tape_file(); + if (os_file >= 0) { + Dmsg2(100, "Adjust file from %d to %d\n", file_num, os_file); + file = os_file; } break; } @@ -926,13 +990,13 @@ bool DEVICE::eod(DCR *dcr) * the second EOF. */ if (has_cap(CAP_BSFATEOM)) { - struct mtget mt_stat; /* Backup over EOF */ ok = bsf(1); /* If BSF worked and fileno is known (not -1), set file */ - if (dev_get_os_pos(this, &mt_stat)) { - Dmsg2(100, "BSFATEOF adjust file from %d to %d\n", file , mt_stat.mt_fileno); - file = mt_stat.mt_fileno; + os_file = get_os_tape_file(); + if (os_file >= 0) { + Dmsg2(100, "BSFATEOF adjust file from %d to %d\n", file , os_file); + file = os_file; } else { file++; /* wing it -- not correct on all OSes */ } @@ -951,7 +1015,7 @@ bool DEVICE::eod(DCR *dcr) */ bool DEVICE::update_pos(DCR *dcr) { - off_t pos; + boffset_t pos; bool ok = true; if (!is_open()) { @@ -965,13 +1029,13 @@ bool DEVICE::update_pos(DCR *dcr) if (is_file() || is_dvd()) { file = 0; file_addr = 0; - pos = lseek(dcr, (off_t)0, SEEK_CUR); + 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; @@ -1008,11 +1072,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:")); @@ -1112,7 +1176,7 @@ bool load_dev(DEVICE *dev) struct mtop mt_com; #endif - if (dev->fd < 0) { + if (dev->fd() < 0) { dev->dev_errno = EBADF; Mmsg0(dev->errmsg, _("Bad call to load_dev. Device not open\n")); Emsg0(M_FATAL, 0, dev->errmsg); @@ -1126,7 +1190,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 @@ -1135,11 +1199,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; @@ -1163,18 +1227,14 @@ bool DEVICE::offline() block_num = file = 0; file_size = 0; file_addr = 0; -#ifdef MTUNLOCK - mt_com.mt_op = MTUNLOCK; - mt_com.mt_count = 1; - tape_ioctl(fd, MTIOCTOP, (char *)&mt_com); -#endif + unlock_door(); mt_com.mt_op = MTOFFL; mt_com.mt_count = 1; - if (tape_ioctl(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()); @@ -1183,7 +1243,7 @@ bool DEVICE::offline() bool DEVICE::offline_or_rewind() { - if (fd < 0) { + if (m_fd < 0) { return false; } if (has_cap(CAP_OFFLINEUNMOUNT)) { @@ -1208,7 +1268,7 @@ bool DEVICE::offline_or_rewind() */ bool DEVICE::fsf(int num) { - struct mtget mt_stat; + int32_t os_file = 0; struct mtop mt_com; int stat = 0; @@ -1242,22 +1302,29 @@ 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(fd, MTIOCTOP, (char *)&mt_com); - if (stat < 0 || !dev_get_os_pos(this, &mt_stat)) { + 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; } - Dmsg2(200, "fsf file=%d block=%d\n", mt_stat.mt_fileno, mt_stat.mt_blkno); + + Dmsg1(200, "fsf file=%d\n", os_file); set_ateof(); - file = mt_stat.mt_fileno; + file = os_file; return true; /* @@ -1281,7 +1348,7 @@ bool DEVICE::fsf(int num) mt_com.mt_count = 1; while (num-- && !at_eot()) { Dmsg0(100, "Doing read before fsf\n"); - if ((stat = tape_read(fd, (char *)rbuf, rbuf_len)) < 0) { + if ((stat = this->read((char *)rbuf, rbuf_len)) < 0) { if (errno == ENOMEM) { /* tape record exceeds buf len */ stat = rbuf_len; /* This is OK */ /* @@ -1295,9 +1362,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; } @@ -1319,14 +1386,14 @@ bool DEVICE::fsf(int num) } Dmsg0(100, "Doing MTFSF\n"); - stat = tape_ioctl(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 { @@ -1385,7 +1452,7 @@ bool DEVICE::bsf(int num) return false; } - Dmsg0(29, "bsf\n"); + Dmsg0(100, "bsf\n"); clear_eot(); clear_eof(); file -= num; @@ -1393,12 +1460,12 @@ bool DEVICE::bsf(int num) file_size = 0; mt_com.mt_op = MTBSF; mt_com.mt_count = num; - stat = tape_ioctl(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; } @@ -1430,10 +1497,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(fd, MTIOCTOP, (char *)&mt_com); + stat = d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); if (stat == 0) { clear_eof(); block_num += num; @@ -1441,7 +1508,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); @@ -1455,7 +1522,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; } @@ -1486,22 +1553,56 @@ 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(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; } +void DEVICE::lock_door() +{ +#ifdef MTLOCK + struct mtop mt_com; + mt_com.mt_op = MTLOCK; + mt_com.mt_count = 1; + d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); +#endif +} + +void DEVICE::unlock_door() +{ +#ifdef MTUNLOCK + struct mtop mt_com; + mt_com.mt_op = MTUNLOCK; + mt_com.mt_count = 1; + 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); +} + + + /* * Reposition the device to file, block * Returns: false on failure @@ -1517,13 +1618,13 @@ bool DEVICE::reposition(DCR *dcr, uint32_t rfile, uint32_t rblock) } if (!is_tape()) { - off_t pos = (((off_t)rfile)<<32) + (off_t)rblock; + boffset_t pos = (((boffset_t)rfile)<<32) | rblock; Dmsg1(100, "===== lseek to %d\n", (int)pos); - if (lseek(dcr, pos, SEEK_SET) == (off_t)-1) { + if (lseek(dcr, pos, SEEK_SET) == (boffset_t)-1) { 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; @@ -1533,8 +1634,7 @@ bool DEVICE::reposition(DCR *dcr, uint32_t rfile, uint32_t rblock) } /* After this point, we are tape only */ - Dmsg4(100, "reposition from %u:%u to %u:%u\n", - file, block_num, rfile, rblock); + Dmsg4(100, "reposition from %u:%u to %u:%u\n", file, block_num, rfile, rblock); if (rfile < file) { Dmsg0(100, "Rewind\n"); if (!rewind(NULL)) { @@ -1561,6 +1661,17 @@ bool DEVICE::reposition(DCR *dcr, uint32_t rfile, uint32_t rblock) /* Ignore errors as Bacula can read to the correct block */ Dmsg1(100, "fsr %d\n", rblock-block_num); return fsr(rblock-block_num); + } else { + while (rblock > block_num) { + if (!read_block_from_dev(dcr, NO_BLOCK_NUMBER_CHECK)) { + berrno be; + dev_errno = errno; + Dmsg2(30, "Failed to find requested block on %s: ERR=%s", + print_name(), be.bstrerror()); + return false; + } + Dmsg2(300, "moving forward wanted_blk=%d at_blk=%d\n", rblock, block_num); + } } return true; } @@ -1576,7 +1687,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; @@ -1599,7 +1710,7 @@ bool DEVICE::weof(int num) clear_eot(); mt_com.mt_op = MTWEOF; mt_com.mt_count = num; - stat = tape_ioctl(fd, MTIOCTOP, (char *)&mt_com); + stat = d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); if (stat == 0) { block_num = 0; file += num; @@ -1609,7 +1720,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; @@ -1623,7 +1734,6 @@ bool DEVICE::weof(int num) void DEVICE::clrerror(int func) { const char *msg = NULL; - struct mtget mt_stat; char buf[100]; dev_errno = errno; /* save errno */ @@ -1638,32 +1748,32 @@ void DEVICE::clrerror(int func) if (errno == ENOTTY || errno == ENOSYS) { /* Function not implemented */ switch (func) { case -1: - break; /* ignore message printed later */ + break; /* ignore message printed later */ case MTWEOF: msg = "WTWEOF"; - capabilities &= ~CAP_EOF; /* turn off feature */ + clear_cap(CAP_EOF); /* turn off feature */ break; #ifdef MTEOM case MTEOM: msg = "WTEOM"; - capabilities &= ~CAP_EOM; /* turn off feature */ + clear_cap(CAP_EOM); /* turn off feature */ break; #endif case MTFSF: msg = "MTFSF"; - capabilities &= ~CAP_FSF; /* turn off feature */ + clear_cap(CAP_FSF); /* turn off feature */ break; case MTBSF: msg = "MTBSF"; - capabilities &= ~CAP_BSF; /* turn off feature */ + clear_cap(CAP_BSF); /* turn off feature */ break; case MTFSR: msg = "MTFSR"; - capabilities &= ~CAP_FSR; /* turn off feature */ + clear_cap(CAP_FSR); /* turn off feature */ break; case MTBSR: msg = "MTBSR"; - capabilities &= ~CAP_BSR; /* turn off feature */ + clear_cap(CAP_BSR); /* turn off feature */ break; case MTREW: msg = "MTREW"; @@ -1673,6 +1783,17 @@ void DEVICE::clrerror(int func) msg = "MTSETBLK"; break; #endif +#ifdef MTSETDRVBUFFER + case MTSETDRVBUFFER: + msg = "MTSETDRVBUFFER"; + break; +#endif +#ifdef MTRESET + case MTRESET: + msg = "MTRESET"; + break; +#endif + #ifdef MTSETBSIZ case MTSETBSIZ: msg = "MTSETBSIZ"; @@ -1715,16 +1836,12 @@ void DEVICE::clrerror(int func) */ /* On some systems such as NetBSD, this clears all errors */ - tape_ioctl(fd, MTIOCGET, (char *)&mt_stat); + get_os_tape_file(); -/* Found on Linux */ +/* Found on Solaris */ #ifdef MTIOCLRERR { - struct mtop mt_com; - mt_com.mt_op = MTIOCLRERR; - mt_com.mt_count = 1; - /* Clear any error condition on the tape */ - tape_ioctl(fd, MTIOCTOP, (char *)&mt_com); + d_ioctl(m_fd, MTIOCLRERR); Dmsg0(200, "Did MTIOCLRERR\n"); } #endif @@ -1736,8 +1853,8 @@ 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(fd, MTIOCERRSTAT, (char *)&mt_errstat); + be.bstrerror(dev_errno)); + d_ioctl(m_fd, MTIOCERRSTAT, (char *)&mt_errstat); } #endif @@ -1748,12 +1865,35 @@ void DEVICE::clrerror(int func) mt_com.mt_op = MTCSE; mt_com.mt_count = 1; /* Clear any error condition on the tape */ - tape_ioctl(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() +{ + Dmsg1(100, "Clear volhdr vol=%s\n", VolHdr.VolumeName); + memset(&VolHdr, 0, sizeof(VolHdr)); +} + + /* * Close the device */ @@ -1764,35 +1904,41 @@ void DEVICE::close() offline(); } - if (is_open()) { - if (is_tape()) { - tape_close(fd); - } else { - ::close(fd); - } - } else { + if (!is_open()) { Dmsg2(100, "device %s already closed vol=%s\n", print_name(), VolHdr.VolumeName); return; /* already closed */ } + switch (dev_type) { + case B_VTL_DEV: + case B_VTAPE_DEV: + case B_TAPE_DEV: + unlock_door(); + default: + d_close(m_fd); + } + /* 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; - Slot = -1; /* unknown slot */ - free_volume(this); + openmode = 0; + clear_volhdr(); memset(&VolCatInfo, 0, sizeof(VolCatInfo)); - memset(&VolHdr, 0, sizeof(VolHdr)); if (tid) { stop_thread_timer(tid); tid = 0; } - openmode = 0; } /* @@ -1804,27 +1950,30 @@ 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 */ - memcpy(&saveVolHdr, &VolHdr, sizeof(saveVolHdr)); - memcpy(&saveVolCatInfo, &VolCatInfo, sizeof(saveVolCatInfo)); + saveVolHdr = VolHdr; /* structure assignment */ + saveVolCatInfo = VolCatInfo; /* structure assignment */ close(); /* close current part */ - memcpy(&VolHdr, &saveVolHdr, sizeof(VolHdr)); - memcpy(&VolCatInfo, &saveVolCatInfo, sizeof(VolCatInfo)); - memcpy(&dcr->VolCatInfo, &saveVolCatInfo, sizeof(dcr->VolCatInfo)); + VolHdr = saveVolHdr; /* structure assignment */ + VolCatInfo = saveVolCatInfo; /* structure assignment */ } -off_t DEVICE::lseek(DCR *dcr, off_t offset, int whence) +boffset_t DEVICE::lseek(DCR *dcr, boffset_t offset, int whence) { - if (is_dvd()) { + switch (dev_type) { + case B_DVD_DEV: return lseek_dvd(dcr, offset, whence); - } - if (is_file()) { - return ::lseek(fd, 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); +#endif } return -1; } @@ -1832,26 +1981,77 @@ off_t DEVICE::lseek(DCR *dcr, off_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()); - if (is_tape()) { - return true; /* we don't really truncate tapes */ + switch (dev_type) { + case B_VTL_DEV: + case B_VTAPE_DEV: + case B_TAPE_DEV: /* maybe we should rewind and write and eof ???? */ - } - - if (is_dvd()) { + return true; /* we don't really truncate tapes */ + case B_DVD_DEV: return truncate_dvd(dcr); + case B_FILE_DEV: + if (ftruncate(m_fd, 0) != 0) { + berrno be; + Mmsg2(errmsg, _("Unable to truncate device %s. ERR=%s\n"), + 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; } - - /* ***FIXME*** we really need to unlink() the file so that - * its name can be changed for a relabel. - */ - if (ftruncate(fd, 0) != 0) { - berrno be; - Mmsg2(errmsg, _("Unable to truncate device %s. ERR=%s\n"), - print_name(), be.strerror()); - return false; - } - return true; + return false; } /* Mount the device. @@ -1875,7 +2075,7 @@ bool DEVICE::mount(int timeout) */ bool DEVICE::unmount(int timeout) { - Dmsg0(90, "Enter unmount_dvd\n"); + Dmsg0(100, "Enter unmount\n"); if (is_mounted()) { return do_mount(0, timeout); } @@ -1890,7 +2090,7 @@ bool DEVICE::do_mount(int mount, int dotimeout) char *icmd; int status, timeout; - sm_check(__FILE__, __LINE__, false); + Dsm_check(1); if (mount) { if (is_mounted()) { Dmsg0(200, "======= mount=1\n"); @@ -1905,9 +2105,10 @@ bool DEVICE::do_mount(int mount, int dotimeout) icmd = device->unmount_command; } + clear_freespace_ok(); edit_mount_codes(ocmd, icmd); - Dmsg2(000, "do_mount_dvd: cmd=%s mounted=%d\n", ocmd.c_str(), !!is_mounted()); + Dmsg2(100, "do_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. */ @@ -1915,15 +2116,17 @@ bool DEVICE::do_mount(int mount, int dotimeout) } else { timeout = 0; } - results = get_memory(2000); - results[0] = 0; + results = get_memory(4000); /* If busy retry each second */ - Dmsg1(20, "do_mount run_prog=%s\n", ocmd.c_str()); + Dmsg1(100, "do_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 (fnmatch("*is already mounted on", results, 0) == 0) { + if (mount && fnmatch("*is already mounted on*", results, 0) == 0) { + break; + } + if (!mount && fnmatch("* not mounted*", results, 0) == 0) { break; } if (timeout-- > 0) { @@ -1936,9 +2139,18 @@ bool DEVICE::do_mount(int mount, int dotimeout) bmicrosleep(1, 0); continue; } - Dmsg2(40, "Device %s cannot be mounted. ERR=%s\n", print_name(), results); - Mmsg(errmsg, _("Device %s cannot be mounted. ERR=%s\n"), - print_name(), results); + if (status != 0) { + berrno be; + 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)); + } else { + Dmsg4(100, "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); + } /* * Now, just to be sure it is not mounted, try to read the * filesystem. @@ -1956,8 +2168,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_mount: failed to open dir %s (dev=%s), ERR=%s\n", + device->mount_point, print_name(), be.bstrerror()); goto get_out; } @@ -1980,22 +2192,36 @@ bool DEVICE::do_mount(int mount, int dotimeout) free(entry); closedir(dp); - Dmsg1(29, "do_mount: got %d files in the mount point (not counting ., .. and .keep)\n", count); + Dmsg1(100, "do_mount: got %d files in the mount point (not counting ., .. and .keep)\n", count); if (count > 0) { - mount = 1; /* If we got more than ., .. and .keep */ - break; /* there must be something mounted */ + /* If we got more than ., .. and .keep */ + /* there must be something mounted */ + if (mount) { + Dmsg1(100, "Did Mount by count=%d\n", count); + break; + } else { + /* An unmount request. We failed to unmount - report an error */ + set_mounted(true); + free_pool_memory(results); + Dmsg0(200, "== error mount=1 wanted unmount\n"); + return false; + } } get_out: set_mounted(false); - sm_check(__FILE__, __LINE__, false); free_pool_memory(results); Dmsg0(200, "============ mount=0\n"); + Dsm_check(1); return false; } set_mounted(mount); /* set/clear mounted flag */ free_pool_memory(results); + /* Do not check free space when unmounting */ + if (mount && !update_freespace()) { + return false; + } Dmsg1(200, "============ mount=%d\n", mount); return true; } @@ -2072,6 +2298,58 @@ void DEVICE::edit_mount_codes(POOL_MEM &omsg, const char *imsg) } } +/* return the last timer interval (ms) + * or 0 if something goes wrong + */ +btime_t DEVICE::get_timer_count() +{ + btime_t temp = last_timer; + last_timer = get_current_btime(); + temp = last_timer - temp; /* get elapsed time */ + return (temp>0)?temp:0; /* take care of skewed clock */ +} + +/* read from fd */ +ssize_t DEVICE::read(void *buf, size_t len) +{ + ssize_t read_len ; + + get_timer_count(); + + read_len = d_read(m_fd, buf, len); + + last_tick = get_timer_count(); + + DevReadTime += last_tick; + VolCatInfo.VolReadTime += last_tick; + + if (read_len > 0) { /* skip error */ + DevReadBytes += read_len; + } + + return read_len; +} + +/* write to fd */ +ssize_t DEVICE::write(const void *buf, size_t len) +{ + ssize_t write_len ; + + get_timer_count(); + + write_len = d_write(m_fd, buf, len); + + last_tick = get_timer_count(); + + DevWriteTime += last_tick; + VolCatInfo.VolWriteTime += last_tick; + + if (write_len > 0) { /* skip error */ + DevWriteBytes += write_len; + } + + return write_len; +} /* Return the resource name for the device */ const char *DEVICE::name() const @@ -2079,6 +2357,18 @@ const char *DEVICE::name() const return device->hdr.name; } +/* Returns file position on tape or -1 */ +int32_t DEVICE::get_os_tape_file() +{ + struct mtget mt_stat; + + if (has_cap(CAP_MTIOCGET) && + d_ioctl(m_fd, MTIOCGET, (char *)&mt_stat) == 0) { + return mt_stat.mt_fileno; + } + return -1; +} + char * dev_vol_name(DEVICE *dev) { @@ -2105,11 +2395,11 @@ void DEVICE::term(void) free_pool_memory(errmsg); errmsg = NULL; } - pthread_mutex_destroy(&mutex); + pthread_mutex_destroy(&m_mutex); pthread_cond_destroy(&wait); pthread_cond_destroy(&wait_next_vol); pthread_mutex_destroy(&spool_mutex); - rwl_destroy(&lock); +// rwl_destroy(&lock); if (attached_dcrs) { delete attached_dcrs; attached_dcrs = NULL; @@ -2136,7 +2426,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; @@ -2180,17 +2469,31 @@ bool double_dev_wait_time(DEVICE *dev) } -void set_os_device_parameters(DEVICE *dev) +void set_os_device_parameters(DCR *dcr) { + DEVICE *dev = dcr->dev; + + if (strcmp(dev->dev_name, "/dev/null") == 0) { + return; /* no use trying to set /dev/null */ + } + #if defined(HAVE_LINUX_OS) || defined(HAVE_WIN32) struct mtop mt_com; + + 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; - 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 (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)) { @@ -2199,10 +2502,12 @@ void set_os_device_parameters(DEVICE *dev) if (dev->has_cap(CAP_EOM)) { mt_com.mt_count |= MT_ST_FAST_MTEOM; } - if (tape_ioctl(dev->fd, MTIOCTOP, (char *)&mt_com) < 0) { - dev->clrerror(MTSETBLK); + Dmsg0(100, "MTSETDRVBUFFER\n"); + if (dev->d_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { + dev->clrerror(MTSETDRVBUFFER); } } +#endif return; #endif @@ -2212,13 +2517,13 @@ void set_os_device_parameters(DEVICE *dev) 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); } } @@ -2231,10 +2536,25 @@ void set_os_device_parameters(DEVICE *dev) 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); } } +#if defined(MTIOCSETEOTMODEL) + uint32_t neof; + if (dev->has_cap(CAP_TWOEOF)) { + neof = 2; + } else { + neof = 1; + } + 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.bstrerror(dev->dev_errno)); + Jmsg(dcr->jcr, M_FATAL, 0, dev->errmsg); + } +#endif return; #endif @@ -2244,7 +2564,7 @@ void set_os_device_parameters(DEVICE *dev) 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); } } @@ -2254,12 +2574,13 @@ void set_os_device_parameters(DEVICE *dev) static bool dev_get_os_pos(DEVICE *dev, struct mtget *mt_stat) { + 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", @@ -2267,7 +2588,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) {