/*
- * Copyright (c) 2005 Zmanda, Inc. All Rights Reserved.
- *
- * This library is free software; you can redistribute it and/or modify it
- * under the terms of the GNU Lesser General Public License version 2.1 as
- * published by the Free Software Foundation.
- *
- * This library is distributed in the hope that it will be useful, but
+ * Copyright (c) 2007, 2008, 2009, 2010 Zmanda, Inc. All Rights Reserved.
+ *
+ * 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 published
+ * by the Free Software Foundation.
+ *
+ * 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 Lesser General Public
- * License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public License
- * along with this library; if not, write to the Free Software Foundation,
- * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
- *
- * Contact information: Zmanda Inc., 505 N Mathlida Ave, Suite 120
+ * 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.,
+ * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ *
+ * Contact information: Zmanda Inc., 465 S. Mathilda Ave., Suite 300
* Sunnyvale, CA 94085, USA, or: http://www.zmanda.com
*/
+#include "amanda.h"
+#include "pipespawn.h"
#include <string.h> /* memset() */
#include "util.h"
-#include "tape-device.h"
-#include "tape-ops.h"
+#include "device.h"
-/* This is equal to 2*1024*1024*1024 - 16*1024*1024 - 1, but written
+#ifdef HAVE_SYS_TAPE_H
+# include <sys/tape.h>
+#endif
+#ifdef HAVE_SYS_MTIO_H
+# include <sys/mtio.h>
+#endif
+#ifdef HAVE_LIMITS_H
+# include <limits.h>
+#endif
+
+/* This is equal to 2*1024*1024*1024 - 16*1024*1024 - 1, but written
explicitly to avoid overflow issues. */
#define RESETOFS_THRESHOLD (0x7effffff)
/* Largest possible block size on SCSI systems. */
#define LARGEST_BLOCK_ESTIMATE (16 * 1024 * 1024)
+/*
+ * Type checking and casting macros
+ */
+
+#define TYPE_TAPE_DEVICE (tape_device_get_type())
+#define TAPE_DEVICE(obj) G_TYPE_CHECK_INSTANCE_CAST((obj), tape_device_get_type(), TapeDevice)
+#define TAPE_DEVICE_CONST(obj) G_TYPE_CHECK_INSTANCE_CAST((obj), tape_device_get_type(), TapeDevice const)
+#define TAPE_DEVICE_CLASS(klass) G_TYPE_CHECK_CLASS_CAST((klass), tape_device_get_type(), TapeDeviceClass)
+#define IS_TAPE_DEVICE(obj) G_TYPE_CHECK_INSTANCE_TYPE((obj), tape_device_get_type ())
+#define TAPE_DEVICE_GET_CLASS(obj) G_TYPE_INSTANCE_GET_CLASS((obj), tape_device_get_type(), TapeDeviceClass)
+GType tape_device_get_type (void);
+
+/*
+ * Main object structure
+ */
+typedef struct TapeDevicePrivate_s TapeDevicePrivate;
+typedef struct _TapeDevice {
+ Device __parent__;
+
+ /* It should go without saying that all this stuff is
+ * look-but-don't-touch. */
+
+ /* characteristics of the device */
+ gboolean fsf, bsf, fsr, bsr, eom, bsf_after_eom, broken_gmt_online;
+ gboolean leom;
+ gboolean nonblocking_open, fsf_after_filemark;
+ int final_filemarks;
+
+ /* 0 if we opened with O_RDWR; error otherwise. */
+ gboolean write_open_errno;
+ int fd;
+
+ TapeDevicePrivate * private;
+} TapeDevice;
+
struct TapeDevicePrivate_s {
/* This holds the total number of bytes written to the device,
modulus RESETOFS_THRESHOLD. */
int write_count;
+ char * device_filename;
+ gsize read_block_size;
};
+/*
+ * Class definition
+ */
+
+typedef struct _TapeDeviceClass TapeDeviceClass;
+struct _TapeDeviceClass {
+ DeviceClass __parent__;
+};
+
+void tape_device_register(void);
+
+/* useful callback for tape ops */
+void tape_device_set_capabilities(TapeDevice *self,
+ gboolean fsf, PropertySurety fsf_surety, PropertySource fsf_source,
+ gboolean fsf_after_filemark, PropertySurety faf_surety, PropertySource faf_source,
+ gboolean bsf, PropertySurety bsf_surety, PropertySource bsf_source,
+ gboolean fsr, PropertySurety fsr_surety, PropertySource fsr_source,
+ gboolean bsr, PropertySurety bsr_surety, PropertySource bsr_source,
+ gboolean eom, PropertySurety eom_surety, PropertySource eom_source,
+ gboolean leom, PropertySurety leom_surety, PropertySource leom_source,
+ gboolean bsf_after_eom, PropertySurety bae_surety, PropertySource bae_source,
+ guint final_filemarks, PropertySurety ff_surety, PropertySource ff_source);
+
+/* Real Operations (always return FALSE if not implemented) */
+gboolean tape_rewind(int fd);
+gboolean tape_fsf(int fd, guint count);
+gboolean tape_bsf(int fd, guint count);
+gboolean tape_fsr(int fd, guint count);
+gboolean tape_bsr(int fd, guint count);
+gint tape_fileno(int fd);
+
+/* tape_fileno returns tape position file number, or one of these: */
+#define TAPE_OP_ERROR -1
+#define TAPE_POSITION_UNKNOWN -2
+
/* Possible (abstracted) results from a system I/O operation. */
typedef enum {
RESULT_SUCCESS,
- RESULT_ERROR, /* Undefined error. */
+ RESULT_ERROR, /* Undefined error (*errmsg set) */
RESULT_SMALL_BUFFER, /* Tried to read with a buffer that is too
small. */
RESULT_NO_DATA, /* End of File, while reading */
RESULT_MAX
} IoResult;
+/* returns a fileno like tape_fileno */
+gint tape_eod(int fd);
+
+gboolean tape_weof(int fd, guint8 count);
+gboolean tape_setcompression(int fd, gboolean on);
+
+gboolean tape_offl(int fd);
+
+DeviceStatusFlags tape_is_tape_device(int fd);
+DeviceStatusFlags tape_is_ready(int fd, TapeDevice *t_self);
+
+#define tape_device_read_size(self) \
+ (((TapeDevice *)(self))->private->read_block_size? \
+ ((TapeDevice *)(self))->private->read_block_size : ((Device *)(self))->block_size)
+
+/*
+ * Our device-specific properties.
+ */
+
+#define PROPERTY_BROKEN_GMT_ONLINE (device_property_broken_gmt_online.ID)
+#define PROPERTY_FSF (device_property_fsf.ID)
+#define PROPERTY_FSF_AFTER_FILEMARK (device_property_fsf_after_filemark.ID)
+#define PROPERTY_BSF (device_property_bsf.ID)
+#define PROPERTY_FSR (device_property_fsr.ID)
+#define PROPERTY_BSR (device_property_bsr.ID)
+#define PROPERTY_EOM (device_property_eom.ID)
+#define PROPERTY_BSF_AFTER_EOM (device_property_bsf_after_eom.ID)
+#define PROPERTY_NONBLOCKING_OPEN (device_property_nonblocking_open.ID)
+#define PROPERTY_FINAL_FILEMARKS (device_property_final_filemarks.ID)
+
+static DevicePropertyBase device_property_broken_gmt_online;
+static DevicePropertyBase device_property_fsf;
+static DevicePropertyBase device_property_fsf_after_filemark;
+static DevicePropertyBase device_property_bsf;
+static DevicePropertyBase device_property_fsr;
+static DevicePropertyBase device_property_bsr;
+static DevicePropertyBase device_property_eom;
+static DevicePropertyBase device_property_bsf_after_eom;
+static DevicePropertyBase device_property_nonblocking_open;
+static DevicePropertyBase device_property_final_filemarks;
+static DevicePropertyBase device_property_read_buffer_size; /* old name for READ_BLOCK_SIZE */
+
/* here are local prototypes */
static void tape_device_init (TapeDevice * o);
static void tape_device_class_init (TapeDeviceClass * c);
-static gboolean tape_device_open_device (Device * self, char * device_name);
-static ReadLabelStatusFlags tape_device_read_label(Device * self);
-static gboolean tape_device_write_block(Device * self, guint size,
- gpointer data, gboolean short_block);
-static gboolean tape_device_read_block(Device * self, gpointer buf,
+static void tape_device_base_init (TapeDeviceClass * c);
+static gboolean tape_device_set_feature_property_fn(Device *p_self, DevicePropertyBase *base,
+ GValue *val, PropertySurety surety, PropertySource source);
+static gboolean tape_device_set_final_filemarks_fn(Device *p_self, DevicePropertyBase *base,
+ GValue *val, PropertySurety surety, PropertySource source);
+static gboolean tape_device_set_compression_fn(Device *p_self, DevicePropertyBase *base,
+ GValue *val, PropertySurety surety, PropertySource source);
+static gboolean tape_device_get_read_block_size_fn(Device *p_self, DevicePropertyBase *base,
+ GValue *val, PropertySurety *surety, PropertySource *source);
+static gboolean tape_device_set_read_block_size_fn(Device *p_self, DevicePropertyBase *base,
+ GValue *val, PropertySurety surety, PropertySource source);
+static void tape_device_open_device (Device * self, char * device_name, char * device_type, char * device_node);
+static Device * tape_device_factory (char * device_name, char * device_type, char * device_node);
+static DeviceStatusFlags tape_device_read_label(Device * self);
+static gboolean tape_device_write_block(Device * self, guint size, gpointer data);
+static int tape_device_read_block(Device * self, gpointer buf,
int * size_req);
static gboolean tape_device_start (Device * self, DeviceAccessMode mode,
char * label, char * timestamp);
-static gboolean tape_device_start_file (Device * self, const dumpfile_t * ji);
+static gboolean tape_device_start_file (Device * self, dumpfile_t * ji);
+static gboolean tape_device_finish_file (Device * self);
static dumpfile_t * tape_device_seek_file (Device * self, guint file);
static gboolean tape_device_seek_block (Device * self, guint64 block);
-static gboolean tape_device_property_get (Device * self, DevicePropertyId id,
- GValue * val);
-static gboolean tape_device_property_set (Device * self, DevicePropertyId id,
- GValue * val);
+static gboolean tape_device_eject (Device * self);
static gboolean tape_device_finish (Device * self);
static IoResult tape_device_robust_read (TapeDevice * self, void * buf,
- int * count);
-static IoResult tape_device_robust_write (TapeDevice * self, void * buf, int count);
+ int * count, char **errmsg);
+static IoResult tape_device_robust_write (TapeDevice * self, void * buf, int count, char **errmsg);
static gboolean tape_device_fsf (TapeDevice * self, guint count);
-static gboolean tape_device_bsf (TapeDevice * self, guint count, guint file);
static gboolean tape_device_fsr (TapeDevice * self, guint count);
static gboolean tape_device_bsr (TapeDevice * self, guint count, guint file, guint block);
static gboolean tape_device_eod (TapeDevice * self);
GType tape_device_get_type (void)
{
static GType type = 0;
-
+
if G_UNLIKELY(type == 0) {
static const GTypeInfo info = {
sizeof (TapeDeviceClass),
- (GBaseInitFunc) NULL,
+ (GBaseInitFunc) tape_device_base_init,
(GBaseFinalizeFunc) NULL,
(GClassInitFunc) tape_device_class_init,
(GClassFinalizeFunc) NULL,
(GInstanceInitFunc) tape_device_init,
NULL
};
-
+
type = g_type_register_static (TYPE_DEVICE, "TapeDevice",
&info, (GTypeFlags)0);
}
return type;
}
-static void
+static void
tape_device_init (TapeDevice * self) {
- Device * device_self;
- DeviceProperty prop;
+ Device * d_self;
GValue response;
- device_self = (Device*)self;
+ d_self = DEVICE(self);
bzero(&response, sizeof(response));
- self->private = malloc(sizeof(TapeDevicePrivate));
+ self->private = g_new0(TapeDevicePrivate, 1);
/* Clear all fields. */
- self->min_block_size = self->fixed_block_size = 32768;
- self->max_block_size = self->read_block_size = MAX_TAPE_BLOCK_BYTES;
+ d_self->block_size = 32768;
+ d_self->min_block_size = 32768;
+ d_self->max_block_size = LARGEST_BLOCK_ESTIMATE;
+ self->broken_gmt_online = FALSE;
self->fd = -1;
-
- self->fsf = self->bsf = self->fsr = self->bsr = self->eom =
- self->bsf_after_eom = self->compression = self->first_file = 0;
+
+ /* set all of the feature properties to an unsure default of FALSE */
+ self->broken_gmt_online = FALSE;
+ self->fsf = FALSE;
+ self->bsf = FALSE;
+ self->fsr = FALSE;
+ self->bsr = FALSE;
+ self->eom = FALSE;
+ self->leom = FALSE;
+ self->bsf_after_eom = FALSE;
+
+ g_value_init(&response, G_TYPE_BOOLEAN);
+ g_value_set_boolean(&response, FALSE);
+ device_set_simple_property(d_self, PROPERTY_BROKEN_GMT_ONLINE,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ device_set_simple_property(d_self, PROPERTY_FSF,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ device_set_simple_property(d_self, PROPERTY_FSF_AFTER_FILEMARK,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ device_set_simple_property(d_self, PROPERTY_BSF,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ device_set_simple_property(d_self, PROPERTY_FSR,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ device_set_simple_property(d_self, PROPERTY_BSR,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ device_set_simple_property(d_self, PROPERTY_EOM,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ device_set_simple_property(d_self, PROPERTY_LEOM,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ device_set_simple_property(d_self, PROPERTY_BSF_AFTER_EOM,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+
+#ifdef DEFAULT_TAPE_NON_BLOCKING_OPEN
+ self->nonblocking_open = TRUE;
+#else
+ self->nonblocking_open = FALSE;
+#endif
+ g_value_set_boolean(&response, self->nonblocking_open);
+ device_set_simple_property(d_self, PROPERTY_NONBLOCKING_OPEN,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ g_value_unset(&response);
+
self->final_filemarks = 2;
+ g_value_init(&response, G_TYPE_UINT);
+ g_value_set_uint(&response, self->final_filemarks);
+ device_set_simple_property(d_self, PROPERTY_FINAL_FILEMARKS,
+ &response, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+ g_value_unset(&response);
+
+ self->private->read_block_size = 0;
+ g_value_init(&response, G_TYPE_UINT);
+ g_value_set_uint(&response, self->private->read_block_size);
+ device_set_simple_property(d_self, PROPERTY_READ_BLOCK_SIZE,
+ &response, PROPERTY_SURETY_GOOD, PROPERTY_SOURCE_DEFAULT);
+ g_value_unset(&response);
self->private->write_count = 0;
+ self->private->device_filename = NULL;
- /* Register properites */
- prop.base = &device_property_concurrency;
- prop.access = PROPERTY_ACCESS_GET_MASK;
+ /* Static properites */
g_value_init(&response, CONCURRENCY_PARADIGM_TYPE);
g_value_set_enum(&response, CONCURRENCY_PARADIGM_EXCLUSIVE);
- device_add_property(device_self, &prop, &response);
+ device_set_simple_property(d_self, PROPERTY_CONCURRENCY,
+ &response, PROPERTY_SURETY_GOOD, PROPERTY_SOURCE_DETECTED);
g_value_unset(&response);
- prop.base = &device_property_streaming;
g_value_init(&response, STREAMING_REQUIREMENT_TYPE);
g_value_set_enum(&response, STREAMING_REQUIREMENT_DESIRED);
- device_add_property(device_self, &prop, &response);
+ device_set_simple_property(d_self, PROPERTY_STREAMING,
+ &response, PROPERTY_SURETY_GOOD, PROPERTY_SOURCE_DETECTED);
g_value_unset(&response);
- prop.base = &device_property_appendable;
g_value_init(&response, G_TYPE_BOOLEAN);
g_value_set_boolean(&response, TRUE);
- device_add_property(device_self, &prop, &response);
+ device_set_simple_property(d_self, PROPERTY_APPENDABLE,
+ &response, PROPERTY_SURETY_GOOD, PROPERTY_SOURCE_DETECTED);
+ g_value_unset(&response);
- prop.base = &device_property_partial_deletion;
+ g_value_init(&response, G_TYPE_BOOLEAN);
g_value_set_boolean(&response, FALSE);
- device_add_property(device_self, &prop, &response);
+ device_set_simple_property(d_self, PROPERTY_PARTIAL_DELETION,
+ &response, PROPERTY_SURETY_GOOD, PROPERTY_SOURCE_DETECTED);
+ g_value_unset(&response);
+
+ g_value_init(&response, G_TYPE_BOOLEAN);
+ g_value_set_boolean(&response, FALSE);
+ device_set_simple_property(d_self, PROPERTY_FULL_DELETION,
+ &response, PROPERTY_SURETY_GOOD, PROPERTY_SOURCE_DETECTED);
g_value_unset(&response);
- prop.base = &device_property_medium_access_type;
g_value_init(&response, MEDIA_ACCESS_MODE_TYPE);
g_value_set_enum(&response, MEDIA_ACCESS_MODE_READ_WRITE);
- device_add_property(device_self, &prop, &response);
+ device_set_simple_property(d_self, PROPERTY_MEDIUM_ACCESS_TYPE,
+ &response, PROPERTY_SURETY_GOOD, PROPERTY_SOURCE_DETECTED);
g_value_unset(&response);
-
- prop.access = PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_MASK;
- prop.base = &device_property_compression;
- device_add_property(device_self, &prop, NULL);
-
- prop.access = PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START;
- prop.base = &device_property_min_block_size;
- device_add_property(device_self, &prop, NULL);
- prop.base = &device_property_max_block_size;
- device_add_property(device_self, &prop, NULL);
- prop.base = &device_property_block_size;
- device_add_property(device_self, &prop, NULL);
- prop.base = &device_property_fsf;
- device_add_property(device_self, &prop, NULL);
- prop.base = &device_property_bsf;
- device_add_property(device_self, &prop, NULL);
- prop.base = &device_property_fsr;
- device_add_property(device_self, &prop, NULL);
- prop.base = &device_property_bsr;
- device_add_property(device_self, &prop, NULL);
- prop.base = &device_property_eom;
- device_add_property(device_self, &prop, NULL);
- prop.base = &device_property_bsf_after_eom;
- device_add_property(device_self, &prop, NULL);
- prop.base = &device_property_final_filemarks;
- device_add_property(device_self, &prop, NULL);
-
- prop.access = PROPERTY_ACCESS_GET_MASK;
- prop.base = &device_property_canonical_name;
- device_add_property(device_self, &prop, NULL);
}
static void tape_device_finalize(GObject * obj_self) {
robust_close(self->fd);
self->fd = -1;
+ amfree(self->private->device_filename);
amfree(self->private);
}
-static void
+static void
tape_device_class_init (TapeDeviceClass * c)
{
DeviceClass *device_class = (DeviceClass *)c;
GObjectClass *g_object_class = (GObjectClass *)c;
parent_class = g_type_class_ref (TYPE_DEVICE);
-
+
device_class->open_device = tape_device_open_device;
device_class->read_label = tape_device_read_label;
device_class->write_block = tape_device_write_block;
device_class->read_block = tape_device_read_block;
device_class->start = tape_device_start;
device_class->start_file = tape_device_start_file;
+ device_class->finish_file = tape_device_finish_file;
device_class->seek_file = tape_device_seek_file;
device_class->seek_block = tape_device_seek_block;
- device_class->property_get = tape_device_property_get;
- device_class->property_set = tape_device_property_set;
+ device_class->eject = tape_device_eject;
device_class->finish = tape_device_finish;
-
+
g_object_class->finalize = tape_device_finalize;
}
+static void
+tape_device_base_init (TapeDeviceClass * c)
+{
+ DeviceClass *device_class = (DeviceClass *)c;
+
+ device_class_register_property(device_class, PROPERTY_BROKEN_GMT_ONLINE,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+
+ device_class_register_property(device_class, PROPERTY_FSF,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+
+ device_class_register_property(device_class, PROPERTY_FSF_AFTER_FILEMARK,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+
+ device_class_register_property(device_class, PROPERTY_BSF,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+
+ device_class_register_property(device_class, PROPERTY_FSR,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+
+ device_class_register_property(device_class, PROPERTY_BSR,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+
+ device_class_register_property(device_class, PROPERTY_EOM,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+
+ device_class_register_property(device_class, PROPERTY_BSF_AFTER_EOM,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+
+ device_class_register_property(device_class, PROPERTY_NONBLOCKING_OPEN,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+
+ device_class_register_property(device_class, PROPERTY_FINAL_FILEMARKS,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_final_filemarks_fn);
+
+ /* We don't (yet?) support reading the device's compression state, so not
+ * gettable. */
+ device_class_register_property(device_class, PROPERTY_COMPRESSION,
+ PROPERTY_ACCESS_SET_MASK,
+ NULL,
+ tape_device_set_compression_fn);
+
+ device_class_register_property(device_class, PROPERTY_READ_BLOCK_SIZE,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ tape_device_get_read_block_size_fn,
+ tape_device_set_read_block_size_fn);
+
+ device_class_register_property(device_class, device_property_read_buffer_size.ID,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ tape_device_get_read_block_size_fn,
+ tape_device_set_read_block_size_fn);
+
+ /* add the ability to set LEOM to FALSE, for testing purposes */
+ device_class_register_property(device_class, PROPERTY_LEOM,
+ PROPERTY_ACCESS_GET_MASK | PROPERTY_ACCESS_SET_BEFORE_START,
+ device_simple_property_get_fn,
+ tape_device_set_feature_property_fn);
+}
+
+static gboolean
+tape_device_set_feature_property_fn(Device *p_self, DevicePropertyBase *base,
+ GValue *val, PropertySurety surety, PropertySource source)
+{
+ TapeDevice *self = TAPE_DEVICE(p_self);
+ GValue old_val;
+ gboolean old_bool, new_bool;
+ PropertySurety old_surety;
+ PropertySource old_source;
+
+ new_bool = g_value_get_boolean(val);
+
+ /* get the old source and surety and see if we're willing to make this change */
+ bzero(&old_val, sizeof(old_val));
+ if (device_get_simple_property(p_self, base->ID, &old_val, &old_surety, &old_source)) {
+ old_bool = g_value_get_boolean(&old_val);
+
+ if (old_surety == PROPERTY_SURETY_GOOD && old_source == PROPERTY_SOURCE_DETECTED) {
+ if (new_bool != old_bool) {
+ device_set_error(p_self, vstrallocf(_(
+ "Value for property '%s' was autodetected and cannot be changed"),
+ base->name),
+ DEVICE_STATUS_DEVICE_ERROR);
+ return FALSE;
+ } else {
+ /* pretend we set it, but don't change surety/source */
+ return TRUE;
+ }
+ }
+ }
+
+ /* (note: PROPERTY_* are not constants, so we can't use switch) */
+ if (base->ID == PROPERTY_BROKEN_GMT_ONLINE)
+ self->broken_gmt_online = new_bool;
+ else if (base->ID == PROPERTY_FSF)
+ self->fsf = new_bool;
+ else if (base->ID == PROPERTY_FSF_AFTER_FILEMARK)
+ self->fsf_after_filemark = new_bool;
+ else if (base->ID == PROPERTY_BSF)
+ self->bsf = new_bool;
+ else if (base->ID == PROPERTY_FSR)
+ self->fsr = new_bool;
+ else if (base->ID == PROPERTY_BSR)
+ self->bsr = new_bool;
+ else if (base->ID == PROPERTY_EOM)
+ self->eom = new_bool;
+ else if (base->ID == PROPERTY_BSF_AFTER_EOM)
+ self->bsf_after_eom = new_bool;
+ else if (base->ID == PROPERTY_NONBLOCKING_OPEN)
+ self->nonblocking_open = new_bool;
+ else if (base->ID == PROPERTY_LEOM)
+ self->leom = new_bool;
+ else
+ return FALSE; /* shouldn't happen */
+
+ return device_simple_property_set_fn(p_self, base, val, surety, source);
+}
+
+static gboolean
+tape_device_set_final_filemarks_fn(Device *p_self, DevicePropertyBase *base,
+ GValue *val, PropertySurety surety, PropertySource source)
+{
+ TapeDevice *self = TAPE_DEVICE(p_self);
+ GValue old_val;
+ gboolean old_int, new_int;
+ PropertySurety old_surety;
+ PropertySource old_source;
+
+ new_int = g_value_get_uint(val);
+
+ /* get the old source and surety and see if we're willing to make this change */
+ bzero(&old_val, sizeof(old_val));
+ if (device_get_simple_property(p_self, base->ID, &old_val, &old_surety, &old_source)) {
+ old_int = g_value_get_uint(&old_val);
+
+ if (old_surety == PROPERTY_SURETY_GOOD && old_source == PROPERTY_SOURCE_DETECTED) {
+ if (new_int != old_int) {
+ device_set_error(p_self, vstrallocf(_(
+ "Value for property '%s' was autodetected and cannot be changed"),
+ base->name),
+ DEVICE_STATUS_DEVICE_ERROR);
+ return FALSE;
+ } else {
+ /* pretend we set it, but don't change surety/source */
+ return TRUE;
+ }
+ }
+ }
+
+ self->final_filemarks = new_int;
+
+ return device_simple_property_set_fn(p_self, base, val, surety, source);
+}
+
+static gboolean
+tape_device_set_compression_fn(Device *p_self, DevicePropertyBase *base,
+ GValue *val, PropertySurety surety, PropertySource source)
+{
+ TapeDevice *self = TAPE_DEVICE(p_self);
+ gboolean request = g_value_get_boolean(val);
+
+ /* We allow this property to be set at any time. This is mostly
+ * because setting compression is a hit-and-miss proposition
+ * at any time; some drives accept the mode setting but don't
+ * actually support compression, while others do support
+ * compression but do it via density settings or some other
+ * way. Set this property whenever you want, but all we'll do
+ * is report whether or not the ioctl succeeded. */
+ if (tape_setcompression(self->fd, request)) {
+ /* looks good .. let's start the device over, though */
+ device_clear_volume_details(p_self);
+ } else {
+ return FALSE;
+ }
+
+ return device_simple_property_set_fn(p_self, base, val, surety, source);
+}
+
+static gboolean
+tape_device_get_read_block_size_fn(Device *p_self, DevicePropertyBase *base G_GNUC_UNUSED,
+ GValue *val, PropertySurety *surety, PropertySource *source)
+{
+ /* use the READ_BLOCK_SIZE, even if we're invoked to get the old READ_BUFFER_SIZE */
+ return device_simple_property_get_fn(p_self, &device_property_read_block_size,
+ val, surety, source);
+}
+
+static gboolean
+tape_device_set_read_block_size_fn(Device *p_self, DevicePropertyBase *base G_GNUC_UNUSED,
+ GValue *val, PropertySurety surety, PropertySource source)
+{
+ TapeDevice *self = TAPE_DEVICE(p_self);
+ guint read_block_size = g_value_get_uint(val);
+
+ if (read_block_size != 0 &&
+ ((gsize)read_block_size < p_self->block_size ||
+ (gsize)read_block_size > p_self->max_block_size))
+ return FALSE;
+
+ self->private->read_block_size = read_block_size;
+
+ /* use the READ_BLOCK_SIZE, even if we're invoked to get the old READ_BUFFER_SIZE */
+ return device_simple_property_set_fn(p_self, &device_property_read_block_size,
+ val, surety, source);
+}
+
void tape_device_register(void) {
static const char * device_prefix_list[] = { "tape", NULL };
+
+ /* First register tape-specific properties */
+ device_property_fill_and_register(&device_property_broken_gmt_online,
+ G_TYPE_BOOLEAN, "broken_gmt_online",
+ "Does this drive support the GMT_ONLINE macro?");
+
+ device_property_fill_and_register(&device_property_fsf,
+ G_TYPE_BOOLEAN, "fsf",
+ "Does this drive support the MTFSF command?");
+
+ device_property_fill_and_register(&device_property_fsf_after_filemark,
+ G_TYPE_BOOLEAN, "fsf_after_filemark",
+ "Does this drive needs a FSF if a filemark is already read?");
+
+ device_property_fill_and_register(&device_property_bsf,
+ G_TYPE_BOOLEAN, "bsf",
+ "Does this drive support the MTBSF command?" );
+
+ device_property_fill_and_register(&device_property_fsr,
+ G_TYPE_BOOLEAN, "fsr",
+ "Does this drive support the MTFSR command?");
+
+ device_property_fill_and_register(&device_property_bsr,
+ G_TYPE_BOOLEAN, "bsr",
+ "Does this drive support the MTBSR command?");
+
+ device_property_fill_and_register(&device_property_eom,
+ G_TYPE_BOOLEAN, "eom",
+ "Does this drive support the MTEOM command?");
+
+ device_property_fill_and_register(&device_property_bsf_after_eom,
+ G_TYPE_BOOLEAN,
+ "bsf_after_eom",
+ "Does this drive require an MTBSF after MTEOM in order to append?" );
+
+ device_property_fill_and_register(&device_property_nonblocking_open,
+ G_TYPE_BOOLEAN,
+ "nonblocking_open",
+ "Does this drive require a open with O_NONBLOCK?" );
+
+ device_property_fill_and_register(&device_property_final_filemarks,
+ G_TYPE_UINT, "final_filemarks",
+ "How many filemarks to write after the last tape file?" );
+
+ device_property_fill_and_register(&device_property_read_buffer_size,
+ G_TYPE_UINT, "read_buffer_size",
+ "(deprecated name for READ_BLOCK_SIZE)");
+
+ /* Then the device itself */
register_device(tape_device_factory, device_prefix_list);
}
-#ifdef O_NONBLOCK
/* Open the tape device, trying various combinations of O_RDWR and
- O_NONBLOCK. */
-static int try_open_tape_device(TapeDevice * self, char * device_name) {
- int rval;
- rval = robust_open(device_name, O_RDWR | O_NONBLOCK, 0);
- if (rval < 0 && (errno == EWOULDBLOCK || errno == EINVAL)) {
+ O_NONBLOCK. Returns -1 and calls device_set_error for errors
+ On Linux, with O_NONBLOCK, the kernel just checks the state once,
+ whereas it checks it every second for ST_BLOCK_SECONDS if O_NONBLOCK is
+ not given. Amanda already have the code to poll, we want open to check
+ the state only once. */
+
+static int try_open_tape_device(TapeDevice * self, char * device_filename) {
+ int fd;
+ int save_errno;
+ DeviceStatusFlags new_status;
+
+#ifdef O_NONBLOCK
+ int nonblocking = 0;
+
+ if (self->nonblocking_open) {
+ nonblocking = O_NONBLOCK;
+ }
+#endif
+
+#ifdef O_NONBLOCK
+ fd = robust_open(device_filename, O_RDWR | nonblocking, 0);
+ save_errno = errno;
+ if (fd < 0 && nonblocking && (save_errno == EWOULDBLOCK || save_errno == EINVAL)) {
/* Maybe we don't support O_NONBLOCK for tape devices. */
- rval = robust_open(device_name, O_RDWR, 0);
+ fd = robust_open(device_filename, O_RDWR, 0);
+ save_errno = errno;
}
- if (rval >= 0) {
+#else
+ fd = robust_open(device_filename, O_RDWR, 0);
+ save_errno = errno;
+#endif
+ if (fd >= 0) {
self->write_open_errno = 0;
} else {
- if (errno == EACCES || errno == EPERM) {
+ if (errno == EACCES || errno == EPERM
+#ifdef EROFS
+ || errno == EROFS
+#endif
+ ) {
/* Device is write-protected. */
self->write_open_errno = errno;
- rval = robust_open(device_name, O_RDONLY | O_NONBLOCK, 0);
- if (rval < 0 && (errno == EWOULDBLOCK || errno == EINVAL)) {
- rval = robust_open(device_name, O_RDONLY, 0);
+#ifdef O_NONBLOCK
+ fd = robust_open(device_filename, O_RDONLY | nonblocking, 0);
+ save_errno = errno;
+ if (fd < 0 && nonblocking && (save_errno == EWOULDBLOCK || save_errno == EINVAL)) {
+ fd = robust_open(device_filename, O_RDONLY, 0);
+ save_errno = errno;
}
+#else
+ fd = robust_open(device_filename, O_RDONLY, 0);
+ save_errno = errno;
+#endif
}
}
+#ifdef O_NONBLOCK
/* Clear O_NONBLOCK for operations from now on. */
- fcntl(rval, F_SETFL, fcntl(rval, F_GETFL, 0) & ~O_NONBLOCK);
- return rval;
-}
-#else /* !defined(O_NONBLOCK) */
-static int try_open_tape_device(TapeDevice * self, char * device_name) {
- int rval;
- rval = robust_open(device_name, O_RDWR);
- if (rval >= 0) {
- self->write_open_errno = 0;
- } else {
- if (errno == EACCES || errno == EPERM) {
- /* Device is write-protected. */
- self->write_open_errno = errno;
- rval = robust_open(device_name, O_RDONLY);
- }
+ if (fd >= 0 && nonblocking)
+ fcntl(fd, F_SETFL, fcntl(fd, F_GETFL, 0) & ~O_NONBLOCK);
+ errno = save_errno;
+ /* function continues after #endif */
+
+#endif /* O_NONBLOCK */
+
+ if (fd < 0) {
+ DeviceStatusFlags status_flag = 0;
+ if (errno == EBUSY)
+ status_flag = DEVICE_STATUS_DEVICE_BUSY;
+ else
+ status_flag = DEVICE_STATUS_DEVICE_ERROR;
+ device_set_error(DEVICE(self),
+ vstrallocf(_("Can't open tape device %s: %s"), self->private->device_filename, strerror(errno)),
+ status_flag);
+ return -1;
}
- return rval;
+
+ /* Check that this is actually a tape device. */
+ new_status = tape_is_tape_device(fd);
+ if (new_status & DEVICE_STATUS_DEVICE_ERROR) {
+ device_set_error(DEVICE(self),
+ vstrallocf(_("File %s is not a tape device"), self->private->device_filename),
+ new_status);
+ robust_close(fd);
+ return -1;
+ }
+ if (new_status & DEVICE_STATUS_VOLUME_MISSING) {
+ device_set_error(DEVICE(self),
+ vstrallocf(_("Tape device %s is not ready or is empty"), self->private->device_filename),
+ new_status);
+ robust_close(fd);
+ return -1;
+ }
+
+ new_status = tape_is_ready(fd, self);
+ if (new_status & DEVICE_STATUS_VOLUME_MISSING) {
+ device_set_error(DEVICE(self),
+ vstrallocf(_("Tape device %s is empty"), self->private->device_filename),
+ new_status);
+ robust_close(fd);
+ return -1;
+ }
+ if (new_status != DEVICE_STATUS_SUCCESS) {
+ device_set_error(DEVICE(self),
+ vstrallocf(_("Tape device %s is not ready or is empty"), self->private->device_filename),
+ new_status);
+ robust_close(fd);
+ return -1;
+ }
+
+ return fd;
}
-#endif /* O_NONBLOCK */
-static gboolean
-tape_device_open_device (Device * d_self, char * device_name) {
+static void
+tape_device_open_device (Device * dself, char * device_name,
+ char * device_type, char * device_node) {
TapeDevice * self;
+ GValue val;
- self = TAPE_DEVICE(d_self);
- g_return_val_if_fail (self != NULL, FALSE);
- g_return_val_if_fail (device_name != NULL, FALSE);
+ self = TAPE_DEVICE(dself);
- self->fd = try_open_tape_device(self, device_name);
+ self->fd = -1;
+ self->private->device_filename = stralloc(device_node);
- if (self->fd < 0) {
- g_fprintf(stderr, "Can't open tape device %s: %s\n",
- device_name, strerror(errno));
- return FALSE;
- }
+ /* Set tape drive/OS info */
+ bzero(&val, sizeof(val));
+ g_value_init(&val, G_TYPE_BOOLEAN);
- /* Check that this is actually a tape device. */
- if (tape_is_tape_device(self->fd) == TAPE_CHECK_FAILURE) {
- g_fprintf(stderr, "File %s is not a tape device.\n",
- device_name);
- robust_close(self->fd);
- return FALSE;
- }
+ self->fsf = TRUE;
+ g_value_set_boolean(&val, self->fsf);
+ device_set_simple_property(dself, PROPERTY_FSF, &val, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
- if (tape_is_ready(self->fd) == TAPE_CHECK_FAILURE) {
- g_fprintf(stderr,
- "Tape device %s is not ready or is empty.\n",
- device_name);
- robust_close(self->fd);
- return FALSE;
- }
+ self->fsf_after_filemark = DEFAULT_FSF_AFTER_FILEMARK;
+ g_value_set_boolean(&val, self->fsf_after_filemark);
+ device_set_simple_property(dself, PROPERTY_FSF_AFTER_FILEMARK, &val, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
- /* Rewind it. */
- if (!tape_rewind(self->fd)) {
- g_fprintf(stderr, "Error rewinding device %s\n",
- device_name);
- robust_close(self->fd);
- return FALSE;
- }
+ self->bsf = TRUE;
+ g_value_set_boolean(&val, self->bsf);
+ device_set_simple_property(dself, PROPERTY_BSF, &val, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+
+ self->fsr = TRUE;
+ g_value_set_boolean(&val, self->fsr);
+ device_set_simple_property(dself, PROPERTY_FSR, &val, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+
+ self->bsr = TRUE;
+ g_value_set_boolean(&val, self->bsr);
+ device_set_simple_property(dself, PROPERTY_BSR, &val, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+
+ self->eom = TRUE;
+ g_value_set_boolean(&val, self->eom);
+ device_set_simple_property(dself, PROPERTY_EOM, &val, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+
+ self->leom = FALSE;
+ g_value_set_boolean(&val, self->leom);
+ device_set_simple_property(dself, PROPERTY_LEOM, &val, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
- /* Get tape drive/OS info */
- tape_device_discover_capabilities(self);
+ self->bsf_after_eom = FALSE;
+ g_value_set_boolean(&val, self->bsf_after_eom);
+ device_set_simple_property(dself, PROPERTY_BSF_AFTER_EOM, &val, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
- /* And verify the above. */
- g_assert(feature_support_flags_is_valid(self->fsf));
- g_assert(feature_support_flags_is_valid(self->bsf));
- g_assert(feature_support_flags_is_valid(self->fsr));
- g_assert(feature_support_flags_is_valid(self->bsr));
- g_assert(feature_support_flags_is_valid(self->eom));
- g_assert(feature_support_flags_is_valid(self->bsf_after_eom));
- g_assert(self->final_filemarks == 1 ||
- self->final_filemarks == 2);
+ g_value_unset(&val);
+ g_value_init(&val, G_TYPE_UINT);
+
+ self->final_filemarks = 2;
+ g_value_set_uint(&val, self->final_filemarks);
+ device_set_simple_property(dself, PROPERTY_FINAL_FILEMARKS, &val, PROPERTY_SURETY_BAD, PROPERTY_SOURCE_DEFAULT);
+
+ g_value_unset(&val);
/* Chain up */
if (parent_class->open_device) {
- if (!(parent_class->open_device)(d_self, device_name)) {
- robust_close(self->fd);
- return FALSE;
- }
+ parent_class->open_device(dself, device_name, device_type, device_node);
}
-
- return TRUE;
}
-static ReadLabelStatusFlags tape_device_read_label(Device * dself) {
+
+static DeviceStatusFlags tape_device_read_label(Device * dself) {
TapeDevice * self;
char * header_buffer;
int buffer_len;
IoResult result;
- dumpfile_t header;
+ dumpfile_t *header;
+ DeviceStatusFlags new_status;
+ char *msg = NULL;
self = TAPE_DEVICE(dself);
- g_return_val_if_fail(self != NULL, FALSE);
+ amfree(dself->volume_label);
+ amfree(dself->volume_time);
+ dumpfile_free(dself->volume_header);
+ dself->volume_header = NULL;
+
+ if (device_in_error(self)) return dself->status;
+
+ if (self->fd == -1) {
+ self->fd = try_open_tape_device(self, self->private->device_filename);
+ /* if the open failed, then try_open_tape_device already set the
+ * approppriate error status */
+ if (self->fd == -1)
+ return dself->status;
+ }
+
+ /* Rewind it. */
if (!tape_rewind(self->fd)) {
- g_fprintf(stderr, "Error rewinding device %s\n",
- dself->device_name);
- return (READ_LABEL_STATUS_DEVICE_ERROR |
- READ_LABEL_STATUS_VOLUME_ERROR);
- }
+ device_set_error(dself,
+ vstrallocf(_("Error rewinding device %s to read label: %s"),
+ self->private->device_filename, strerror(errno)),
+ DEVICE_STATUS_DEVICE_ERROR
+ | DEVICE_STATUS_VOLUME_ERROR);
+ return dself->status;
+ }
- buffer_len = self->read_block_size;
+ buffer_len = tape_device_read_size(self);
header_buffer = malloc(buffer_len);
- result = tape_device_robust_read(self, header_buffer, &buffer_len);
+ result = tape_device_robust_read(self, header_buffer, &buffer_len, &msg);
if (result != RESULT_SUCCESS) {
free(header_buffer);
tape_rewind(self->fd);
/* I/O error. */
- g_fprintf(stderr, "Error reading Amanda header.\n");
- if (result == RESULT_NO_DATA) {
- return (READ_LABEL_STATUS_VOLUME_ERROR |
- READ_LABEL_STATUS_VOLUME_UNLABELED);
- } else {
- return (READ_LABEL_STATUS_DEVICE_ERROR |
- READ_LABEL_STATUS_VOLUME_ERROR |
- READ_LABEL_STATUS_VOLUME_UNLABELED);
+ switch (result) {
+ case RESULT_NO_DATA:
+ msg = stralloc(_("no data"));
+ new_status = (DEVICE_STATUS_VOLUME_ERROR |
+ DEVICE_STATUS_VOLUME_UNLABELED);
+ header = dself->volume_header = g_new(dumpfile_t, 1);
+ fh_init(header);
+ break;
+
+ case RESULT_SMALL_BUFFER:
+ msg = stralloc(_("block size too small"));
+ new_status = (DEVICE_STATUS_DEVICE_ERROR |
+ DEVICE_STATUS_VOLUME_ERROR);
+ header = dself->volume_header = g_new(dumpfile_t, 1);
+ fh_init(header);
+ header->type = F_WEIRD;
+ break;
+
+ default:
+ msg = stralloc(_("unknown error"));
+ case RESULT_ERROR:
+ new_status = (DEVICE_STATUS_DEVICE_ERROR |
+ DEVICE_STATUS_VOLUME_ERROR |
+ DEVICE_STATUS_VOLUME_UNLABELED);
+ break;
}
+ device_set_error(dself,
+ g_strdup_printf(_("Error reading Amanda header: %s"),
+ msg? msg : _("unknown error")),
+ new_status);
+ amfree(msg);
+ return dself->status;
}
- parse_file_header(header_buffer, &header, buffer_len);
+ header = dself->volume_header = g_new(dumpfile_t, 1);
+ fh_init(header);
+
+ parse_file_header(header_buffer, header, buffer_len);
amfree(header_buffer);
- if (header.type != F_TAPESTART) {
- return READ_LABEL_STATUS_VOLUME_UNLABELED;
- }
-
- dself->volume_label = g_strdup(header.name);
- dself->volume_time = g_strdup(header.datestamp);
-
- if (parent_class->read_label) {
- return parent_class->read_label(dself);
- } else {
- return READ_LABEL_STATUS_SUCCESS;
+ if (header->type != F_TAPESTART) {
+ device_set_error(dself,
+ stralloc(_("No tapestart header -- unlabeled device?")),
+ DEVICE_STATUS_VOLUME_UNLABELED);
+ return dself->status;
}
+
+ dself->volume_label = g_strdup(header->name);
+ dself->volume_time = g_strdup(header->datestamp);
+ /* dself->volume_header is already set */
+
+ device_set_error(dself, NULL, DEVICE_STATUS_SUCCESS);
+
+ return dself->status;
}
static gboolean
-tape_device_write_block(Device * pself, guint size,
- gpointer data, gboolean short_block) {
+tape_device_write_block(Device * pself, guint size, gpointer data) {
TapeDevice * self;
char *replacement_buffer = NULL;
IoResult result;
+ char *msg = NULL;
self = TAPE_DEVICE(pself);
- g_return_val_if_fail (self != NULL, FALSE);
- g_return_val_if_fail (self->fd >= 0, FALSE);
-
- if (short_block && self->min_block_size > size) {
- replacement_buffer = malloc(self->min_block_size);
+
+ g_assert(self->fd >= 0);
+ if (device_in_error(self)) return FALSE;
+
+ /* zero out to the end of a short block -- tape devices only write
+ * whole blocks. */
+ if (size < pself->block_size) {
+ replacement_buffer = malloc(pself->block_size);
memcpy(replacement_buffer, data, size);
- bzero(replacement_buffer+size, self->min_block_size-size);
-
+ bzero(replacement_buffer+size, pself->block_size-size);
+
data = replacement_buffer;
- size = self->min_block_size;
+ size = pself->block_size;
}
- result = tape_device_robust_write(self, data, size);
- if (result == RESULT_SUCCESS) {
- if (parent_class->write_block) {
- (parent_class->write_block)(pself, size, data, short_block);
- }
- amfree(replacement_buffer);
- return TRUE;
- } else {
- amfree(replacement_buffer);
- return FALSE;
+ result = tape_device_robust_write(self, data, size, &msg);
+ amfree(replacement_buffer);
+
+ switch (result) {
+ case RESULT_SUCCESS:
+ break;
+
+ case RESULT_NO_SPACE:
+ device_set_error(pself,
+ stralloc(_("No space left on device")),
+ DEVICE_STATUS_VOLUME_ERROR);
+ pself->is_eom = TRUE;
+ return FALSE;
+
+ default:
+ msg = stralloc(_("unknown error"));
+ case RESULT_ERROR:
+ device_set_error(pself,
+ g_strdup_printf(_("Error writing block: %s"), msg),
+ DEVICE_STATUS_DEVICE_ERROR);
+ amfree(msg);
+ return FALSE;
}
-
- g_assert_not_reached();
+
+ pself->block++;
+
+ return TRUE;
}
static int tape_device_read_block (Device * pself, gpointer buf,
TapeDevice * self;
int size;
IoResult result;
-
+ gssize read_block_size = tape_device_read_size(pself);
+ char *msg = NULL;
+
self = TAPE_DEVICE(pself);
- g_return_val_if_fail (self != NULL, -1);
- if (buf == NULL || *size_req < (int)self->read_block_size) {
+ g_assert(self->fd >= 0);
+ if (device_in_error(self)) return -1;
+
+ g_assert(read_block_size < INT_MAX); /* data type mismatch */
+ if (buf == NULL || *size_req < (int)read_block_size) {
/* Just a size query. */
- *size_req = self->read_block_size;
+ *size_req = (int)read_block_size;
return 0;
}
size = *size_req;
- result = tape_device_robust_read(self, buf, &size);
+ result = tape_device_robust_read(self, buf, &size, &msg);
switch (result) {
case RESULT_SUCCESS:
*size_req = size;
+ pself->block++;
return size;
case RESULT_SMALL_BUFFER: {
- int new_size;
+ gsize new_size;
+ GValue newval;
+
/* If this happens, it means that we have:
* (next block size) > (buffer size) >= (read_block_size)
* The solution is to ask for an even bigger buffer. We also play
* some games to refrain from reading above the SCSI limit or from
- * integer overflow. */
+ * integer overflow. Note that not all devices will tell us about
+ * this problem -- some will just discard the "extra" data. */
new_size = MIN(INT_MAX/2 - 1, *size_req) * 2;
if (new_size > LARGEST_BLOCK_ESTIMATE &&
*size_req < LARGEST_BLOCK_ESTIMATE) {
new_size = LARGEST_BLOCK_ESTIMATE;
}
- if (new_size <= *size_req) {
- return -1;
- } else {
- *size_req = new_size;
- return 0;
- }
+ g_assert (new_size > (gsize)*size_req);
+
+ g_info("Device %s indicated blocksize %zd was too small; using %zd.",
+ pself->device_name, (gsize)*size_req, new_size);
+ *size_req = (int)new_size;
+ self->private->read_block_size = new_size;
+
+ bzero(&newval, sizeof(newval));
+ g_value_init(&newval, G_TYPE_UINT);
+ g_value_set_uint(&newval, self->private->read_block_size);
+ device_set_simple_property(pself, PROPERTY_READ_BLOCK_SIZE,
+ &newval, PROPERTY_SURETY_GOOD, PROPERTY_SOURCE_DETECTED);
+ g_value_unset(&newval);
+
+ return 0;
}
case RESULT_NO_DATA:
pself->is_eof = TRUE;
- /* FALLTHROUGH */
+ pself->in_file = FALSE;
+ device_set_error(pself,
+ stralloc(_("EOF")),
+ DEVICE_STATUS_SUCCESS);
+ return -1;
+
default:
+ msg = stralloc(_("unknown error"));
+ case RESULT_ERROR:
+ device_set_error(pself,
+ vstrallocf(_("Error reading from tape device: %s"), msg),
+ DEVICE_STATUS_VOLUME_ERROR | DEVICE_STATUS_DEVICE_ERROR);
+ amfree(msg);
return -1;
}
IoResult result;
dumpfile_t * header;
char * header_buf;
- int header_size;
- gboolean header_fits;
Device * d_self = (Device*)self;
+ char *msg = NULL;
+
tape_rewind(self->fd);
-
+
header = make_tapestart_header(d_self, label, timestamp);
g_assert(header != NULL);
- header_buf = device_build_amanda_header(d_self, header, &header_size,
- &header_fits);
- amfree(header);
- g_assert(header_buf != NULL);
-
- if (!header_fits) {
- amfree(header_buf);
- g_fprintf(stderr, "Tapestart header won't fit in a single block!\n");
+ header_buf = device_build_amanda_header(d_self, header, NULL);
+ if (header_buf == NULL) {
+ device_set_error(d_self,
+ stralloc(_("Tapestart header won't fit in a single block!")),
+ DEVICE_STATUS_DEVICE_ERROR);
+ dumpfile_free(header);
return FALSE;
}
+ dumpfile_free(d_self->volume_header);
+ d_self->volume_header = NULL;
+
+ result = tape_device_robust_write(self, header_buf, d_self->block_size, &msg);
+ if (result != RESULT_SUCCESS) {
+ device_set_error(d_self,
+ g_strdup_printf(_("Error writing tapestart header: %s"),
+ (result == RESULT_ERROR)? msg : _("out of space")),
+ DEVICE_STATUS_DEVICE_ERROR);
+
+ if (result == RESULT_NO_SPACE)
+ d_self->is_eom = TRUE;
+
+ amfree(msg);
+ dumpfile_free(header);
+ amfree(header_buf);
+ return FALSE;
+ }
- g_assert(header_size >= (int)self->min_block_size);
- result = tape_device_robust_write(self, header_buf, header_size);
amfree(header_buf);
- return (result == RESULT_SUCCESS);
+
+ if (!tape_weof(self->fd, 1)) {
+ device_set_error(d_self,
+ vstrallocf(_("Error writing filemark: %s"),
+ strerror(errno)),
+ DEVICE_STATUS_DEVICE_ERROR|DEVICE_STATUS_VOLUME_ERROR);
+ /* can't tell if this was EOM or not, so assume it is */
+ d_self->is_eom = TRUE;
+ dumpfile_free(header);
+ return FALSE;
+ }
+
+ d_self->volume_header = header;
+ return TRUE;
}
-static gboolean
+static gboolean
tape_device_start (Device * d_self, DeviceAccessMode mode, char * label,
char * timestamp) {
TapeDevice * self;
self = TAPE_DEVICE(d_self);
- g_return_val_if_fail(self != NULL, FALSE);
-
+
+ if (device_in_error(self)) return FALSE;
+
+ if (self->fd == -1) {
+ self->fd = try_open_tape_device(self, self->private->device_filename);
+ /* if the open failed, then try_open_tape_device already set the
+ * approppriate error status */
+ if (self->fd == -1)
+ return FALSE;
+ }
+
+ if (mode != ACCESS_WRITE && d_self->volume_label == NULL) {
+ /* we need a labeled volume for APPEND and READ */
+ if (tape_device_read_label(d_self) != DEVICE_STATUS_SUCCESS)
+ return FALSE;
+ }
+
+ d_self->access_mode = mode;
+ d_self->in_file = FALSE;
+
if (IS_WRITABLE_ACCESS_MODE(mode)) {
if (self->write_open_errno != 0) {
/* We tried and failed to open the device in write mode. */
- g_fprintf(stderr, "Can't open tape device %s for writing: %s\n",
- d_self->device_name, strerror(self->write_open_errno));
+ device_set_error(d_self,
+ vstrallocf(_("Can't open tape device %s for writing: %s"),
+ self->private->device_filename, strerror(self->write_open_errno)),
+ DEVICE_STATUS_DEVICE_ERROR | DEVICE_STATUS_VOLUME_ERROR);
return FALSE;
} else if (!tape_rewind(self->fd)) {
- g_fprintf(stderr, "Couldn't rewind device: %s\n",
- strerror(errno));
+ device_set_error(d_self,
+ vstrallocf(_("Error rewinding device to start: %s"), strerror(errno)),
+ DEVICE_STATUS_DEVICE_ERROR);
+ return FALSE;
}
}
/* Position the tape */
switch (mode) {
case ACCESS_APPEND:
- if (!tape_device_eod(self))
+ if (d_self->volume_label == NULL && device_read_label(d_self) != DEVICE_STATUS_SUCCESS) {
+ /* device_read_label already set our error message */
+ return FALSE;
+ }
+
+ if (!tape_device_eod(self)) {
+ device_set_error(d_self,
+ vstrallocf(_("Couldn't seek to end of tape: %s"), strerror(errno)),
+ DEVICE_STATUS_DEVICE_ERROR);
return FALSE;
- self->first_file = TRUE;
+ }
break;
-
+
case ACCESS_READ:
+ if (d_self->volume_label == NULL && device_read_label(d_self) != DEVICE_STATUS_SUCCESS) {
+ /* device_read_label already set our error message */
+ return FALSE;
+ }
+
if (!tape_rewind(self->fd)) {
- g_fprintf(stderr, "Error rewinding device %s\n",
- d_self->device_name);
+ device_set_error(d_self,
+ vstrallocf(_("Error rewinding device after reading label: %s"), strerror(errno)),
+ DEVICE_STATUS_DEVICE_ERROR);
return FALSE;
}
d_self->file = 0;
case ACCESS_WRITE:
if (!write_tapestart_header(self, label, timestamp)) {
+ /* write_tapestart_header already set the error status */
return FALSE;
}
- self->first_file = TRUE;
+
+ d_self->volume_label = newstralloc(d_self->volume_label, label);
+ d_self->volume_time = newstralloc(d_self->volume_time, timestamp);
+
+ /* unset the VOLUME_UNLABELED flag, if it was set */
+ device_set_error(d_self, NULL, DEVICE_STATUS_SUCCESS);
+ d_self->file = 0;
break;
default:
g_assert_not_reached();
}
- if (parent_class->start) {
- return parent_class->start(d_self, mode, label, timestamp);
- } else {
- return TRUE;
- }
+ return TRUE;
}
static gboolean tape_device_start_file(Device * d_self,
- const dumpfile_t * info) {
+ dumpfile_t * info) {
TapeDevice * self;
IoResult result;
char * amanda_header;
- int header_size;
- gboolean header_fits;
+ char *msg = NULL;
self = TAPE_DEVICE(d_self);
- g_return_val_if_fail(self != NULL, FALSE);
- g_return_val_if_fail (self->fd >= 0, FALSE);
- if (!(d_self->access_mode == ACCESS_APPEND && self->first_file)) {
- if (!tape_weof(self->fd, 1)) {
- g_fprintf(stderr, "Error writing filemark: %s\n", strerror(errno));
- return FALSE;
- }
- }
+ g_assert(self->fd >= 0);
+ if (device_in_error(self)) return FALSE;
- self->first_file = FALSE;
+ /* set the blocksize in the header properly */
+ info->blocksize = d_self->block_size;
/* Make the Amanda header suitable for writing to the device. */
/* Then write the damn thing. */
- amanda_header = device_build_amanda_header(d_self, info,
- &header_size, &header_fits);
- g_return_val_if_fail(amanda_header != NULL, FALSE);
- g_return_val_if_fail(header_fits, FALSE);
- result = tape_device_robust_write(self, amanda_header, header_size);
+ amanda_header = device_build_amanda_header(d_self, info, NULL);
+ if (amanda_header == NULL) {
+ device_set_error(d_self,
+ stralloc(_("Amanda file header won't fit in a single block!")),
+ DEVICE_STATUS_DEVICE_ERROR);
+ return FALSE;
+ }
+
+ result = tape_device_robust_write(self, amanda_header, d_self->block_size, &msg);
+ if (result != RESULT_SUCCESS) {
+ device_set_error(d_self,
+ vstrallocf(_("Error writing file header: %s"),
+ (result == RESULT_ERROR)? msg : _("out of space")),
+ DEVICE_STATUS_DEVICE_ERROR);
+
+ if (result == RESULT_NO_SPACE)
+ d_self->is_eom = TRUE;
+
+ amfree(amanda_header);
+ amfree(msg);
+ return FALSE;
+ }
amfree(amanda_header);
- if (result == RESULT_SUCCESS) {
- /* Chain up. */
- if (parent_class->start_file) {
- parent_class->start_file(d_self, info);
- }
- return TRUE;
- } else {
+
+ /* arrange the file numbers correctly */
+ d_self->in_file = TRUE;
+ d_self->block = 0;
+ if (d_self->file >= 0)
+ d_self->file ++;
+ return TRUE;
+}
+
+static gboolean
+tape_device_finish_file (Device * d_self) {
+ TapeDevice * self;
+
+ self = TAPE_DEVICE(d_self);
+ if (device_in_error(d_self)) return FALSE;
+
+ if (!tape_weof(self->fd, 1)) {
+ device_set_error(d_self,
+ vstrallocf(_("Error writing filemark: %s"), strerror(errno)),
+ DEVICE_STATUS_DEVICE_ERROR | DEVICE_STATUS_VOLUME_ERROR);
+ /* can't tell if this was EOM or not, so assume it is */
+ d_self->is_eom = TRUE;
return FALSE;
}
+
+ d_self->in_file = FALSE;
+ return TRUE;
}
-static dumpfile_t *
+static dumpfile_t *
tape_device_seek_file (Device * d_self, guint file) {
TapeDevice * self;
+ gint got_file;
int difference;
char * header_buffer;
dumpfile_t * rval;
int buffer_len;
IoResult result;
+ char *msg;
self = TAPE_DEVICE(d_self);
- g_return_val_if_fail(d_self != NULL, NULL);
- d_self->in_file = FALSE;
+ if (device_in_error(self)) return NULL;
difference = file - d_self->file;
/* Check if we already read a filemark. */
- if (d_self->is_eof) {
+ /* If we already read a filemark and the drive automaticaly goes to the
+ next file, then we must reduce the difference by one. */
+ if (d_self->is_eof && !self->fsf_after_filemark) {
difference --;
}
+ d_self->in_file = FALSE;
+ d_self->is_eof = FALSE;
+ d_self->block = 0;
+
+reseek:
if (difference > 0) {
/* Seeking forwards */
if (!tape_device_fsf(self, difference)) {
tape_rewind(self->fd);
+ device_set_error(d_self,
+ vstrallocf(_("Could not seek forward to file %d"), file),
+ DEVICE_STATUS_VOLUME_ERROR | DEVICE_STATUS_DEVICE_ERROR);
return NULL;
}
- } else if (difference < 0) {
- /* Seeking backwards */
- if (!tape_device_bsf(self, -difference, d_self->file)) {
- tape_rewind(self->fd);
- return NULL;
- }
+ } else { /* (difference <= 0) */
+ /* Seeking backwards, or to this file itself */
+
+ /* if the drive supports bsf, we can do this the fancy way */
+ if (self->bsf) {
+ /* bsf one more than the difference */
+ if (!tape_bsf(self->fd, -difference + 1)) {
+ tape_rewind(self->fd);
+ device_set_error(d_self,
+ vstrallocf(_("Could not seek backward to file %d"), file),
+ DEVICE_STATUS_VOLUME_ERROR | DEVICE_STATUS_DEVICE_ERROR);
+ return NULL;
+ }
+
+ /* now we are on the BOT side of the desired filemark, so FSF to get to the
+ * EOT side of it */
+ if (!tape_device_fsf(self, 1)) {
+ tape_rewind(self->fd);
+ device_set_error(d_self,
+ vstrallocf(_("Could not seek forward to file %d"), file),
+ DEVICE_STATUS_VOLUME_ERROR | DEVICE_STATUS_DEVICE_ERROR);
+ return NULL;
+ }
+ } else {
+ /* no BSF, so just rewind and seek forward */
+ if (!tape_rewind(self->fd)) {
+ device_set_error(d_self,
+ vstrallocf(_("Could not rewind device while emulating BSF")),
+ DEVICE_STATUS_VOLUME_ERROR | DEVICE_STATUS_DEVICE_ERROR);
+ return FALSE;
+ }
+
+ if (!tape_device_fsf(self, file)) {
+ tape_rewind(self->fd);
+ device_set_error(d_self,
+ vstrallocf(_("Could not seek forward to file %d"), file),
+ DEVICE_STATUS_VOLUME_ERROR | DEVICE_STATUS_DEVICE_ERROR);
+ return NULL;
+ }
+ }
}
- buffer_len = self->read_block_size;
+ /* double-check that we're on the right fileno, if possible. This is most
+ * likely a programming error if it occurs, but could also be due to a weird
+ * tape drive or driver (and that would *never* happen, right?) */
+ got_file = tape_fileno(self->fd);
+ if (got_file >= 0 && (guint)got_file != file) {
+ device_set_error(d_self,
+ vstrallocf(_("Could not seek to file %d correctly; got %d"),
+ file, got_file),
+ DEVICE_STATUS_DEVICE_ERROR);
+ d_self->file = (guint)got_file;
+ return NULL;
+ }
+
+ buffer_len = tape_device_read_size(d_self);
header_buffer = malloc(buffer_len);
d_self->is_eof = FALSE;
- result = tape_device_robust_read(self, header_buffer, &buffer_len);
+ result = tape_device_robust_read(self, header_buffer, &buffer_len, &msg);
if (result != RESULT_SUCCESS) {
free(header_buffer);
tape_rewind(self->fd);
- if (result == RESULT_NO_DATA) {
+ switch (result) {
+ case RESULT_NO_DATA:
/* If we read 0 bytes, that means we encountered a double
* filemark, which indicates end of tape. This should
* work even with QIC tapes on operating systems with
* proper support. */
+ d_self->file = file; /* other attributes are already correct */
return make_tapeend_header();
+
+ case RESULT_SMALL_BUFFER:
+ msg = stralloc(_("block size too small"));
+ break;
+
+ default:
+ msg = stralloc(_("unknown error"));
+ case RESULT_ERROR:
+ break;
}
- /* I/O error. */
- g_fprintf(stderr, "Error reading Amanda header.\n");
- return FALSE;
+ device_set_error(d_self,
+ g_strdup_printf(_("Error reading Amanda header: %s"), msg),
+ DEVICE_STATUS_DEVICE_ERROR | DEVICE_STATUS_VOLUME_ERROR);
+ amfree(msg);
+ return NULL;
}
-
- rval = malloc(sizeof(*rval));
+
+ rval = g_new(dumpfile_t, 1);
parse_file_header(header_buffer, rval, buffer_len);
amfree(header_buffer);
switch (rval->type) {
case F_DUMPFILE:
case F_CONT_DUMPFILE:
case F_SPLIT_DUMPFILE:
- d_self->in_file = TRUE;
- d_self->file = file;
- return rval;
+ break;
+
+ case F_NOOP:
+ /* a NOOP is written on QIC tapes to avoid writing two sequential
+ * filemarks when closing a device in WRITE or APPEND mode. In this
+ * case, we just seek to the next file. */
+ amfree(rval);
+ file++;
+ difference = 1;
+ goto reseek;
+
default:
tape_rewind(self->fd);
+ device_set_error(d_self,
+ stralloc(_("Invalid amanda header while reading file header")),
+ DEVICE_STATUS_VOLUME_ERROR);
amfree(rval);
return NULL;
}
+
+ d_self->in_file = TRUE;
+ d_self->file = file;
+
+ return rval;
}
-static gboolean
+static gboolean
tape_device_seek_block (Device * d_self, guint64 block) {
TapeDevice * self;
int difference;
self = TAPE_DEVICE(d_self);
- g_return_val_if_fail(d_self != NULL, FALSE);
+
+ if (device_in_error(self)) return FALSE;
difference = block - d_self->block;
-
+
if (difference > 0) {
- if (!tape_device_fsr(self, difference))
+ if (!tape_device_fsr(self, difference)) {
+ device_set_error(d_self,
+ vstrallocf(_("Could not seek forward to block %ju: %s"), (uintmax_t)block, strerror(errno)),
+ DEVICE_STATUS_VOLUME_ERROR | DEVICE_STATUS_DEVICE_ERROR);
return FALSE;
+ }
} else if (difference < 0) {
- if (!tape_device_bsr(self, difference, d_self->file, d_self->block))
+ if (!tape_device_bsr(self, difference, d_self->file, d_self->block)) {
+ device_set_error(d_self,
+ vstrallocf(_("Could not seek backward to block %ju: %s"), (uintmax_t)block, strerror(errno)),
+ DEVICE_STATUS_VOLUME_ERROR | DEVICE_STATUS_DEVICE_ERROR);
return FALSE;
+ }
}
- if (parent_class->seek_block) {
- return (parent_class->seek_block)(d_self, block);
- } else {
- return TRUE;
- }
-}
-
-/* Just checks that the flag is valid before setting it. */
-static gboolean get_feature_flag(GValue * val, FeatureSupportFlags f) {
- if (feature_support_flags_is_valid(f)) {
- g_value_set_flags(val, f);
- return TRUE;
- } else {
- return FALSE;
- }
+ d_self->block = block;
+ return TRUE;
}
-static gboolean
-tape_device_property_get (Device * d_self, DevicePropertyId id, GValue * val) {
+static gboolean
+tape_device_eject (Device * d_self) {
TapeDevice * self;
- const DevicePropertyBase * base;
self = TAPE_DEVICE(d_self);
- g_return_val_if_fail(self != NULL, FALSE);
- base = device_property_get_by_id(id);
- g_return_val_if_fail(self != NULL, FALSE);
+ if (device_in_error(self)) return FALSE;
- g_value_unset_init(val, base->type);
-
- if (id == PROPERTY_COMPRESSION) {
- g_value_set_boolean(val, self->compression);
- return TRUE;
- } else if (id == PROPERTY_MIN_BLOCK_SIZE) {
- g_value_set_uint(val, self->min_block_size);
- return TRUE;
- } else if (id == PROPERTY_MAX_BLOCK_SIZE) {
- g_value_set_uint(val, self->max_block_size);
- return TRUE;
- } else if (id == PROPERTY_BLOCK_SIZE) {
- if (self->fixed_block_size == 0) {
- g_value_set_int(val, -1);
- } else {
- g_value_set_int(val, self->fixed_block_size);
- }
- return TRUE;
- } else if (id == PROPERTY_FSF) {
- return get_feature_flag(val, self->fsf);
- } else if (id == PROPERTY_BSF) {
- return get_feature_flag(val, self->bsf);
- } else if (id == PROPERTY_FSR) {
- return get_feature_flag(val, self->fsr);
- } else if (id == PROPERTY_BSR) {
- return get_feature_flag(val, self->bsr);
- } else if (id == PROPERTY_EOM) {
- return get_feature_flag(val, self->eom);
- } else if (id == PROPERTY_BSF_AFTER_EOM) {
- return get_feature_flag(val, self->bsf_after_eom);
- } else if (id == PROPERTY_FINAL_FILEMARKS) {
- g_value_set_uint(val, self->final_filemarks);
- return TRUE;
- } else {
- /* Chain up */
- if (parent_class->property_get) {
- return (parent_class->property_get)(d_self, id, val);
- } else {
+ /* Open the device if not already opened */
+ if (self->fd == -1) {
+ self->fd = try_open_tape_device(self, self->private->device_filename);
+ /* if the open failed, then try_open_tape_device already set the
+ * approppriate error status */
+ if (self->fd == -1)
return FALSE;
- }
- }
-
- g_assert_not_reached();
-}
-
-/* We don't allow overriding of flags with _GOOD surety. That way, if
- e.g., a feature has no matching IOCTL on a given platform, we don't
- ever try to set it. */
-static gboolean flags_settable(FeatureSupportFlags request,
- FeatureSupportFlags existing) {
- if (!feature_support_flags_is_valid(request))
- return FALSE;
- else if (!feature_support_flags_is_valid(existing))
- return TRUE;
- else if (request == existing)
- return TRUE;
- else if (existing & FEATURE_SURETY_GOOD)
- return FALSE;
- else
- return TRUE;
-}
-
-/* If the access listed is NULL, and the provided flags can override the
- existing ones, then do it and return TRUE. */
-static gboolean try_set_feature(DeviceAccessMode mode,
- FeatureSupportFlags request,
- FeatureSupportFlags * existing) {
- if (mode != ACCESS_NULL) {
- return FALSE;
- } else if (flags_settable(request, *existing)) {
- *existing = request;
- return TRUE;
- } else {
- return FALSE;
}
-}
-
-static gboolean
-tape_device_property_set (Device * d_self, DevicePropertyId id, GValue * val) {
- TapeDevice * self;
- FeatureSupportFlags feature_request_flags = 0;
- const DevicePropertyBase * base;
-
- self = TAPE_DEVICE(d_self);
- g_return_val_if_fail(self != NULL, FALSE);
-
- base = device_property_get_by_id(id);
- g_return_val_if_fail(self != NULL, FALSE);
- g_return_val_if_fail(G_VALUE_HOLDS(val, base->type), FALSE);
-
- if (base->type == FEATURE_SUPPORT_FLAGS_TYPE) {
- feature_request_flags = g_value_get_flags(val);
- g_return_val_if_fail(
- feature_support_flags_is_valid(feature_request_flags), FALSE);
+ /* Rewind it. */
+ if (!tape_rewind(self->fd)) {
+ device_set_error(d_self,
+ vstrallocf(_("Error rewinding device %s before ejecting: %s"),
+ self->private->device_filename, strerror(errno)),
+ DEVICE_STATUS_DEVICE_ERROR
+ | DEVICE_STATUS_VOLUME_ERROR);
+ return FALSE;
}
- if (id == PROPERTY_COMPRESSION) {
- /* We allow this property to be set at any time. This is mostly
- * because setting compression is a hit-and-miss proposition
- * at any time; some drives accept the mode setting but don't
- * actually support compression, while others do support
- * compression but do it via density settings or some other
- * way. Set this property whenever you want, but all we'll do
- * is report whether or not the ioctl succeeded. */
- gboolean request = g_value_get_boolean(val);
- if (tape_setcompression(self->fd, request)) {
- self->compression = request;
- device_clear_volume_details(d_self);
- return TRUE;
- } else {
- return FALSE;
- }
- } else if (id == PROPERTY_MIN_BLOCK_SIZE) {
- if (d_self->access_mode != ACCESS_NULL)
- return FALSE;
- self->min_block_size = g_value_get_uint(val);
- device_clear_volume_details(d_self);
- return TRUE;
- } else if (id == PROPERTY_MAX_BLOCK_SIZE) {
- if (d_self->access_mode != ACCESS_NULL)
- return FALSE;
- self->max_block_size = g_value_get_uint(val);
- device_clear_volume_details(d_self);
- return TRUE;
- } else if (id == PROPERTY_BLOCK_SIZE) {
- if (d_self->access_mode != ACCESS_NULL)
- return FALSE;
+ if (tape_offl(self->fd))
+ return TRUE;
- self->fixed_block_size = g_value_get_int(val);
- device_clear_volume_details(d_self);
- return TRUE;
- } else if (id == PROPERTY_READ_BUFFER_SIZE) {
- if (d_self->access_mode != ACCESS_NULL)
- return FALSE;
- self->read_block_size = g_value_get_uint(val);
- device_clear_volume_details(d_self);
- return TRUE;
- } else if (id == PROPERTY_FSF) {
- return try_set_feature(d_self->access_mode,
- feature_request_flags,
- &(self->fsf));
- } else if (id == PROPERTY_BSF) {
- return try_set_feature(d_self->access_mode,
- feature_request_flags,
- &(self->bsf));
- } else if (id == PROPERTY_FSR) {
- return try_set_feature(d_self->access_mode,
- feature_request_flags,
- &(self->fsr));
- } else if (id == PROPERTY_BSR) {
- return try_set_feature(d_self->access_mode,
- feature_request_flags,
- &(self->bsr));
- } else if (id == PROPERTY_EOM) {
- /* Setting this to disabled also clears BSF after EOM. */
- if (try_set_feature(d_self->access_mode,
- feature_request_flags,
- &(self->eom))) {
- feature_request_flags &= ~FEATURE_SUPPORT_FLAGS_STATUS_MASK;
- feature_request_flags |= FEATURE_STATUS_DISABLED;
- self->bsf_after_eom = feature_request_flags;
- return TRUE;
- } else {
- return FALSE;
- }
- } else if (id == PROPERTY_BSF_AFTER_EOM) {
- /* You can only set this if EOM is enabled. */
- if (self->bsf | FEATURE_STATUS_DISABLED)
- return FALSE;
- else
- return try_set_feature(d_self->access_mode,
- feature_request_flags,
- &(self->bsf_after_eom));
- } else if (id == PROPERTY_FINAL_FILEMARKS) {
- guint request = g_value_get_uint(val);
- if (request == 1 || request == 2) {
- self->final_filemarks = request;
- return TRUE;
- } else {
- return FALSE;
- }
- } else {
- /* Chain up */
- if (parent_class->property_set) {
- return (parent_class->property_set)(d_self, id, val);
- } else {
- return FALSE;
- }
- }
+ device_set_error(d_self,
+ vstrallocf(_("Error ejecting device %s: %s\n"),
+ self->private->device_filename, strerror(errno)),
+ DEVICE_STATUS_DEVICE_ERROR);
- g_assert_not_reached();
+ return FALSE;
}
-static gboolean
+static gboolean
tape_device_finish (Device * d_self) {
TapeDevice * self;
+ char *msg = NULL;
self = TAPE_DEVICE(d_self);
- g_return_val_if_fail(self != NULL, FALSE);
+
+ if (device_in_error(self))
+ goto finish_error;
+
+ /* if we're already in ACCESS_NULL, then there are no filemarks or anything
+ * to worry about, but we need to release the kernel device */
+ if (d_self->access_mode == ACCESS_NULL) {
+ robust_close(self->fd);
+ self->fd = -1;
+ return TRUE;
+ }
/* Polish off this file, if relevant. */
if (d_self->in_file && IS_WRITABLE_ACCESS_MODE(d_self->access_mode)) {
if (!device_finish_file(d_self))
- return FALSE;
+ goto finish_error;
}
- /* Write an extra filemark, if needed. The OS will give us one for
- sure. */
- if (self->final_filemarks > 1 &&
+ /* Straighten out the filemarks. We already wrote one in finish_file, and
+ * the device driver will write another filemark when we rewind. This means
+ * that, if we do nothing, we'll get two filemarks. If final_filemarks is
+ * 1, this would be wrong, so in this case we insert a F_NOOP header between
+ * the two filemarks. */
+ if (self->final_filemarks == 1 &&
IS_WRITABLE_ACCESS_MODE(d_self->access_mode)) {
- if (!tape_weof(self->fd, 1)) {
- g_fprintf(stderr, "Error writing final filemark: %s\n",
- strerror(errno));
- return FALSE;
- }
+ dumpfile_t file;
+ char *header;
+ int result;
+
+ /* write a F_NOOP header */
+ fh_init(&file);
+ file.type = F_NOOP;
+ header = device_build_amanda_header(d_self, &file, NULL);
+ if (!header) {
+ device_set_error(d_self,
+ stralloc(_("Amanda file header won't fit in a single block!")),
+ DEVICE_STATUS_DEVICE_ERROR);
+ goto finish_error;
+ }
+
+ result = tape_device_robust_write(self, header, d_self->block_size, &msg);
+ if (result != RESULT_SUCCESS) {
+ device_set_error(d_self,
+ vstrallocf(_("Error writing file header: %s"),
+ (result == RESULT_ERROR)? msg : _("out of space")),
+ DEVICE_STATUS_DEVICE_ERROR);
+ amfree(header);
+ amfree(msg);
+ goto finish_error;
+ }
+ amfree(header);
}
- /* Rewind. */
+ /* Rewind (the kernel will write a filemark first) */
if (!tape_rewind(self->fd)) {
- g_fprintf(stderr, "Error rewinding tape: %s\n", strerror(errno));
- return FALSE;
+ device_set_error(d_self,
+ vstrallocf(_("Couldn't rewind device to finish: %s"), strerror(errno)),
+ DEVICE_STATUS_DEVICE_ERROR);
+ goto finish_error;
}
+ d_self->is_eof = FALSE;
d_self->access_mode = ACCESS_NULL;
- if (parent_class->finish) {
- return (parent_class->finish)(d_self);
- } else {
- return TRUE;
- }
+ /* release the kernel's device */
+ robust_close(self->fd);
+ self->fd = -1;
+
+ return TRUE;
+
+finish_error:
+ d_self->access_mode = ACCESS_NULL;
+ /* release the kernel's device */
+ robust_close(self->fd);
+ self->fd = -1;
+
+ return FALSE;
}
/* Works just like read(), except for the following:
* 1) Retries on EINTR & friends.
* 2) Stores count in parameter, not return value.
- * 3) Provides explicit return result. */
+ * 3) Provides explicit return result.
+ * *errmsg is only set on RESULT_ERROR.
+ */
static IoResult
-tape_device_robust_read (TapeDevice * self, void * buf, int * count) {
+tape_device_robust_read (TapeDevice * self, void * buf, int * count, char **errmsg) {
Device * d_self;
int result;
d_self = (Device*)self;
- g_return_val_if_fail(self != NULL, RESULT_ERROR);
- g_return_val_if_fail(*count >= 0, RESULT_ERROR);
+
/* Callers should ensure this. */
- g_assert((guint)(*count) <= self->read_block_size);
+ g_assert(*count >= 0);
for (;;) {
result = read(self->fd, buf, *count);
if (result > 0) {
/* Success. By definition, we read a full block. */
+ d_self->is_eof = FALSE;
*count = result;
return RESULT_SUCCESS;
} else if (result == 0) {
+ d_self->is_eof = TRUE;
return RESULT_NO_DATA;
} else {
if (0
) {
/* Interrupted system call */
continue;
- } else if ((self->fixed_block_size == 0) &&
- (0
+ } else if ((0
#ifdef ENOMEM
|| errno == ENOMEM /* bad user-space buffer */
#endif
#endif
)) {
/* Buffer too small. */
+ g_warning("Buffer is too small (%d bytes) from %s: %s",
+ *count, self->private->device_filename, strerror(errno));
return RESULT_SMALL_BUFFER;
} else {
- g_fprintf(stderr, "Error reading %d bytes from %s: %s\n",
- *count, d_self->device_name, strerror(errno));
+ *errmsg = g_strdup_printf(_("Error reading %d bytes from %s: %s"),
+ *count, self->private->device_filename, strerror(errno));
return RESULT_ERROR;
}
}
-
}
g_assert_not_reached();
static void check_resetofs(TapeDevice * self G_GNUC_UNUSED,
int count G_GNUC_UNUSED) {
#ifdef NEED_RESETOFS
+ Device * d_self;
int result;
+ d_self = (Device*)self;
+
self->private->write_count += count;
if (self->private->write_count < RESETOFS_THRESHOLD) {
return;
result = lseek(self->fd, 0, SEEK_SET);
if (result < 0) {
- g_fprintf(stderr,
- "Warning: lseek() failed during kernel 2GB workaround.\n");
+ g_warning(_("lseek() failed during kernel 2GB workaround: %s"),
+ strerror(errno));
}
#endif
}
-static IoResult
-tape_device_robust_write (TapeDevice * self, void * buf, int count) {
+/* *errmsg is only set on RESULT_ERROR */
+static IoResult
+tape_device_robust_write (TapeDevice * self, void * buf, int count, char **errmsg) {
Device * d_self;
int result;
+ gboolean retry = FALSE;
- g_return_val_if_fail(self != NULL, RESULT_ERROR);
d_self = (Device*)self;
-
+
check_resetofs(self, count);
for (;;) {
result = write(self->fd, buf, count);
- if (result == count) {
- /* Success. */
-
- self->private->write_count ++;
+ /* Success. */
+ if (result == count)
return RESULT_SUCCESS;
- } else if (result >= 0) {
- /* write() returned a short count. This should not happen. */
- g_fprintf(stderr,
- "Mysterious short write on tape device: Tried %d, got %d.\n",
- count, result);
+
+ if (result > 0) {
+ /* write() returned a short count. This should not happen if the block sizes
+ * are properly aligned. */
+ *errmsg = g_strdup_printf("Short write on tape device: Tried %d, got %d. Is "
+ "the drive using a block size smaller than %d bytes?",
+ count, result, count);
return RESULT_ERROR;
- } else if (0
+ }
+
+ /* Detect LEOM (early warning) and handle properly
+ *
+ * FreeBSD: 0-length write; next write will succeed
+ * http://lists.freebsd.org/pipermail/freebsd-scsi/2010-June/004414.html
+ *
+ * Solaris: 0-length write; next write will succeed
+ * (from Matthew Jacob on FreeBSD thread)
+ *
+ * Linux: -1/ENOSPC; next write will succeed
+ * http://www.mjmwired.net/kernel/Documentation/scsi/st.txt
+ *
+ * HP/UX: -1/ENOSPC; next write will succeed
+ * http://www.adssasia.com/Manual/IBM%203581%20tape%20autoloader.pdf
+ */
+ if (result == 0
+#ifdef ENOSPC
+ || (result < 0 && errno == ENOSPC)
+#endif
+ ) {
+ /* if we've retried once already, then we're probably really out of space */
+ if (retry)
+ return RESULT_NO_SPACE;
+ retry = TRUE;
+ d_self->is_eom = TRUE;
+
+ g_debug("empty write to tape; treating as LEOM early warning and retrying");
+ continue;
+ }
+
+ /* at this point result < 0, so an error occurred - sort out what */
+
+ if (0
#ifdef EAGAIN
|| errno == EAGAIN
#endif
/* Probably EOT. Print a message if we got EIO. */
#ifdef EIO
if (errno == EIO) {
- g_fprintf(stderr, "Got EIO on %s, assuming end of tape.\n",
- d_self->device_name);
+ g_warning(_("Got EIO on %s, assuming end of tape"),
+ self->private->device_filename);
}
#endif
return RESULT_NO_SPACE;
} else {
/* WTF */
- g_fprintf(stderr,
- "Kernel gave unexpected write() result of \"%s\" on device %s.\n",
- strerror(errno), d_self->device_name);
+ *errmsg = vstrallocf(_("Kernel gave unexpected write() result of \"%s\" on device %s"),
+ strerror(errno), self->private->device_filename);
return RESULT_ERROR;
}
}
actually read. */
static int drain_tape_blocks(TapeDevice * self, int count) {
char * buffer;
- int buffer_size;
+ gsize buffer_size;
int i;
- buffer_size = self->read_block_size;
+ buffer_size = tape_device_read_size(self);
- buffer = malloc(sizeof(buffer_size));
+ buffer = malloc(buffer_size);
for (i = 0; i < count || count < 0;) {
int result;
i ++;
continue;
} else if (result == 0) {
- free(buffer);
+ amfree(buffer);
return i;
} else {
/* First check for interrupted system call. */
buffer_size *= 2;
if (buffer_size > 32*1024*1024) {
- free(buffer);
+ amfree(buffer);
return -1;
} else {
buffer = realloc(buffer, buffer_size);
}
}
}
-
+
+ amfree(buffer);
return count;
}
-/* FIXME: Make sure that there are no cycles in reimplementation
- dependencies. */
-
-static gboolean
+static gboolean
tape_device_fsf (TapeDevice * self, guint count) {
- g_return_val_if_fail (self != NULL, (gboolean )0);
- g_return_val_if_fail (IS_TAPE_DEVICE (self), (gboolean )0);
-
- if (self->fsf & FEATURE_STATUS_ENABLED) {
+ if (self->fsf) {
return tape_fsf(self->fd, count);
} else {
guint i;
}
}
-/* Seek back over count + 1 filemarks to the start of the given file. */
-static gboolean
-tape_device_bsf (TapeDevice * self, guint count, guint file) {
- g_return_val_if_fail (self != NULL, (gboolean )0);
- g_return_val_if_fail (IS_TAPE_DEVICE (self), (gboolean )0);
-
- if (self->bsf & FEATURE_STATUS_ENABLED) {
- /* The BSF operation is not very smart; it includes the
- filemark of the present file as part of the count, and seeks
- to the wrong (BOT) side of the filemark. We compensate for
- this by seeking one filemark too many, then FSFing back over
- it.
-
- If this procedure fails for some reason, we can still try
- the backup plan. */
- if (tape_bsf(self->fd, count + 1) &&
- tape_device_fsf(self, 1))
- return TRUE;
- } /* Fall through to backup plan. */
-
- /* We rewind the tape, then seek forward the given number of
- files. */
- if (!tape_rewind(self->fd))
- return FALSE;
- return tape_device_fsf(self, file);
-}
-
-
-static gboolean
+static gboolean
tape_device_fsr (TapeDevice * self, guint count) {
- g_return_val_if_fail (self != NULL, (gboolean )0);
- g_return_val_if_fail (IS_TAPE_DEVICE (self), (gboolean )0);
-
- if (self->fsr & FEATURE_STATUS_ENABLED) {
+ if (self->fsr) {
return tape_fsr(self->fd, count);
} else {
int result = drain_tape_blocks(self, count);
/* Seek back the given number of blocks to block number block within
* the current file, numbered file. */
-static gboolean
+static gboolean
tape_device_bsr (TapeDevice * self, guint count, guint file, guint block) {
- g_return_val_if_fail (self != NULL, (gboolean )0);
- g_return_val_if_fail (IS_TAPE_DEVICE (self), (gboolean )0);
-
- g_return_val_if_fail (self != NULL, (gboolean )0);
- g_return_val_if_fail (IS_TAPE_DEVICE (self), (gboolean )0);
-
- if (self->bsr & FEATURE_STATUS_ENABLED) {
+ if (self->bsr) {
return tape_bsr(self->fd, count);
- } else {
- /* We BSF, then FSR. */
- if (!tape_device_bsf(self, 0, file))
+ } else if (self->bsf && self->fsf) {
+ /* BSF, FSF to the right side of the filemark, and then FSR. */
+ if (!tape_bsf(self->fd, 1))
return FALSE;
-
+
+ if (!tape_fsf(self->fd, 1))
+ return FALSE;
+
+ return tape_device_fsr(self, block);
+ } else {
+ /* rewind, FSF, and FSR */
+ if (!tape_rewind(self->fd))
+ return FALSE;
+
+ if (!tape_device_fsf(self, file))
+ return FALSE;
+
return tape_device_fsr(self, block);
}
g_assert_not_reached();
/* Go to the right place to write more data, and update the file
number if possible. */
-static gboolean
+static gboolean
tape_device_eod (TapeDevice * self) {
Device * d_self;
- g_return_val_if_fail (self != NULL, (gboolean )0);
- g_return_val_if_fail (IS_TAPE_DEVICE (self), (gboolean )0);
+ int count;
+
d_self = (Device*)self;
- if (self->eom & FEATURE_STATUS_ENABLED) {
+ if (self->eom) {
int result;
- result = tape_eod(self->fd);
+ result = tape_eod(self->fd);
if (result == TAPE_OP_ERROR) {
return FALSE;
- } else if (result == TAPE_POSITION_UNKNOWN) {
- d_self->file = -1;
+ } else if (result != TAPE_POSITION_UNKNOWN) {
+ /* great - we just fast-forwarded to EOD, but don't know where we are, so
+ * now we have to rewind and drain all of that data. Warn the user so that
+ * we can skip the fast-forward-rewind stage on the next run */
+ g_warning("Seek to end of tape does not give an accurate tape position; set "
+ "the EOM property to 0 to avoid useless tape movement.");
+ /* and set the property so that next time *this* object is opened for
+ * append, we skip this stage */
+ self->eom = FALSE;
+ /* fall through to draining blocks, below */
} else {
/* We drop by 1 because Device will increment the first
time the user does start_file. */
d_self->file = result - 1;
+ return TRUE;
}
- return TRUE;
- } else {
- int count = 0;
- if (!tape_rewind(self->fd))
- return FALSE;
-
- for (;;) {
- /* We alternately read a block and FSF. If the read is
- successful, then we are not there yet and should FSF
- again. */
- int result;
- result = drain_tape_blocks(self, 1);
- if (result == 1) {
- /* More data, FSF. */
- tape_device_fsf(self, 1);
- count ++;
- } else if (result == 0) {
- /* Finished. */
- d_self->file = count;
- return TRUE;
- } else {
- return FALSE;
- }
- }
+ }
+
+ if (!tape_rewind(self->fd))
+ return FALSE;
+
+ count = 0;
+ for (;;) {
+ /* We alternately read a block and FSF. If the read is
+ successful, then we are not there yet and should FSF
+ again. */
+ int result;
+ result = drain_tape_blocks(self, 1);
+ if (result == 1) {
+ /* More data, FSF. */
+ tape_device_fsf(self, 1);
+ count ++;
+ } else if (result == 0) {
+ /* Finished. */
+ d_self->file = count - 1;
+ return TRUE;
+ } else {
+ return FALSE;
+ }
}
}
-Device *
-tape_device_factory (char * device_type, char * device_name) {
+static Device *
+tape_device_factory (char * device_name, char * device_type, char * device_node) {
Device * rval;
g_assert(0 == strcmp(device_type, "tape"));
rval = DEVICE(g_object_new(TYPE_TAPE_DEVICE, NULL));
- if (!device_open_device(rval, device_name)) {
- g_object_unref(rval);
- return NULL;
+ device_open_device(rval, device_name, device_type, device_node);
+ return rval;
+}
+
+/*
+ * Tape Operations using the POSIX interface
+ */
+
+/* Having one name for every operation would be too easy. */
+#if !defined(MTCOMPRESSION) && defined(MTCOMP)
+# define MTCOMPRESSION MTCOMP
+#endif
+
+#if !defined(MTSETBLK) && defined(MTSETBSIZ)
+# define MTSETBLK MTSETBSIZ
+#endif
+
+#if !defined(MTEOM) && defined(MTEOD)
+# define MTEOM MTEOD
+#endif
+
+gboolean tape_rewind(int fd) {
+ int count = 5;
+ time_t stop_time;
+
+ /* We will retry this for up to 30 seconds or 5 retries,
+ whichever is less, because some hardware/software combinations
+ (notably EXB-8200 on FreeBSD) can fail to rewind. */
+ stop_time = time(NULL) + 30;
+
+ while (--count >= 0 && time(NULL) < stop_time) {
+ struct mtop mt;
+ mt.mt_op = MTREW;
+ mt.mt_count = 1;
+
+ if (0 == ioctl(fd, MTIOCTOP, &mt))
+ return TRUE;
+
+ sleep(3);
+ }
+
+ return FALSE;
+}
+
+gboolean tape_fsf(int fd, guint count) {
+ struct mtop mt;
+ mt.mt_op = MTFSF;
+ mt.mt_count = count;
+ return 0 == ioctl(fd, MTIOCTOP, &mt);
+}
+
+gboolean tape_bsf(int fd, guint count) {
+ struct mtop mt;
+ mt.mt_op = MTBSF;
+ mt.mt_count = count;
+ return 0 == ioctl(fd, MTIOCTOP, &mt);
+}
+
+gboolean tape_fsr(int fd, guint count) {
+ struct mtop mt;
+ mt.mt_op = MTFSR;
+ mt.mt_count = count;
+ return 0 == ioctl(fd, MTIOCTOP, &mt);
+}
+
+gboolean tape_bsr(int fd, guint count) {
+ struct mtop mt;
+ mt.mt_op = MTBSR;
+ mt.mt_count = count;
+ return 0 == ioctl(fd, MTIOCTOP, &mt);
+}
+
+gint tape_fileno(int fd) {
+ struct mtget get;
+
+ if (0 != ioctl(fd, MTIOCGET, &get))
+ return TAPE_POSITION_UNKNOWN;
+ if (get.mt_fileno < 0)
+ return TAPE_POSITION_UNKNOWN;
+ else
+ return get.mt_fileno;
+}
+
+gint tape_eod(int fd) {
+ struct mtop mt;
+ struct mtget get;
+ mt.mt_op = MTEOM;
+ mt.mt_count = 1;
+ if (0 != ioctl(fd, MTIOCTOP, &mt))
+ return TAPE_OP_ERROR;
+
+ /* Ignored result. This is just to flush buffers. */
+ mt.mt_op = MTNOP;
+ ioctl(fd, MTIOCTOP, &mt);
+
+ if (0 != ioctl(fd, MTIOCGET, &get))
+ return TAPE_POSITION_UNKNOWN;
+ if (get.mt_fileno < 0)
+ return TAPE_POSITION_UNKNOWN;
+ else
+ return get.mt_fileno;
+}
+
+gboolean tape_weof(int fd, guint8 count) {
+ struct mtop mt;
+ mt.mt_op = MTWEOF;
+ mt.mt_count = count;
+ return 0 == ioctl(fd, MTIOCTOP, &mt);
+}
+
+gboolean tape_setcompression(int fd G_GNUC_UNUSED,
+ gboolean on G_GNUC_UNUSED) {
+#ifdef MTCOMPRESSION
+ struct mtop mt;
+ mt.mt_op = MTCOMPRESSION;
+ mt.mt_count = on;
+ return 0 == ioctl(fd, MTIOCTOP, &mt);
+#else
+ return 0;
+#endif
+}
+
+gboolean tape_offl(int fd) {
+ struct mtop mt;
+ int safe_errno;
+
+ mt.mt_op = MTOFFL;
+ mt.mt_count = 1;
+ if (0 == ioctl(fd, MTIOCTOP, &mt))
+ return TRUE;
+
+ safe_errno = errno;
+ g_debug("tape_off: ioctl(MTIOCTOP/MTOFFL) failed: %s", strerror(errno));
+ errno = safe_errno;
+
+ return FALSE;
+}
+
+DeviceStatusFlags tape_is_tape_device(int fd) {
+ struct mtop mt;
+ mt.mt_op = MTNOP;
+ mt.mt_count = 1;
+ if (0 == ioctl(fd, MTIOCTOP, &mt)) {
+ return DEVICE_STATUS_SUCCESS;
+#ifdef ENOMEDIUM
+ } else if (errno == ENOMEDIUM) {
+ return DEVICE_STATUS_VOLUME_MISSING;
+#endif
} else {
- return rval;
+ g_debug("tape_is_tape_device: ioctl(MTIOCTOP/MTNOP) failed: %s",
+ strerror(errno));
+ if (errno == EIO) {
+ /* some devices return EIO while the drive is busy loading */
+ return DEVICE_STATUS_DEVICE_ERROR|DEVICE_STATUS_DEVICE_BUSY;
+ } else {
+ return DEVICE_STATUS_DEVICE_ERROR;
+ }
}
}
+
+DeviceStatusFlags tape_is_ready(int fd, TapeDevice *t_self G_GNUC_UNUSED) {
+ struct mtget get;
+ if (0 == ioctl(fd, MTIOCGET, &get)) {
+#if defined(GMT_ONLINE) || defined(GMT_DR_OPEN)
+ if (1
+#ifdef GMT_ONLINE
+ && (t_self->broken_gmt_online || GMT_ONLINE(get.mt_gstat))
+#endif
+#ifdef GMT_DR_OPEN
+ && !GMT_DR_OPEN(get.mt_gstat)
+#endif
+ ) {
+ return DEVICE_STATUS_SUCCESS;
+ } else {
+ return DEVICE_STATUS_VOLUME_MISSING;
+ }
+#else /* Neither macro is defined. */
+ return DEVICE_STATUS_SUCCESS;
+#endif
+ } else {
+ return DEVICE_STATUS_VOLUME_ERROR;
+ }
+}
+