Merge pull request #3 from moibenko/revert-2-mtx_jinr

Revert "Found problem with fullup of product ID and Serial Number"

README.md

@@ -0,0 +1,2 @@
+# mtx
+The MTX program controls the robotic mechanism in autoloaders and tape libraries. Taken from Sourceforge, patches from centOS were applied, plus my changes to allow to use mtx over library calls.

mtx-1.3.12/Makefile.in

@@ -3,16 +3,17 @@
 # USE GMAKE, NOT REGULAR BSD MAKE!)
 #
 # Valid targets:
-#  linux86 freebsd86 solarissparc sgi dec vms 
+#  linux86 freebsd86 solarissparc sgi dec vms
 #
 # Makefile changes by Lars Kellogg-Stedman for better integration with
-# GNU Autoconf. 
+# GNU Autoconf.
 
 # Version # for 'make dist'...
 VERSION=1.3.12
 
 BINS = mtx@EXEEXT@ tapeinfo@EXEEXT@ loaderinfo@EXEEXT@ scsitape@EXEEXT@ scsieject@EXEEXT@
 EXTRA_BINS = nsmhack@EXEEXT@
+LIB=libmtx.a
 DBGS := $(BINS:%@EXEEXT@=%.dbg)
 MAN = mtx.1 tapeinfo.1 loaderinfo.1 scsitape.1 scsieject.1
 MAN_HTML := $(MAN:%.1=%.html)
@@ -46,7 +47,7 @@ VPATH = $(srcdir)
 # Linux on x86...
 #
 ifeq ($(TARGET),linux)
-CFLAGS += -Wall
+CFLAGS += -Wall -fpic -O3
 CPPFLAGS	+= -DLONG_PRINT_REQUEST_SENSE=1
 endif
 
@@ -64,7 +65,7 @@ LIBS		+= -lcam
 endif
 
 ifeq ($(TARGET),hpux)
-CFLAGS += -O -D_HPUX_SOURCE -D __hpux__ 
+CFLAGS += -O -D_HPUX_SOURCE -D __hpux__
 endif
 
 #
@@ -105,7 +106,7 @@ else
 	strip $< -o $@
 endif
 
-all:	$(BINS)
+all:	$(BINS) $(LIB)
 
 dbgs: $(DBGS)
 
@@ -113,7 +114,7 @@ install: $(BINS)
 	$(INSTALL_DIR) $(DESTDIR)$(sbindir)
 	for file in $(BINS); do \
 	$(INSTALL_BIN) "$$file" $(DESTDIR)$(sbindir) ; \
-	done	
+	done
 	$(INSTALL_DIR) $(DESTDIR)$(mandir) $(DESTDIR)$(mandir)/man1
 	for file in mtx.1 tapeinfo.1 scsitape.1 scsieject.1 loaderinfo.1 ; do \
 	$(INSTALL_DOC) "$$file"  $(DESTDIR)$(mandir)/man1 ; \
@@ -132,7 +133,7 @@ distclean: clean
 	rm -f Makefile config.h config.log config.cache config.status
 
 dist: distclean
-	./makedist $(VERSION)	
+	./makedist $(VERSION)
 
 loaderinfo@EXEEXT@: loaderinfo.o mtxl.o mtxl.h mtx.h $(EXTRA)
 	$(CC) $(LDFLAGS) -o loaderinfo@EXEEXT@ loaderinfo.o mtxl.o $(EXTRA) $(LIBS)
@@ -143,7 +144,7 @@ nsmhack@EXEEXT@: nsmhack.o mtxl.o $(EXTRA)
 mtx@EXEEXT@: mtx.o mtxl.o mtxl.h mtx.h $(EXTRA)
 	$(CC) $(LDFLAGS) -o mtx@EXEEXT@ mtx.o mtxl.o $(EXTRA) $(LIBS)
 
-mam2debug@EXEEXT@: mtxl.o mam2debug.o mtx.h $(EXTRA)	
+mam2debug@EXEEXT@: mtxl.o mam2debug.o mtx.h $(EXTRA)
 	$(CC) $(LDFLAGS) -o mam2debug@EXEEXT@ mtxl.o mam2debug.o $(EXTRA) $(LIBS)
 
 tapeinfo@EXEEXT@: tapeinfo.o mtxl.o mtx.h mtxl.h $(EXTRA)
@@ -160,6 +161,9 @@ scsitape.o: scsitape.c mtx.h mtxl.h
 scsieject@EXEEXT@: scsieject.o mtxl.o mtxl.h mtx.h $(EXTRA)
 	$(CC) $(LDFLAGS) -o scsieject@EXEEXT@ scsieject.o mtxl.o $(EXTRA) $(LIBS)
 
+$(LIB): mtx.o mtxl.o
+	ar qvs contrib/$(LIB) mtx.o mtxl.o
+	$(CC) $(LDFLAGS) -shared -o contrib/libmtx.so mtx.o mtxl.o
 scsieject.o: scsieject.c mtx.h mtxl.h
 
 loaderinfo.o: loaderinfo.c mtx.h mtxl.h

mtx-1.3.12/mtx.c

@@ -31,15 +31,15 @@
 	Near complete re-write Feb 2000 Eric Lee Green <eric@badtux.org> to add support for
 	multi-drive tape changers, extract out library stuff into mtxl.c,
 	and otherwise bring things up to date for dealing with LARGE tape jukeboxes
-	and other such enterprise-class storage subsystems. 
+	and other such enterprise-class storage subsystems.
 */
 
 char *argv0;
-
+#include <ctype.h>
 #include "mtx.h"	/* various defines for bit order etc. */
 #include "mtxl.h"
 
-/* A table for printing out the peripheral device type as ASCII. */ 
+/* A table for printing out the peripheral device type as ASCII. */
 static char *PeripheralDeviceType[32] =
 {
 	"Disk Drive",			/* 0 */
@@ -49,10 +49,10 @@ static char *PeripheralDeviceType[32] =
 	"Write-once",			/* 4 */
 	"CD-ROM",				/* 5 */
 	"Scanner",				/* 6 */
-	"Optical",				/* 7 */ 
+	"Optical",				/* 7 */
 	"Medium Changer",		/* 8 */
 	"Communications",		/* 9 */
-	"ASC IT8",				/* a */ 
+	"ASC IT8",				/* a */
 	"ASC IT8",				/* b */
 	"RAID Array",			/* c */
 	"Enclosure Services",	/* d */
@@ -79,8 +79,8 @@ static char *PeripheralDeviceType[32] =
 static int argc;
 static char **argv;
 
-static char *device=NULL;		/* the device name passed as argument */
-
+char *device=NULL;		/* the device name passed as argument */
+int absolute_addressing=0; /* if not 0 -  use absolute adresses of storage and tranport elements as known to the robot */
 /*	Unfortunately this must be true for SGI, because SGI does not
 	use an int :-(.
 */
@@ -112,7 +112,7 @@ static void Transfer(void);
 static void Eepos(void);
 static void NoAttach(void);
 static void Version(void);
-static void do_Inventory(void); 
+static void do_Inventory(void);
 static void do_Unload(void);
 static void do_Erase(void);
 static void NoBarCode(void);
@@ -149,7 +149,7 @@ command_table[] =
 	{ 0, "erase", do_Erase, 1, 0},
 	{ 0, "nobarcode", NoBarCode, 0,0},
 	{ 1, "position", do_Position, 1, 1},
-	{ 0, "invert2", Invert2, 0, 0}, 
+	{ 0, "invert2", Invert2, 0, 0},
 	{ 3, "exchange", Exchange, 1, 1 },
 	{ 0, "altres", AltReadElementStatus, 0,0},
 	{ 0, NULL, NULL }
@@ -184,7 +184,7 @@ static void Usage()
 static void Version(void)
 {
 	fprintf(stderr, "mtx version %s\n\n", VERSION);
-	Usage(); 
+	Usage();
 }
 
 
@@ -258,7 +258,7 @@ static void First(void)
 		arg1 = ElementStatus->DataTransferElementSourceStorageElementNumber[driveno] + 1;
 		if (arg1 == 1)
 		{
-			printf("loading...done.\n");  /* it already has tape #1 in it! */ 
+			printf("loading...done.\n");  /* it already has tape #1 in it! */
 			return;
 		}
 		arg2 = driveno;
@@ -292,7 +292,7 @@ static void Last(void)
 		arg1 = ElementStatus->DataTransferElementSourceStorageElementNumber[driveno] + 1;
 		if (arg1 >= (ElementStatus->StorageElementCount - ElementStatus->ImportExportCount))
 		{
-			printf("loading...done.\n");	/* it already has last tape in it! */ 
+			printf("loading...done.\n");	/* it already has last tape in it! */
 			return;
 		}
 		arg2 = driveno;
@@ -392,7 +392,7 @@ static void Next(void)
 	FatalError("No More Media\n");		/* last slot */
 }
 
-static void do_Inventory(void) 
+static void do_Inventory(void)
 {
 	if (Inventory(MediumChangerFD) < 0)
 	{
@@ -420,7 +420,7 @@ static void do_Erase(void)
 		exit(1);	/* exit with an error status. */
 	}
 }
-	
+
 
 /* This should eject a tape or magazine, depending upon the device sent
  * to.
@@ -441,12 +441,12 @@ static void ReportInquiry(void)
 	int i;
 
 	Inquiry = RequestInquiry(MediumChangerFD,&RequestSense);
-	if (Inquiry == NULL) 
+	if (Inquiry == NULL)
 	{
 		PrintRequestSense(&RequestSense);
 		FatalError("INQUIRY Command Failed\n");
 	}
-	
+
 	printf("Product Type: %s\n", PeripheralDeviceType[Inquiry->PeripheralDeviceType]);
 	printf("Vendor ID: '");
 	for (i = 0; i < sizeof(Inquiry->VendorIdentification); i++)
@@ -484,6 +484,7 @@ static void Status(void)
 {
 	int StorageElementNumber;
 	int TransferElementNumber;
+	PhysicalLocation_T *phys_loc;
 
 	printf( "  Storage Changer %s:%d Drives, %d Slots ( %d Import/Export )\n",
 			device,
@@ -492,18 +493,45 @@ static void Status(void)
 			ElementStatus->ImportExportCount);
 
 
-	for (TransferElementNumber = 0; 
+	for (TransferElementNumber = 0;
 		 TransferElementNumber < ElementStatus->DataTransferElementCount;
 		 TransferElementNumber++)
 	{
-		
+	  if (absolute_addressing==0) {
 		printf("Data Transfer Element %d:", TransferElementNumber);
+	    }
+	  else {
+	        printf("Data Transfer Element %d ", ElementStatus->DataTransferElementAddress[TransferElementNumber]);
+		phys_loc = (PhysicalLocation_T *) &ElementStatus->DataTransferElementPhysicalLocation[TransferElementNumber];
+		if (ElementStatus->DataTransferElementSerialNumber[TransferElementNumber][0] == " ")
+		{
+		  printf("Phys Loc F%u,C%u,R%u,Z%u SN%s ID %s:",
+		       phys_loc->frame, phys_loc->column, phys_loc->row, phys_loc->zone,
+		       ElementStatus->DataTransferElementSerialNumber[TransferElementNumber],
+		       ElementStatus->DataTransferElementProductId[TransferElementNumber]
+		       );
+		}
+		else {
+		  printf("Phys Loc F%u,C%u,R%u,Z%u SN %s ID %s:",
+		       phys_loc->frame, phys_loc->column, phys_loc->row, phys_loc->zone,
+		       ElementStatus->DataTransferElementSerialNumber[TransferElementNumber],
+		       ElementStatus->DataTransferElementProductId[TransferElementNumber]
+		       );
+		}
+
+	  }
 		if (ElementStatus->DataTransferElementFull[TransferElementNumber])
 		{
 			if (ElementStatus->DataTransferElementSourceStorageElementNumber[TransferElementNumber] > -1)
 			{
-				printf("Full (Storage Element %d Loaded)",
-						ElementStatus->DataTransferElementSourceStorageElementNumber[TransferElementNumber]+1);
+			  if (absolute_addressing==0) {
+			      printf("Full (Storage Element %d Loaded)",
+				     ElementStatus->DataTransferElementSourceStorageElementNumber[TransferElementNumber]+1);
+			    }
+			  else {
+			    printf("Full (Storage Element %d Loaded)",
+				   ElementStatus->StorageElementAddress[TransferElementNumber]);
+			  }
 			}
 			else
 			{
@@ -517,7 +545,7 @@ static void Status(void)
 
 			if (ElementStatus->DataTransferAlternateVolumeTag[TransferElementNumber][0])
 			{
-				printf(":AlternateVolumeTag = %s", ElementStatus->DataTransferAlternateVolumeTag[TransferElementNumber]); 
+				printf(":AlternateVolumeTag = %s", ElementStatus->DataTransferAlternateVolumeTag[TransferElementNumber]);
 			}
 			putchar('\n');
 		}
@@ -531,9 +559,35 @@ static void Status(void)
 		 StorageElementNumber < ElementStatus->StorageElementCount;
 		 StorageElementNumber++)
 	{
+	  if (absolute_addressing==0) {
 		printf(	"      Storage Element %d%s:%s", StorageElementNumber + 1,
 				(ElementStatus->StorageElementIsImportExport[StorageElementNumber]) ? " IMPORT/EXPORT" : "",
 				(ElementStatus->StorageElementFull[StorageElementNumber] ? "Full " : "Empty"));
+	    }
+	  else {
+	    /* some libraries return garbage in physical location */
+	    /* see if entry has non-printable character */
+	    int sl = strlen(ElementStatus->StorageElementPhysicalLocation[StorageElementNumber]);
+	    int sind = 0;
+
+	    if (sl > 1) {
+	      for (sind = 0; sind < sl; sind++) 
+	      {
+		if ( !isprint(ElementStatus->StorageElementPhysicalLocation[StorageElementNumber][sind])) {
+		    ElementStatus->StorageElementPhysicalLocation[StorageElementNumber][0] = 0;
+		    break;
+		}
+	      }
+	    }
+	    else {
+	      ElementStatus->StorageElementPhysicalLocation[StorageElementNumber][0] = 0;
+	    }  
+		
+	    printf(	"      Storage Element %d Phys Loc %s %s:%s ", ElementStatus->StorageElementAddress[StorageElementNumber],
+			ElementStatus->StorageElementPhysicalLocation[StorageElementNumber],
+			(ElementStatus->StorageElementIsImportExport[StorageElementNumber]) ? " IMPORT/EXPORT" : "",
+			(ElementStatus->StorageElementFull[StorageElementNumber] ? "Full " : "Empty"));
+	  }
 
 		if (ElementStatus->PrimaryVolumeTag[StorageElementNumber][0])
 		{
@@ -562,7 +616,7 @@ void Position(int dest)
 
 void Move(int src, int dest) {
 	RequestSense_T *result; /* from MoveMedium */
-	
+
 	result = MoveMedium(MediumChangerFD, src, dest, ElementStatus, inquiry_info, &SCSI_Flags);
 	if (result)
 	{
@@ -597,6 +651,21 @@ void Move(int src, int dest) {
 	}
 }
 
+void Test_UnitReady(void)
+{
+  int result;
+
+  result = testUnitReady(MediumChangerFD);
+  if (result == 0)
+    {
+      printf("Ready:yes\n");
+    }
+  else
+    {
+      printf("Ready:no\n");
+    }
+}
+
 
 /* okay, now for the Load, Unload, etc. logic: */
 
@@ -620,7 +689,7 @@ static void Load(void)
 	if (!device_opened)
 	{
 		FatalError("No Media Changer Device Specified\n");
-	} 
+	}
 
 	if (arg1 < 0 || arg1 >= ElementStatus->StorageElementCount)
 	{
@@ -724,7 +793,7 @@ static void Exchange(void)
 	src = ElementStatus->StorageElementAddress[arg1 - 1];
 	dest = ElementStatus->StorageElementAddress[arg2 - 1];
 	dest2 = ElementStatus->StorageElementAddress[arg3 - 1];
-	
+
 	result = ExchangeMedium(MediumChangerFD, src, dest, dest2, ElementStatus, &SCSI_Flags);
 	if (result)
 	{
@@ -783,7 +852,7 @@ static void Unload(void)
 	if (!device_opened)
 	{
 		FatalError("No Media Changer Device Specified\n");
-	} 
+	}
 
 	/* okay, we should be there: */
 	if (arg1 < 0)
@@ -840,7 +909,7 @@ static void Unload(void)
 	}
 
 	fprintf(stdout, "Unloading drive %d into Storage Element %d...", arg2, arg1 + 1);
-	fflush(stdout); /* make it real-time :-( */ 
+	fflush(stdout); /* make it real-time :-( */
 
 	Move(src,dest);
 
@@ -852,7 +921,7 @@ static void Unload(void)
 }
 
 /*****************************************************************
- ** ARGUMENT PARSING SUBROUTINES: Parse arguments, dispatch. 
+ ** ARGUMENT PARSING SUBROUTINES: Parse arguments, dispatch.
  *****************************************************************/
 
 /* ***
@@ -860,9 +929,9 @@ static void Unload(void)
  *
  * If we have an actual argument at the index position indicated (i.e. we
  * have not gone off the edge of the world), we return
- * its number. If we don't, or it's not a numeric argument, 
- * we return -1. Note that 'get_arg' is kind of misleading, we only accept 
- * numeric arguments, not any other kind. 
+ * its number. If we don't, or it's not a numeric argument,
+ * we return -1. Note that 'get_arg' is kind of misleading, we only accept
+ * numeric arguments, not any other kind.
  */
 int get_arg(int idx)
 {
@@ -898,12 +967,11 @@ void open_device(void)
 
 
 /* we see if we've got a file open. If not, we open one :-(. Then
- * we execute the actual command. Or not :-(. 
- */ 
+ * we execute the actual command. Or not :-(.
+ */
 void execute_command(struct command_table_struct *command)
 {
 	RequestSense_T RequestSense;
-
 	if (device == NULL && command->need_device)
 	{
 		/* try to get it from TAPE environment variable... */
@@ -918,7 +986,11 @@ void execute_command(struct command_table_struct *command)
 		}
 		open_device();
 	}
-
+	if (command->need_status && absolute_addressing)
+	{
+	  FreeElementData(ElementStatus);
+	  ElementStatus = NULL;
+	}
 	if (!ElementStatus && command->need_status)
 	{
 		inquiry_info = RequestInquiry(MediumChangerFD,&RequestSense);
@@ -932,7 +1004,7 @@ void execute_command(struct command_table_struct *command)
 		if (!ElementStatus)
 		{
 			PrintRequestSense(&RequestSense);
-			FatalError("READ ELEMENT STATUS Command Failed\n"); 
+			FatalError("READ ELEMENT STATUS Command Failed\n");
 		}
 	}
 
@@ -946,8 +1018,8 @@ void execute_command(struct command_table_struct *command)
  * load in another tape into drive 0, and we execute these commands one
  * at a time as we come to them. If we don't have a -f at the start, we
  * barf. If we leave out a drive #, we default to drive 0 (the first drive
- * in the cabinet). 
- */ 
+ * in the cabinet).
+ */
 
 int parse_args(void)
 {
@@ -1008,7 +1080,7 @@ int parse_args(void)
 
 				if (command->num_args>=2 && arg1 != -1)
 				{
-					arg2 = get_arg(i); 
+					arg2 = get_arg(i);
 					if (arg2 != -1)
 					{
 						i++;
@@ -1035,6 +1107,15 @@ int parse_args(void)
 	return 0;
 }
 
+void set_scsi_timeout(int timeout) /* in seconds */
+{
+  set_timeout(timeout);
+}
+
+int get_scsi_timeout(void)
+{
+  return get_timeout();
+}
 
 
 int main(int ArgCount, char *ArgVector[])
@@ -1064,7 +1145,7 @@ int main(int ArgCount, char *ArgVector[])
 		if (!ElementStatus)
 		{
 			PrintRequestSense(&RequestSense);
-			FatalError("READ ELEMENT STATUS Command Failed\n"); 
+			FatalError("READ ELEMENT STATUS Command Failed\n");
 		}
 		VMS_DefineStatusSymbols();
 		SCSI_CloseDevice(device, MediumChangerFD);

mtx-1.3.12/mtx.h

@@ -209,6 +209,7 @@ typedef struct SCSI_Flags_Struct
 	int has_barcodes;
 	int querytype; //MTX_ELEMENTSTATUS
 	unsigned char invert2; /* used for EXCHANGE command, sigh. */
+        int absolute_addressing; /* indicates that asolute addresses are required */
 }	SCSI_Flags_T;
 
 #ifdef _MSC_VER
@@ -306,6 +307,16 @@ typedef struct Inquiry
 }
 Inquiry_T;
 
+typedef struct InquiryShort
+{
+  unsigned char pad[2];
+  unsigned char VendorIdentification[8];		/* Bytes 8-15 */
+  unsigned char ProductIdentification[16];		/* Bytes 16-31 */
+  unsigned char SerialNumber[12];		/* Bytes 32-43 */
+  
+}
+InquiryShort_T;
+
 /* Hockey Pux may define these. If so, *UN*define them. */
 #ifdef ILI
 #undef ILI
@@ -499,6 +510,15 @@ typedef struct TransportElementDescriptorShort
 }
 TransportElementDescriptorShort_T;
 
+typedef struct PhysicalLocation
+{
+  unsigned char zone :1;
+  unsigned char : 3;
+  unsigned char row: 4;
+  unsigned char column :3;
+  unsigned char frame  :5;
+} PhysicalLocation_T;
+
 
 typedef struct TransportElementDescriptor
 {
@@ -545,6 +565,7 @@ TransportElementDescriptor_T;
 /* Now for element status data; */
 
 typedef unsigned char barcode[37];
+typedef unsigned char serialnumber[13];
 
 typedef struct ElementStatus {
 
@@ -553,6 +574,10 @@ typedef struct ElementStatus {
   int DataTransferElementCount;
   int *DataTransferElementAddress;  /* array. */
   int *DataTransferElementSourceStorageElementNumber; /* array */
+  int *DataTransferElementPhysicalLocation; /*array */ 
+  serialnumber *DataTransferElementProductId; /*array */ 
+  serialnumber *DataTransferElementSerialNumber; /*array */ 
+  barcode *StorageElementPhysicalLocation; /*array */ 
   barcode *DataTransferPrimaryVolumeTag; /* array. */
   barcode *DataTransferAlternateVolumeTag; /* array. */
   barcode *PrimaryVolumeTag;  /* array */

mtx-1.3.12/mtx.spec

@@ -1,20 +1,10 @@
 Name: mtx
 Version: 1.3.12
-Release: 14%{?dist}
+Release: 15fnal%{?dist}
 Summary: SCSI media changer control program
 License: GPLv2
 Group: Applications/System
-Source0: http://downloads.sourceforge.net/%{name}/%{name}-%{version}.tar.gz
-# http://mtx.opensource-sw.net/bugs/view.php?id=9
-Patch0: %{name}-1.3.12-destdir.patch
-# http://mtx.opensource-sw.net/bugs/view.php?id=13
-# https://bugzilla.redhat.com/show_bug.cgi?id=538403
-Patch1: %{name}-1.3.12-argc.patch
-Patch2: emc-fix-fail-with-too-high-slot-count_cleanupver.patch
-Patch3: mtx-1.3.12-fix-resource-leak.patch
-Patch4: mtx-1.3.12-scsitape-usage--add-erase.patch
-Patch5: mtx-1.3.12-man-Document-mtx-eject-and-previous-operations.patch
-URL: http://mtx.sourceforge.net/
+Source0: mtx-1.3.12.tgz
 BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
 
 
@@ -28,17 +18,11 @@ Breece Hill, HP, and Seagate.
 If you have a backup tape device capable of handling more than one
 tape at a time, you should install MTX.
 
+This is FNAL version of mtx rpm with mtx library.
 
 %prep
 %setup -q
 
-%patch0 -p2 -b .destdir
-%patch1 -p2 -b .argc
-%patch2 -p1 -b .emc_slot_count
-%patch3 -p1 -b .fixresourceleak
-%patch4 -p1 -b .scsitape_adderase
-%patch5 -p1 -b .mtxman1upd
-
 # remove exec permission
 chmod a-x contrib/config_sgen_solaris.sh contrib/mtx-changer
 
@@ -67,6 +51,14 @@ rm -rf $RPM_BUILD_ROOT
 
 
 %changelog
+* Wed Jan 23 2019 Alexander Moibenko <moibenko@fnal.gov> - 1.3.12-15fnal
+- For absolute_addressing refresh elements data when status command is executed. This is needed to update tape library infortion in the calling program.
+- Changes to allow to use mtx as library and show absolute transfer and storage elements as output of status call
+* Wed Aug 1 2018 Alexander Moibenko <moibenko@fnal.gov> - 1.3.12-14fnal
+- All patches applied to code and new source mtx.tgz created to build rpm
+- Changes to allow to use mtx as library and show absolute transfer and storage elements as output of status call
+* Tue Jul 31 2018 Alexander Moibenko <moibenko@fnal.gov> - 1.3.12-14fnal_p
+- Changes to allow to use mtx as library and show absolute transfer and storage elements as output of status call
 * Wed Mar 16 2016 David Sommerseth <davids@redhat.com> - 1.3.12-14
 - Update scsitape --help screen to show the erase command and improved mtx.1 man page (#948459)
 
@@ -220,14 +212,14 @@ rm -rf $RPM_BUILD_ROOT
 * Thu Jun 15 2000 Preston Brown <pbrown@redhat.com>
 - 1.2.7
 
-* Tue May 23 2000 Preston Brown <pbrown@redhat.com> 
+* Tue May 23 2000 Preston Brown <pbrown@redhat.com>
 - adopted for Winston
 
 * Fri May 12 2000 Kenneth Porter <shiva@well.com>
 - 1.2.6
 - Fixed 'eepos' stuff to use | rather than || (whoops!)
 - Accept a 4-byte element descriptor for the robot arm for certain older
-- autochangers. 
+- autochangers.
 
 * Mon May 8 2000 Kenneth Porter <shiva@well.com>
 - Spell sourceforge right so the link at rpmfind.net will work.

mtx-1.3.12/mtxl.c

@@ -23,18 +23,18 @@
 
 /*
  *	FatalError: changed Feb. 2000 elg@badtux.org to eliminate a buffer
- *	overflow :-(. That could be important if mtxl is SUID for some reason. 
+ *	overflow :-(. That could be important if mtxl is SUID for some reason.
 */
 
 #include "mtx.h"
 #include "mtxl.h"
 
 /* #define DEBUG_NSM 1 */
-
+/* #define DEBUG_BARCODE */
 /* #define DEBUG_MODE_SENSE 1 */
 /* #define DEBUG */
 /* #define DEBUG_SCSI */
-#define __WEIRD_CHAR_SUPPRESS 1 
+#define __WEIRD_CHAR_SUPPRESS 1
 
 /* zap the following define when we finally add real import/export support */
 #define IMPORT_EXPORT_HACK 1 /* for the moment, import/export == storage */
@@ -100,7 +100,7 @@ Inquiry_T *RequestInquiry(DEVICE_TYPE fd, RequestSense_T *RequestSense)
 	Inquiry_T *Inquiry;
 	CDB_T CDB;
 
-	Inquiry = (Inquiry_T *) xmalloc(sizeof(Inquiry_T));  
+	Inquiry = (Inquiry_T *) xmalloc(sizeof(Inquiry_T));
 
 	CDB[0] = 0x12;		/* INQUIRY */
 	CDB[1] = 0;			/* EVPD = 0 */
@@ -231,7 +231,8 @@ void FatalError(char *ErrorMessage, ...)
 	va_end(ArgumentPointer);
 
 #ifndef VMS
-	exit(1);
+	//exit(1);
+	return; /* if used as library routine it can not exit, because this would terminate the caller */
 #else
 	sys$exit(VMS_ExitCode);
 #endif
@@ -280,10 +281,10 @@ int max(int x, int y)
 
 
 /* Okay, this is a hack for the NSM modular jukebox series, which
- * uses the "SEND DIAGNOSTIC" command to do shit. 
+ * uses the "SEND DIAGNOSTIC" command to do shit.
  */
 
-int SendNSMHack(DEVICE_TYPE MediumChangerFD, NSM_Param_T *nsm_command, 
+int SendNSMHack(DEVICE_TYPE MediumChangerFD, NSM_Param_T *nsm_command,
 		int param_len, int timeout)
 {
 	CDB_T CDB;
@@ -362,7 +363,7 @@ NSM_Result_T *RecNSMHack(	DEVICE_TYPE MediumChangerFD,
 
 /* Routine to inventory the library. Needed by, e.g., some Breece Hill
  * loaders. Sends an INITIALIZE_ELEMENT_STATUS command. This command
- * has no parameters, such as a range to scan :-(. 
+ * has no parameters, such as a range to scan :-(.
  */
 
 int Inventory(DEVICE_TYPE MediumChangerFD)
@@ -370,7 +371,7 @@ int Inventory(DEVICE_TYPE MediumChangerFD)
 	CDB_T	CDB;
 
 	/* okay, now for the command: */
-	CDB[0] = 0x07; 
+	CDB[0] = 0x07;
 	CDB[1] = CDB[2] = CDB[3] = CDB[4] = CDB[5] = 0;
 
 	/* set us a very long timeout, sigh... */
@@ -394,8 +395,8 @@ int Inventory(DEVICE_TYPE MediumChangerFD)
 /* Routine to read the Mode Sense Element Address Assignment Page */
 /* We try to read the page. If we can't read the page, we return NULL.
  * Our caller really isn't too worried about why we could not read the
- * page, it will simply default to some kind of default values. 
- */ 
+ * page, it will simply default to some kind of default values.
+ */
 ElementModeSense_T *ReadAssignmentPage(DEVICE_TYPE MediumChangerFD)
 {
 	CDB_T CDB;
@@ -405,7 +406,7 @@ ElementModeSense_T *ReadAssignmentPage(DEVICE_TYPE MediumChangerFD)
 
 	/* okay, now for the command: */
 	CDB[0] = 0x1A; /* Mode Sense(6) */
-	CDB[1] = 0x08; 
+	CDB[1] = 0x08;
 	CDB[2] = 0x1D; /* Mode Sense Element Address Assignment Page */
 	CDB[3] = 0;
 	CDB[4] = 136; /* allocation_length... */
@@ -482,7 +483,7 @@ ElementModeSense_T *ReadAssignmentPage(DEVICE_TYPE MediumChangerFD)
 		((int)sense_page->NumStorageHi << 8) + sense_page->NumStorageLo;
 
 	retval->ImportExportStart =
-		((int)sense_page->ImportExportStartHi << 8) + sense_page->ImportExportStartLo; 
+		((int)sense_page->ImportExportStartHi << 8) + sense_page->ImportExportStartLo;
 
 	retval->NumImportExport =
 		((int)sense_page->NumImportExportHi << 8) + sense_page->NumImportExportLo;
@@ -494,7 +495,7 @@ ElementModeSense_T *ReadAssignmentPage(DEVICE_TYPE MediumChangerFD)
 		((int)sense_page->NumDataTransferHi << 8) + sense_page->NumDataTransferLo;
 
 	/* allocate a couple spares 'cause some HP autochangers and maybe others
-	* don't properly report the robotics arm(s) count here... 
+	* don't properly report the robotics arm(s) count here...
 	*/
 	retval->NumElements =
 		retval->NumStorage+retval->NumImportExport +
@@ -522,10 +523,18 @@ ElementModeSense_T *ReadAssignmentPage(DEVICE_TYPE MediumChangerFD)
 	return retval;
 }
 
-static void FreeElementData(ElementStatus_T *data)
+void FreeElementData(ElementStatus_T *data)
 {
+        if (!data) 
+	{
+	    return;
+	}
 	free(data->DataTransferElementAddress);
 	free(data->DataTransferElementSourceStorageElementNumber);
+	free(data->DataTransferElementPhysicalLocation);
+	free(data->DataTransferElementProductId);
+	free(data->DataTransferElementSerialNumber);
+	free(data->StorageElementPhysicalLocation);
 	free(data->DataTransferPrimaryVolumeTag);
 	free(data->DataTransferAlternateVolumeTag);
 	free(data->PrimaryVolumeTag);
@@ -549,8 +558,16 @@ static ElementStatus_T *AllocateElementData(ElementModeSense_T *mode_sense)
 
 	retval->DataTransferElementAddress =
 		(int *)xzmalloc(sizeof(int) * (mode_sense->NumDataTransfer + 1));
-	retval->DataTransferElementSourceStorageElementNumber = 
+	retval->DataTransferElementSourceStorageElementNumber =
 		(int *)xzmalloc(sizeof(int) * (mode_sense->NumDataTransfer + 1));
+	retval->DataTransferElementPhysicalLocation =
+		(int *)xzmalloc(sizeof(int) * (mode_sense->NumDataTransfer + 1));
+	retval->DataTransferElementProductId =
+		(serialnumber *)xzmalloc(sizeof(serialnumber) * (mode_sense->NumDataTransfer + 1));
+	retval->DataTransferElementSerialNumber =
+		(serialnumber *)xzmalloc(sizeof(serialnumber) * (mode_sense->NumDataTransfer + 1));
+	retval->StorageElementPhysicalLocation =
+		(barcode *)xzmalloc(sizeof(barcode) * (mode_sense->NumStorage + 1));
 	retval->DataTransferPrimaryVolumeTag =
 		(barcode *)xzmalloc(sizeof(barcode) * (mode_sense->NumDataTransfer + 1));
 	retval->DataTransferAlternateVolumeTag =
@@ -587,14 +604,42 @@ void copy_barcode(unsigned char *src, unsigned char *dest)
 
 		dest++;
 	}
-	*dest = 0; /* null-terminate */ 
+	*dest = 0; /* null-terminate */
+}
+
+void copy_physical_location(unsigned char *src, unsigned char *dest)
+{
+  while ((*src< 32) || (*src > 127)) {
+    src++;
+  }
+  strcpy((char *)dest, (char *)src);
+}
+
+void copy_char_buffer(unsigned char *src, unsigned char *dest, int num)
+{
+  int i;
+  while ((*src< 32) || (*src > 127)) {
+    src++;
+  }
+  for (i=0; i < num; i++)
+ {
+   *dest = *src++;
+   
+   if ((*dest < 32) || (*dest > 127))
+     {
+       *dest = 0;
+       break;
+     }
+   dest++;
+ }
+ *dest = 0; 
 }
 
 /* This #%!@# routine has more parameters than I can count! */
 static unsigned char *SendElementStatusRequestActual(
 					DEVICE_TYPE MediumChangerFD,
 					RequestSense_T *RequestSense,
-					Inquiry_T *inquiry_info, 
+					Inquiry_T *inquiry_info,
 					SCSI_Flags_T *flags,
 					int ElementStart,
 					int NumElements,
@@ -609,7 +654,7 @@ static unsigned char *SendElementStatusRequestActual(
 #ifdef HAVE_GET_ID_LUN
 	scsi_id_t *scsi_id;
 #endif
-	if (inquiry_info->MChngr && 
+	if (inquiry_info->MChngr &&
 		inquiry_info->PeripheralDeviceType != MEDIUM_CHANGER_TYPE)
 	{
 		is_attached = true;
@@ -617,7 +662,7 @@ static unsigned char *SendElementStatusRequestActual(
 
 	if (flags->no_attached)
 	{
-		/* override, sigh */ 
+		/* override, sigh */
 		is_attached = false;
 	}
 
@@ -633,11 +678,11 @@ static unsigned char *SendElementStatusRequestActual(
 
 	if (is_attached)
 	{
-		CDB[0] = 0xB4;  /* whoops, READ_ELEMENT_STATUS_ATTACHED! */ 
+		CDB[0] = 0xB4;  /* whoops, READ_ELEMENT_STATUS_ATTACHED! */
 	}
 
 #ifdef HAVE_GET_ID_LUN
-	CDB[1] = (scsi_id->lun << 5) | ((flags->no_barcodes) ? 
+	CDB[1] = (scsi_id->lun << 5) | ((flags->no_barcodes) ?
 		0 : 0x10) | flags->elementtype;  /* Lun + VolTag + Type code */
 	free(scsi_id);
 #else
@@ -653,6 +698,9 @@ static unsigned char *SendElementStatusRequestActual(
 	CDB[5]= (unsigned char)NumElements;
 
 	CDB[6] = 0;			/* Reserved */
+	if (((flags->elementtype == DataTransferElement || flags->elementtype == StorageElement)) && (flags->absolute_addressing == 1)) {
+	  CDB[6] = 0x01;			/* set DVCID to read physical location */
+	}
 
 	/* allocation length */
 	CDB[7]= (unsigned char)(NumBytes >> 16);
@@ -677,7 +725,7 @@ static unsigned char *SendElementStatusRequestActual(
 
 		/*
 			First see if we have sense key of 'illegal request',
-			additional sense code of '24', additional sense qualfier of 
+			additional sense code of '24', additional sense qualfier of
 			'0', and field in error of '4'. This means that we issued a request
 			w/bar code reader and did not have one, thus must re-issue the request
 			w/out barcode :-(.
@@ -721,15 +769,15 @@ static unsigned char *SendElementStatusRequestActual(
 	/* print a bunch of extra debug data :-(.  */
 	PrintRequestSense(RequestSense); /* see what it sez :-(. */
 	fprintf(stderr,"Data:\n");
-	PrintHex(2, DataBuffer, 40);
-#endif  
+	PrintHex(2, DataBuffer, 100);
+#endif
 	return DataBuffer; /* we succeeded! */
 }
 
 
 unsigned char *SendElementStatusRequest(DEVICE_TYPE MediumChangerFD,
 										RequestSense_T *RequestSense,
-										Inquiry_T *inquiry_info, 
+										Inquiry_T *inquiry_info,
 										SCSI_Flags_T *flags,
 										int ElementStart,
 										int NumElements,
@@ -750,7 +798,7 @@ unsigned char *SendElementStatusRequest(DEVICE_TYPE MediumChangerFD,
 	/*
 		One weird loader wants either 8 or BYTE_COUNT_OF_REPORT
 		values for the ALLOCATION_LENGTH. Give it what it wants
-		if we get an Sense Key of 05 Illegal Request with a 
+		if we get an Sense Key of 05 Illegal Request with a
 		CDB position of 7 as the field in error.
 	*/
 
@@ -805,12 +853,13 @@ unsigned char *SendElementStatusRequest(DEVICE_TYPE MediumChangerFD,
  */
 
 static void ParseElementStatus(	int *EmptyStorageElementAddress,
-								int *EmptyStorageElementCount,
-								unsigned char *DataBuffer,
-								ElementStatus_T *ElementStatus,
-								ElementModeSense_T *mode_sense,
-								int *pNextElement
-								)
+				int *EmptyStorageElementCount,
+				unsigned char *DataBuffer,
+				ElementStatus_T *ElementStatus,
+				ElementModeSense_T *mode_sense,
+				int *pNextElement,
+				boolean absolute_address
+				)
 {
 	unsigned char *DataPointer = DataBuffer;
 	TransportElementDescriptor_T TEBuf;
@@ -882,7 +931,7 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
 		{
 			/* TransportElementDescriptor =
 			(TransportElementDescriptor_T *) DataPointer; */
-			memcpy(&TEBuf, DataPointer, 
+			memcpy(&TEBuf, DataPointer,
 				(TransportElementDescriptorLength <= sizeof(TEBuf)) ?
 					TransportElementDescriptorLength  :
 					sizeof(TEBuf));
@@ -909,7 +958,7 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
 			case MediumTransportElement:
 				ElementStatus->TransportElementAddress = BigEndian16(TransportElementDescriptor->ElementAddress);
 #ifdef DEBUG
-				fprintf(stderr,"TransportElementAddress=%d\n",ElementStatus->TransportElementAddress); 
+				fprintf(stderr,"TransportElementAddress=%d\n",ElementStatus->TransportElementAddress);
 #endif
 				break;
 
@@ -936,7 +985,7 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
 				ElementStatus->StorageElementFull[ImportExportIndex] =
 					TransportElementDescriptor->Full;
 
-				if ( (TransportElementDescriptorLength > 11) && 
+				if ( (TransportElementDescriptorLength > 11) &&
 					(ElementStatusPage->VolBits & E2_AVOLTAG))
 				{
 					copy_barcode(TransportElementDescriptor->AlternateVolumeTag,
@@ -945,8 +994,8 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
 				else
 				{
 					ElementStatus->AlternateVolumeTag[ImportExportIndex][0] = 0;  /* null string. */;
-				} 
-				if ((TransportElementDescriptorLength > 11) && 
+				}
+				if ((TransportElementDescriptorLength > 11) &&
 					(ElementStatusPage->VolBits & E2_PVOLTAG))
 				{
 					copy_barcode(TransportElementDescriptor->PrimaryVolumeTag,
@@ -967,8 +1016,8 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
 				fprintf(stderr,"StorageElementCount=%d  ElementAddress = %d ",ElementStatus->StorageElementCount,BigEndian16(TransportElementDescriptor->ElementAddress));
 #endif
 				/* ATL/Exabyte kludge -- skip slots that aren't installed :-( */
-				if (TransportElementDescriptor->AdditionalSenseCode==0x83 && 
-					TransportElementDescriptor->AdditionalSenseCodeQualifier==0x02) 
+				if (TransportElementDescriptor->AdditionalSenseCode==0x83 &&
+					TransportElementDescriptor->AdditionalSenseCodeQualifier==0x02)
 					continue;
 
 				ElementStatus->StorageElementAddress[ElementStatus->StorageElementCount] =
@@ -986,17 +1035,11 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
 						ElementStatus->StorageElementCount; /* slot idx. */
 					/*   ElementStatus->StorageElementAddress[ElementStatus->StorageElementCount]; */
 				}
-				if ((TransportElementDescriptorLength >  11) && 
-					(ElementStatusPage->VolBits & E2_AVOLTAG))
-				{
-					copy_barcode(TransportElementDescriptor->AlternateVolumeTag,
-						ElementStatus->AlternateVolumeTag[ElementStatus->StorageElementCount]);
-				}
 				else
 				{
 					ElementStatus->AlternateVolumeTag[ElementStatus->StorageElementCount][0]=0;  /* null string. */;
-				} 
-				if ((TransportElementDescriptorLength > 11) && 
+				}
+				if ((TransportElementDescriptorLength > 11) &&
 					(ElementStatusPage->VolBits & E2_PVOLTAG))
 				{
 					copy_barcode(TransportElementDescriptor->PrimaryVolumeTag,
@@ -1006,12 +1049,16 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
 				{
 					ElementStatus->PrimaryVolumeTag[ElementStatus->StorageElementCount][0]=0; /* null string. */
 				}
-
+				
+				if (absolute_address){
+				  copy_physical_location(TransportElementDescriptor->AlternateVolumeTag, ElementStatus->StorageElementPhysicalLocation[ElementStatus->StorageElementCount]);
+				}
+				
 				ElementStatus->StorageElementCount++;
 				/*
-					Note that the original mtx had no check here for 
+					Note that the original mtx had no check here for
 					buffer overflow, though some drives might mistakingly
-					do one... 
+					do one...
 				*/
 
 				if (ElementStatus->StorageElementCount > mode_sense->NumStorage)
@@ -1033,37 +1080,63 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
 				report that they have a 2nd tape drive when they don't. We
 				could generalize this in an ideal world, but my attempt to
 				do so failed with dual-drive Exabyte tape libraries that
-				*DID* have the second drive. Sigh. 
+				*DID* have the second drive. Sigh.
 				*/
-				if (TransportElementDescriptor->AdditionalSenseCode==0x83 && 
+				if (TransportElementDescriptor->AdditionalSenseCode==0x83 &&
 					TransportElementDescriptor->AdditionalSenseCodeQualifier==0x04)
 				{
 					continue;
 				}
 
 				/*	generalize it. Does it work? Let's try it! */
-				/*	
+				/*
 					No, dammit, following does not work on dual-drive Exabyte
 					'cause if a tape is in the drive, it sets the AdditionalSense
 					code to something (sigh).
 				*/
 				/* if (TransportElementDescriptor->AdditionalSenseCode!=0)
 					continue;
-				*/ 
+				*/
 
+				if (absolute_address){
+				  ElementStatus->DataTransferElementPhysicalLocation[ElementStatus->DataTransferElementCount] = 
+				    BigEndian16(TransportElementDescriptor->SourceStorageElementAddress);
+				  InquiryShort_T *inqs;
+				  inqs = (InquiryShort_T *) TransportElementDescriptor->PrimaryVolumeTag;
+				  /* This is a hack to differentiate TS4500 and TFinity returned data */
+				  /* For TFinity 
+				     inqs->VendorIdentification[0] == 0x0
+				     and inqs->VendorIdentification[1] == 0x20
+				  */
+				      if (inqs->VendorIdentification[0] == 0x0 && inqs->VendorIdentification[1] == 0x20)
+				  {
+				    
+				    unsigned char * cptr;
+				    cptr = (unsigned char *) &inqs->VendorIdentification[2];
+				    copy_char_buffer(cptr, ElementStatus->DataTransferElementSerialNumber[ElementStatus->DataTransferElementCount], 12);
+				  }
+				  else
+				  {
+
+				    copy_char_buffer(inqs->SerialNumber, ElementStatus->DataTransferElementSerialNumber[ElementStatus->DataTransferElementCount], 12);
+				    copy_char_buffer(inqs->ProductIdentification+2, ElementStatus->DataTransferElementProductId[ElementStatus->DataTransferElementCount], 12);
+				  }
+				  ElementStatus->DataTransferElementCount++;
+				  break;
+				    }
 				ElementStatus->DataTransferElementAddress[ElementStatus->DataTransferElementCount] =
 					BigEndian16(TransportElementDescriptor->ElementAddress);
-				ElementStatus->DataTransferElementFull[ElementStatus->DataTransferElementCount] = 
+				ElementStatus->DataTransferElementFull[ElementStatus->DataTransferElementCount] =
 					TransportElementDescriptor->Full;
 				ElementStatus->DataTransferElementSourceStorageElementNumber[ElementStatus->DataTransferElementCount] =
-					BigEndian16(TransportElementDescriptor->SourceStorageElementAddress);
+				  BigEndian16(TransportElementDescriptor->SourceStorageElementAddress);
 
 #ifdef DEBUG
-				fprintf(stderr, "%d: ElementAddress = %d, Full = %d, SourceElement = %d\n", 
-						ElementStatus->DataTransferElementCount,
-						ElementStatus->DataTransferElementAddress[ElementStatus->DataTransferElementCount],
-						ElementStatus->DataTransferElementFull[ElementStatus->DataTransferElementCount],
-						ElementStatus->DataTransferElementSourceStorageElementNumber[ElementStatus->DataTransferElementCount]);
+				fprintf(stderr, "%d: ElementAddress = %d, Full = %d, SourceElement = %d\n",
+					ElementStatus->DataTransferElementCount,
+					ElementStatus->DataTransferElementAddress[ElementStatus->DataTransferElementCount],
+					ElementStatus->DataTransferElementFull[ElementStatus->DataTransferElementCount],
+					ElementStatus->DataTransferElementSourceStorageElementNumber[ElementStatus->DataTransferElementCount]);
 #endif
 				if (ElementStatus->DataTransferElementCount >= mode_sense->NumDataTransfer)
 				{
@@ -1118,17 +1191,17 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
 /*
  * We no longer do the funky trick to figure out ALLOCATION_LENGTH.
  * Instead, we use the SCSI Generic command rather than SEND_SCSI_COMMAND
- * under Linux, which gets around the @#%@ 4k buffer size in Linux. 
+ * under Linux, which gets around the @#%@ 4k buffer size in Linux.
  * We still have the restriction that Linux cuts off the last two
  * bytes of the SENSE DATA (Q#@$%@#$^ Linux!). Which means that the
- * verbose widget won't work :-(. 
- 
+ * verbose widget won't work :-(.
+
  * We now look for that "attached" bit in the inquiry_info to see whether
  * to use READ_ELEMENT_ATTACHED or plain old READ_ELEMENT. In addition, we
  * look at the device type in the inquiry_info to see whether it is a media
  * changer or tape device, and if it's a media changer device, we ignore the
  * attached bit (one beta tester found an old 4-tape DAT changer that set
- * the attached bit for both the tape device AND the media changer device). 
+ * the attached bit for both the tape device AND the media changer device).
 
 */
 
@@ -1147,6 +1220,8 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 	int FirstElem, NumElements, NumThisRES;
 
 	ElementModeSense_T *mode_sense = NULL;
+	unsigned char no_barcodes_saved;
+	
 
 	if (inquiry_info->MChngr && inquiry_info->PeripheralDeviceType != MEDIUM_CHANGER_TYPE)
 	{
@@ -1155,7 +1230,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 
 	if (flags->no_attached)
 	{
-		/* override, sigh */ 
+		/* override, sigh */
 		is_attached = false;
 	}
 
@@ -1185,7 +1260,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 	ElementStatus->DataTransferElementCount = 0;
 
 	/* first, allocate some empty storage stuff: Note that we pass this
-	* down to ParseElementStatus (sigh!) 
+	* down to ParseElementStatus (sigh!)
 	*/
 
 	EmptyStorageElementAddress = (int *)xzmalloc((mode_sense->NumStorage+1)*sizeof(int));
@@ -1202,7 +1277,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 	for (i = 0; i < mode_sense->NumDataTransfer; i++)
 	{
 		/* initialize them to an illegal # so that we can fix later... */
-		ElementStatus->DataTransferElementSourceStorageElementNumber[i] = -1; 
+		ElementStatus->DataTransferElementSourceStorageElementNumber[i] = -1;
 	}
 
 	if (flags->querytype == MTX_ELEMENTSTATUS_ORIGINAL)
@@ -1212,6 +1287,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 		fprintf(stderr,"Storage start %d, Num %d, max %d\n", mode_sense->StorageStart, mode_sense->NumStorage - mode_sense->NumImportExport, mode_sense->MaxReadElementStatusData);
 #endif
 		flags->elementtype = StorageElement; /* sigh! */
+		flags->absolute_addressing = 1;
 
 		NumElements = mode_sense->NumStorage - mode_sense->NumImportExport;
 		FirstElem = mode_sense->StorageStart;
@@ -1243,13 +1319,14 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 			fprintf(stderr, "Parsing storage elements\n");
 #endif
 			ParseElementStatus(EmptyStorageElementAddress, &EmptyStorageElementCount,
-					   DataBuffer,ElementStatus,mode_sense,NULL);
+					   DataBuffer,ElementStatus,mode_sense,NULL, true);
 
 			free(DataBuffer); /* sigh! */
 			FirstElem += SCSI_RES_ELEMENTS;
 			NumElements -= SCSI_RES_ELEMENTS;
 		} while ( NumElements > 0 );
-
+		
+		flags->absolute_addressing = 0;
 		/* --------------IMPORT/EXPORT--------------- */
 		/* Next let's see if we need to do Import/Export: */
 		if (mode_sense->NumImportExport > 0)
@@ -1282,7 +1359,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 			dump_data(DataBuffer, 100);		/* dump some data :-(. */
 #endif
 			ParseElementStatus(	EmptyStorageElementAddress, &EmptyStorageElementCount,
-								DataBuffer, ElementStatus, mode_sense, NULL);
+						DataBuffer, ElementStatus, mode_sense, NULL, false);
 			free(DataBuffer);
 			ElementStatus->StorageElementCount += ElementStatus->ImportExportCount;
 		}
@@ -1293,6 +1370,8 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 		fprintf(stderr,"Sending request for data transfer element (drive) status\n");
 #endif
 		flags->elementtype = DataTransferElement; /* sigh! */
+		flags->absolute_addressing = 0;
+		
 		DataBuffer = SendElementStatusRequest(	MediumChangerFD, RequestSense,
 												inquiry_info, flags,
 												mode_sense->DataTransferStart,
@@ -1308,14 +1387,41 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 			PrintRequestSense(RequestSense);
 #endif
 			FreeElementData(ElementStatus);
-			return NULL; 
+			return NULL;
 		}
 
 #ifdef DEBUG
 		fprintf(stderr,"Parsing data for data transfer element (drive) status\n");
 #endif
 		ParseElementStatus(	EmptyStorageElementAddress, &EmptyStorageElementCount,
-							DataBuffer,ElementStatus, mode_sense, NULL);
+					DataBuffer,ElementStatus, mode_sense, NULL, false);
+
+		free(DataBuffer); /* sigh! */
+		
+		flags->absolute_addressing = 1;
+		no_barcodes_saved = flags->no_barcodes;
+		flags->no_barcodes = 1;
+		DataBuffer = SendElementStatusRequest(	MediumChangerFD, RequestSense,
+												inquiry_info, flags,
+												mode_sense->DataTransferStart,
+												mode_sense->NumDataTransfer,
+												SCSI_RES_ELEMENTS * 52 +120);
+		flags->no_barcodes = no_barcodes_saved;
+		if (!DataBuffer)
+		{
+#ifdef DEBUG
+			fprintf(stderr,"No data transfer element status.");
+#endif
+			/* darn. Free up stuff and return. */
+#ifdef DEBUG_MODE_SENSE
+			PrintRequestSense(RequestSense);
+#endif
+			FreeElementData(ElementStatus);
+			return NULL;
+		}
+		ElementStatus->DataTransferElementCount = 0;
+		ParseElementStatus(	EmptyStorageElementAddress, &EmptyStorageElementCount,
+					DataBuffer,ElementStatus, mode_sense, NULL, true);
 
 		free(DataBuffer); /* sigh! */
 
@@ -1323,7 +1429,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 
 		/* grr, damned brain dead HP doesn't report that it has any! */
 		if (!mode_sense->NumMediumTransport)
-		{ 
+		{
 			ElementStatus->TransportElementAddress = 0; /* default it sensibly :-(. */
 		}
 		else
@@ -1347,16 +1453,17 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 				PrintRequestSense(RequestSense);
 #endif
 				FreeElementData(ElementStatus);
-				return NULL; 
-			} 
+				return NULL;
+			}
 #ifdef DEBUG
 			fprintf(stderr,"Parsing robot arm data\n");
 #endif
 			ParseElementStatus(	EmptyStorageElementAddress, &EmptyStorageElementCount,
-								DataBuffer, ElementStatus, mode_sense, NULL);
+						DataBuffer, ElementStatus, mode_sense, NULL, false);
 
 			free(DataBuffer);
 		}
+		flags->absolute_addressing = 0;
 	}
 	else
 	{
@@ -1366,8 +1473,8 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 		fprintf(stderr,"Using alternative element status polling method (all elements)\n");
 #endif
 		/* ----------------- ALL Elements ---------------------- */
-		/*	Just keep asking for elements till no more are returned 
-			- increment our starting address as we go acording to the 
+		/*	Just keep asking for elements till no more are returned
+			- increment our starting address as we go acording to the
 			number of elements returned from the last call
 		*/
 
@@ -1384,7 +1491,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 													mode_sense->MaxReadElementStatusData);
 			if (!DataBuffer)
 			{
-				if (RequestSense->AdditionalSenseCode == 0x21 && 
+				if (RequestSense->AdditionalSenseCode == 0x21 &&
 				RequestSense->AdditionalSenseCodeQualifier == 0x01)
 				{
 					/* Error is invalid element address, we've probably just hit the end */
@@ -1393,13 +1500,13 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 
 				/* darn. Free up stuff and return. */
 				FreeElementData(ElementStatus);
-				return NULL; 
-			} 
+				return NULL;
+			}
 
 			nLastEl = nNextEl;
 
 			ParseElementStatus(	EmptyStorageElementAddress, &EmptyStorageElementCount,
-								DataBuffer, ElementStatus, mode_sense, &nNextEl);
+						DataBuffer, ElementStatus, mode_sense, &nNextEl, false);
 
 			free(DataBuffer); /* sigh! */
 		}
@@ -1423,7 +1530,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 	 *
 	 * Pass1:
 	 *	Translate from raw element # to our translated # (if possible).
-	 *	First, check the SourceStorageElementNumbers against the list of 
+	 *	First, check the SourceStorageElementNumbers against the list of
 	 *	filled slots. If the slots indicated are empty, we accept that list as
 	 *	valid. Otherwise decide the SourceStorageElementNumbers are invalid.
 	 *
@@ -1432,7 +1539,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 	 *	then we must search for free slots, and assign SourceStorageElementNumbers
 	 *	to those free slots. We happen to already built a list of free
 	 *	slots as part of the process of reading the storage element numbers
-	 *	from the tape. So that's easy enough to do! 
+	 *	from the tape. So that's easy enough to do!
 	 */
 
 #ifdef DEBUG_TAPELIST
@@ -1448,7 +1555,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 
 	/*
 	 *	Now we re-assign origin slots if the "real" origin slot
-	 *	is obviously defective: 
+	 *	is obviously defective:
 	 */
 	/* pass one: */
 	for (i = 0; i < ElementStatus->DataTransferElementCount; i++)
@@ -1486,12 +1593,12 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
 	 *	drives will be assigned a -1 (see the initialization loop for
 	 *	EmptyStorageElementAddress above), which will be reported as "slot 0"
 	 *	by the user interface. This is an invalid value, but more useful for us
-	 *	to have than just crapping out here :-(. 
+	 *	to have than just crapping out here :-(.
 	*/
 	empty_idx=0;
 	for (i = 0; i < ElementStatus->DataTransferElementCount; i++)
 	{
-		if (ElementStatus->DataTransferElementFull[i] && 
+		if (ElementStatus->DataTransferElementFull[i] &&
 			ElementStatus->DataTransferElementSourceStorageElementNumber[i] < 0)
 		{
 #ifdef DEBUG_TAPELIST
@@ -1543,7 +1650,7 @@ RequestSense_T *PositionElement(DEVICE_TYPE MediumChangerFD,
 
 /* Now the actual media movement routine! */
 RequestSense_T *MoveMedium(	DEVICE_TYPE MediumChangerFD, int SourceAddress,
-							int DestinationAddress, 
+							int DestinationAddress,
 							ElementStatus_T *ElementStatus,
 							Inquiry_T *inquiry_info, SCSI_Flags_T *flags)
 {
@@ -1646,7 +1753,7 @@ RequestSense_T *ExchangeMedium(	DEVICE_TYPE MediumChangerFD, int SourceAddress,
 
 #ifdef DEBUG_EXCHANGE
 	dump_cdb(&CDB,12);
-#endif  
+#endif
 
 	if (SCSI_ExecuteCommand(MediumChangerFD, Output, &CDB, 12,
 							NULL, 0, RequestSense) != 0)
@@ -1690,8 +1797,8 @@ RequestSense_T *Erase(DEVICE_TYPE MediumChangerFD)
 	return NULL;		/* Success! */
 }
 
-/* Routine to send an LOAD/UNLOAD from the MMC/SSC spec to a device. 
- * For tapes and changers this can be used either to eject a tape 
+/* Routine to send an LOAD/UNLOAD from the MMC/SSC spec to a device.
+ * For tapes and changers this can be used either to eject a tape
  * or to eject a magazine (on some Seagate changers, when sent to LUN 1 ).
  * For CD/DVDs this is used to Load or Unload a disc which is required by
  * some media changers.
@@ -1721,8 +1828,8 @@ int LoadUnload(DEVICE_TYPE fd, int bLoad)
 	return 0; /* did do! */
 }
 
-/* Routine to send an START/STOP from the MMC/SSC spec to a device. 
- * For tape drives this may be required prior to using the changer 
+/* Routine to send an START/STOP from the MMC/SSC spec to a device.
+ * For tape drives this may be required prior to using the changer
  * Load or Unload commands.
  * For CD/DVD drives this is used to Load or Unload a disc which may be
  * required by some media changers.
@@ -1746,9 +1853,9 @@ int StartStop(DEVICE_TYPE fd, int bStart)
 	return 0; /* did do! */
 }
 
-/* Routine to send a LOCK/UNLOCK from the SSC/MMC spec to a device. 
+/* Routine to send a LOCK/UNLOCK from the SSC/MMC spec to a device.
  * This can be used to prevent or allow the Tape or CD/DVD from being
- * removed. 
+ * removed.
  */
 
 int LockUnlock(DEVICE_TYPE fd, int bLock)
@@ -1785,7 +1892,7 @@ int ClearUnitAttention(DEVICE_TYPE fd, RequestSense_T *RequestSense)
 								&unit_attention_sense, sizeof(unit_attention_sense),
 								RequestSense) != 0)
 		{
-			fprintf(stderr, "RequestSense (0x03) failed\n");
+		        fprintf(stderr, "RequestSense (0x03) failed\n");
 			return -1;  /* could not do! */
 		}
 
@@ -1799,6 +1906,27 @@ int ClearUnitAttention(DEVICE_TYPE fd, RequestSense_T *RequestSense)
 
 }
 
+/* Test unit ready: This will tell us whether the tape drive
+ * is currently ready to read or write.
+ */
+
+int testUnitReady(DEVICE_TYPE fd)
+{
+	RequestSense_T sense;
+	CDB_T CDB;
+	unsigned char buffer[6];
+
+	CDB[0] = 0x00;		/* TEST_UNIT_READY */
+	CDB[1] = 0;
+	CDB[2] = 0;
+	CDB[3] = 0;			/* 1-5 all unused. */
+	CDB[4] = 0;
+	CDB[5] = 0;
+
+	slow_bzero((char *)&sense,sizeof(RequestSense_T));
+	return SCSI_ExecuteCommand(fd,Input,&CDB,6,buffer,0,&sense);
+}
+
 static char Spaces[] = "                                                            ";
 
 void PrintHex(int Indent, unsigned char *Buffer, int Length)
@@ -1876,7 +2004,7 @@ void PrintRequestSense(RequestSense_T *RequestSense)
 	fprintf(stderr, "mtx: Request Sense: Valid Residual=%s\n", RequestSense->Valid ? Yes : No);
 
 	if (RequestSense->ErrorCode == 0x70)
-	{ 
+	{
 		msg = "Current" ;
 	}
 	else if (RequestSense->ErrorCode == 0x71)

mtx-1.3.12/mtxl.h

@@ -1,10 +1,10 @@
-/* 
+/*
   MTX -- SCSI Tape Attached Medium Changer Control Program
 
   Copyright 1997-1998 Leonard N. Zubkoff <lnz@dandelion.com>
   Copyright 2007-2008 by Robert Nelson <robertn@the-nelsons.org>
   This file created by Eric Lee Green <eric@badtux.org>
-  
+
   This program is free software; you may redistribute and/or modify it under
   the terms of the GNU General Public License Version 2 as published by the
   Free Software Foundation.
@@ -60,14 +60,15 @@ ElementStatus_T *ReadElementStatus(	DEVICE_TYPE MediumChangerFD,
 									RequestSense_T *RequestSense,
 									Inquiry_T *inquiry_info,
 									SCSI_Flags_T *flags);
+void FreeElementData(ElementStatus_T *data);
 
 Inquiry_T *RequestInquiry(	DEVICE_TYPE fd,
 							RequestSense_T *RequestSense);
 
 RequestSense_T *MoveMedium(	DEVICE_TYPE MediumChangerFD,
 							int SourceAddress,
-							int DestinationAddress, 
-							ElementStatus_T *ElementStatus, 
+							int DestinationAddress,
+							ElementStatus_T *ElementStatus,
 							Inquiry_T *inquiry_info,
 							SCSI_Flags_T *flags);
 
@@ -75,7 +76,7 @@ RequestSense_T *ExchangeMedium(	DEVICE_TYPE MediumChangerFD,
 								int SourceAddress,
 								int DestinationAddress,
 								int Dest2Address,
-								ElementStatus_T *ElementStatus, 
+								ElementStatus_T *ElementStatus,
 								SCSI_Flags_T *flags);
 
 RequestSense_T *PositionElement(DEVICE_TYPE MediumChangerFD,
@@ -90,6 +91,9 @@ RequestSense_T *Erase(DEVICE_TYPE fd);        /* send SHORT erase to drive */
 
 void SCSI_Set_Timeout(int secs); /* set the SCSI timeout */
 void SCSI_Default_Timeout(void);  /* go back to default timeout */
+int testUnitReady(DEVICE_TYPE fd); /* issue Test Unit Ready SCSI command */
+void set_timeout(int timeout); /* set scsi operation timeout */
+int get_timeout(void); /* get scsi operation timeout */
 
 /* we may not have this function :-(. */
 #ifdef HAVE_GET_ID_LUN
@@ -97,12 +101,12 @@ void SCSI_Default_Timeout(void);  /* go back to default timeout */
 #endif
 
 /* These two hacks are so that I can stick the tongue out on an
- * NSM optical jukebox. 
- */ 
-NSM_Result_T *RecNSMHack(DEVICE_TYPE MediumChangerFD, 
+ * NSM optical jukebox.
+ */
+NSM_Result_T *RecNSMHack(DEVICE_TYPE MediumChangerFD,
 			 int param_len, int timeout);
 
-int SendNSMHack(DEVICE_TYPE MediumChangerFD, NSM_Param_T *nsm_command, 
+int SendNSMHack(DEVICE_TYPE MediumChangerFD, NSM_Param_T *nsm_command,
 		int param_len, int timeout);
 
 #endif

mtx-1.3.12/patches/mtx-1.3.12-mtx-library.patch

@@ -0,0 +1,691 @@
+diff --git a/mtx-1.3.12/Makefile.in b/mtx-1.3.12/Makefile.in
+index 05894d2..18fc35b 100644
+--- a/mtx-1.3.12/Makefile.in
++++ b/mtx-1.3.12/Makefile.in
+@@ -3,16 +3,17 @@
+ # USE GMAKE, NOT REGULAR BSD MAKE!)
+ #
+ # Valid targets:
+-#  linux86 freebsd86 solarissparc sgi dec vms 
++#  linux86 freebsd86 solarissparc sgi dec vms
+ #
+ # Makefile changes by Lars Kellogg-Stedman for better integration with
+-# GNU Autoconf. 
++# GNU Autoconf.
+ 
+ # Version # for 'make dist'...
+ VERSION=1.3.12
+ 
+ BINS = mtx@EXEEXT@ tapeinfo@EXEEXT@ loaderinfo@EXEEXT@ scsitape@EXEEXT@ scsieject@EXEEXT@
+ EXTRA_BINS = nsmhack@EXEEXT@
++LIB=libmtx.a
+ DBGS := $(BINS:%@EXEEXT@=%.dbg)
+ MAN = mtx.1 tapeinfo.1 loaderinfo.1 scsitape.1 scsieject.1
+ MAN_HTML := $(MAN:%.1=%.html)
+@@ -46,7 +47,7 @@ VPATH = $(srcdir)
+ # Linux on x86...
+ #
+ ifeq ($(TARGET),linux)
+-CFLAGS += -Wall
++CFLAGS += -Wall -fpic -O3
+ CPPFLAGS	+= -DLONG_PRINT_REQUEST_SENSE=1
+ endif
+ 
+@@ -64,7 +65,7 @@ LIBS		+= -lcam
+ endif
+ 
+ ifeq ($(TARGET),hpux)
+-CFLAGS += -O -D_HPUX_SOURCE -D __hpux__ 
++CFLAGS += -O -D_HPUX_SOURCE -D __hpux__
+ endif
+ 
+ #
+@@ -105,7 +106,7 @@ else
+ 	strip $< -o $@
+ endif
+ 
+-all:	$(BINS)
++all:	$(BINS) $(LIB)
+ 
+ dbgs: $(DBGS)
+ 
+@@ -113,7 +114,7 @@ install: $(BINS)
+ 	$(INSTALL_DIR) $(DESTDIR)$(sbindir)
+ 	for file in $(BINS); do \
+ 	$(INSTALL_BIN) "$$file" $(DESTDIR)$(sbindir) ; \
+-	done	
++	done
+ 	$(INSTALL_DIR) $(DESTDIR)$(mandir) $(DESTDIR)$(mandir)/man1
+ 	for file in mtx.1 tapeinfo.1 scsitape.1 scsieject.1 loaderinfo.1 ; do \
+ 	$(INSTALL_DOC) "$$file"  $(DESTDIR)$(mandir)/man1 ; \
+@@ -132,7 +133,7 @@ distclean: clean
+ 	rm -f Makefile config.h config.log config.cache config.status
+ 
+ dist: distclean
+-	./makedist $(VERSION)	
++	./makedist $(VERSION)
+ 
+ loaderinfo@EXEEXT@: loaderinfo.o mtxl.o mtxl.h mtx.h $(EXTRA)
+ 	$(CC) $(LDFLAGS) -o loaderinfo@EXEEXT@ loaderinfo.o mtxl.o $(EXTRA) $(LIBS)
+@@ -143,7 +144,7 @@ nsmhack@EXEEXT@: nsmhack.o mtxl.o $(EXTRA)
+ mtx@EXEEXT@: mtx.o mtxl.o mtxl.h mtx.h $(EXTRA)
+ 	$(CC) $(LDFLAGS) -o mtx@EXEEXT@ mtx.o mtxl.o $(EXTRA) $(LIBS)
+ 
+-mam2debug@EXEEXT@: mtxl.o mam2debug.o mtx.h $(EXTRA)	
++mam2debug@EXEEXT@: mtxl.o mam2debug.o mtx.h $(EXTRA)
+ 	$(CC) $(LDFLAGS) -o mam2debug@EXEEXT@ mtxl.o mam2debug.o $(EXTRA) $(LIBS)
+ 
+ tapeinfo@EXEEXT@: tapeinfo.o mtxl.o mtx.h mtxl.h $(EXTRA)
+@@ -160,6 +161,9 @@ scsitape.o: scsitape.c mtx.h mtxl.h
+ scsieject@EXEEXT@: scsieject.o mtxl.o mtxl.h mtx.h $(EXTRA)
+ 	$(CC) $(LDFLAGS) -o scsieject@EXEEXT@ scsieject.o mtxl.o $(EXTRA) $(LIBS)
+ 
++$(LIB): mtx.o mtxl.o
++	ar qvs contrib/$(LIB) mtx.o mtxl.o
++	$(CC) $(LDFLAGS) -shared -o contrib/libmtx.so mtx.o mtxl.o
+ scsieject.o: scsieject.c mtx.h mtxl.h
+ 
+ loaderinfo.o: loaderinfo.c mtx.h mtxl.h
+diff --git a/mtx-1.3.12/mtx.c b/mtx-1.3.12/mtx.c
+index fab11bb..e09d161 100644
+--- a/mtx-1.3.12/mtx.c
++++ b/mtx-1.3.12/mtx.c
+@@ -79,7 +79,8 @@ static char *PeripheralDeviceType[32] =
+ static int argc;
+ static char **argv;
+ 
+-static char *device=NULL;		/* the device name passed as argument */
++char *device=NULL;		/* the device name passed as argument */
++int absolute_addressing=0; /* if not 0 -  use absolute adresses of storage and tranport elements as known to the robot */
+ 
+ /*	Unfortunately this must be true for SGI, because SGI does not
+ 	use an int :-(.
+@@ -496,14 +497,24 @@ static void Status(void)
+ 		 TransferElementNumber < ElementStatus->DataTransferElementCount;
+ 		 TransferElementNumber++)
+ 	{
+-		
++	  if (absolute_addressing==0) {
+ 		printf("Data Transfer Element %d:", TransferElementNumber);
++	    }
++	  else {
++	        printf("Data Transfer Element %d  :", ElementStatus->DataTransferElementAddress[TransferElementNumber]);
++	  }
+ 		if (ElementStatus->DataTransferElementFull[TransferElementNumber])
+ 		{
+ 			if (ElementStatus->DataTransferElementSourceStorageElementNumber[TransferElementNumber] > -1)
+ 			{
+-				printf("Full (Storage Element %d Loaded)",
+-						ElementStatus->DataTransferElementSourceStorageElementNumber[TransferElementNumber]+1);
++			  if (absolute_addressing==0) {
++			      printf("Full (Storage Element %d Loaded)",
++				     ElementStatus->DataTransferElementSourceStorageElementNumber[TransferElementNumber]+1);
++			    }
++			  else {
++			    printf("Full (Storage Element %d Loaded)",
++				   ElementStatus->StorageElementAddress[TransferElementNumber]);
++			  }
+ 			}
+ 			else
+ 			{
+@@ -531,9 +542,16 @@ static void Status(void)
+ 		 StorageElementNumber < ElementStatus->StorageElementCount;
+ 		 StorageElementNumber++)
+ 	{
++	  if (absolute_addressing==0) {
+ 		printf(	"      Storage Element %d%s:%s", StorageElementNumber + 1,
+ 				(ElementStatus->StorageElementIsImportExport[StorageElementNumber]) ? " IMPORT/EXPORT" : "",
+ 				(ElementStatus->StorageElementFull[StorageElementNumber] ? "Full " : "Empty"));
++	    }
++	  else {
++		printf(	"      Storage Element %d%s:%s", ElementStatus->StorageElementAddress[StorageElementNumber],
++				(ElementStatus->StorageElementIsImportExport[StorageElementNumber]) ? " IMPORT/EXPORT" : "",
++				(ElementStatus->StorageElementFull[StorageElementNumber] ? "Full " : "Empty"));
++	  }    
+ 
+ 		if (ElementStatus->PrimaryVolumeTag[StorageElementNumber][0])
+ 		{
+@@ -918,7 +936,6 @@ void execute_command(struct command_table_struct *command)
+ 		}
+ 		open_device();
+ 	}
+-
+ 	if (!ElementStatus && command->need_status)
+ 	{
+ 		inquiry_info = RequestInquiry(MediumChangerFD,&RequestSense);
+diff --git a/mtx-1.3.12/mtxl.c b/mtx-1.3.12/mtxl.c
+index c468f88..5e3b921 100644
+--- a/mtx-1.3.12/mtxl.c
++++ b/mtx-1.3.12/mtxl.c
+@@ -23,7 +23,7 @@
+ 
+ /*
+  *	FatalError: changed Feb. 2000 elg@badtux.org to eliminate a buffer
+- *	overflow :-(. That could be important if mtxl is SUID for some reason. 
++ *	overflow :-(. That could be important if mtxl is SUID for some reason.
+ */
+ 
+ #include "mtx.h"
+@@ -34,7 +34,7 @@
+ /* #define DEBUG_MODE_SENSE 1 */
+ /* #define DEBUG */
+ /* #define DEBUG_SCSI */
+-#define __WEIRD_CHAR_SUPPRESS 1 
++#define __WEIRD_CHAR_SUPPRESS 1
+ 
+ /* zap the following define when we finally add real import/export support */
+ #define IMPORT_EXPORT_HACK 1 /* for the moment, import/export == storage */
+@@ -100,7 +100,7 @@ Inquiry_T *RequestInquiry(DEVICE_TYPE fd, RequestSense_T *RequestSense)
+ 	Inquiry_T *Inquiry;
+ 	CDB_T CDB;
+ 
+-	Inquiry = (Inquiry_T *) xmalloc(sizeof(Inquiry_T));  
++	Inquiry = (Inquiry_T *) xmalloc(sizeof(Inquiry_T));
+ 
+ 	CDB[0] = 0x12;		/* INQUIRY */
+ 	CDB[1] = 0;			/* EVPD = 0 */
+@@ -231,7 +231,8 @@ void FatalError(char *ErrorMessage, ...)
+ 	va_end(ArgumentPointer);
+ 
+ #ifndef VMS
+-	exit(1);
++	//exit(1);
++	return; /* if used as library routine it can not exit, because this would terminate the caller */
+ #else
+ 	sys$exit(VMS_ExitCode);
+ #endif
+@@ -280,10 +281,10 @@ int max(int x, int y)
+ 
+ 
+ /* Okay, this is a hack for the NSM modular jukebox series, which
+- * uses the "SEND DIAGNOSTIC" command to do shit. 
++ * uses the "SEND DIAGNOSTIC" command to do shit.
+  */
+ 
+-int SendNSMHack(DEVICE_TYPE MediumChangerFD, NSM_Param_T *nsm_command, 
++int SendNSMHack(DEVICE_TYPE MediumChangerFD, NSM_Param_T *nsm_command,
+ 		int param_len, int timeout)
+ {
+ 	CDB_T CDB;
+@@ -362,7 +363,7 @@ NSM_Result_T *RecNSMHack(	DEVICE_TYPE MediumChangerFD,
+ 
+ /* Routine to inventory the library. Needed by, e.g., some Breece Hill
+  * loaders. Sends an INITIALIZE_ELEMENT_STATUS command. This command
+- * has no parameters, such as a range to scan :-(. 
++ * has no parameters, such as a range to scan :-(.
+  */
+ 
+ int Inventory(DEVICE_TYPE MediumChangerFD)
+@@ -370,7 +371,7 @@ int Inventory(DEVICE_TYPE MediumChangerFD)
+ 	CDB_T	CDB;
+ 
+ 	/* okay, now for the command: */
+-	CDB[0] = 0x07; 
++	CDB[0] = 0x07;
+ 	CDB[1] = CDB[2] = CDB[3] = CDB[4] = CDB[5] = 0;
+ 
+ 	/* set us a very long timeout, sigh... */
+@@ -394,8 +395,8 @@ int Inventory(DEVICE_TYPE MediumChangerFD)
+ /* Routine to read the Mode Sense Element Address Assignment Page */
+ /* We try to read the page. If we can't read the page, we return NULL.
+  * Our caller really isn't too worried about why we could not read the
+- * page, it will simply default to some kind of default values. 
+- */ 
++ * page, it will simply default to some kind of default values.
++ */
+ ElementModeSense_T *ReadAssignmentPage(DEVICE_TYPE MediumChangerFD)
+ {
+ 	CDB_T CDB;
+@@ -405,7 +406,7 @@ ElementModeSense_T *ReadAssignmentPage(DEVICE_TYPE MediumChangerFD)
+ 
+ 	/* okay, now for the command: */
+ 	CDB[0] = 0x1A; /* Mode Sense(6) */
+-	CDB[1] = 0x08; 
++	CDB[1] = 0x08;
+ 	CDB[2] = 0x1D; /* Mode Sense Element Address Assignment Page */
+ 	CDB[3] = 0;
+ 	CDB[4] = 136; /* allocation_length... */
+@@ -482,7 +483,7 @@ ElementModeSense_T *ReadAssignmentPage(DEVICE_TYPE MediumChangerFD)
+ 		((int)sense_page->NumStorageHi << 8) + sense_page->NumStorageLo;
+ 
+ 	retval->ImportExportStart =
+-		((int)sense_page->ImportExportStartHi << 8) + sense_page->ImportExportStartLo; 
++		((int)sense_page->ImportExportStartHi << 8) + sense_page->ImportExportStartLo;
+ 
+ 	retval->NumImportExport =
+ 		((int)sense_page->NumImportExportHi << 8) + sense_page->NumImportExportLo;
+@@ -494,7 +495,7 @@ ElementModeSense_T *ReadAssignmentPage(DEVICE_TYPE MediumChangerFD)
+ 		((int)sense_page->NumDataTransferHi << 8) + sense_page->NumDataTransferLo;
+ 
+ 	/* allocate a couple spares 'cause some HP autochangers and maybe others
+-	* don't properly report the robotics arm(s) count here... 
++	* don't properly report the robotics arm(s) count here...
+ 	*/
+ 	retval->NumElements =
+ 		retval->NumStorage+retval->NumImportExport +
+@@ -549,7 +550,7 @@ static ElementStatus_T *AllocateElementData(ElementModeSense_T *mode_sense)
+ 
+ 	retval->DataTransferElementAddress =
+ 		(int *)xzmalloc(sizeof(int) * (mode_sense->NumDataTransfer + 1));
+-	retval->DataTransferElementSourceStorageElementNumber = 
++	retval->DataTransferElementSourceStorageElementNumber =
+ 		(int *)xzmalloc(sizeof(int) * (mode_sense->NumDataTransfer + 1));
+ 	retval->DataTransferPrimaryVolumeTag =
+ 		(barcode *)xzmalloc(sizeof(barcode) * (mode_sense->NumDataTransfer + 1));
+@@ -587,14 +588,14 @@ void copy_barcode(unsigned char *src, unsigned char *dest)
+ 
+ 		dest++;
+ 	}
+-	*dest = 0; /* null-terminate */ 
++	*dest = 0; /* null-terminate */
+ }
+ 
+ /* This #%!@# routine has more parameters than I can count! */
+ static unsigned char *SendElementStatusRequestActual(
+ 					DEVICE_TYPE MediumChangerFD,
+ 					RequestSense_T *RequestSense,
+-					Inquiry_T *inquiry_info, 
++					Inquiry_T *inquiry_info,
+ 					SCSI_Flags_T *flags,
+ 					int ElementStart,
+ 					int NumElements,
+@@ -609,7 +610,7 @@ static unsigned char *SendElementStatusRequestActual(
+ #ifdef HAVE_GET_ID_LUN
+ 	scsi_id_t *scsi_id;
+ #endif
+-	if (inquiry_info->MChngr && 
++	if (inquiry_info->MChngr &&
+ 		inquiry_info->PeripheralDeviceType != MEDIUM_CHANGER_TYPE)
+ 	{
+ 		is_attached = true;
+@@ -617,7 +618,7 @@ static unsigned char *SendElementStatusRequestActual(
+ 
+ 	if (flags->no_attached)
+ 	{
+-		/* override, sigh */ 
++		/* override, sigh */
+ 		is_attached = false;
+ 	}
+ 
+@@ -633,11 +634,11 @@ static unsigned char *SendElementStatusRequestActual(
+ 
+ 	if (is_attached)
+ 	{
+-		CDB[0] = 0xB4;  /* whoops, READ_ELEMENT_STATUS_ATTACHED! */ 
++		CDB[0] = 0xB4;  /* whoops, READ_ELEMENT_STATUS_ATTACHED! */
+ 	}
+ 
+ #ifdef HAVE_GET_ID_LUN
+-	CDB[1] = (scsi_id->lun << 5) | ((flags->no_barcodes) ? 
++	CDB[1] = (scsi_id->lun << 5) | ((flags->no_barcodes) ?
+ 		0 : 0x10) | flags->elementtype;  /* Lun + VolTag + Type code */
+ 	free(scsi_id);
+ #else
+@@ -677,7 +678,7 @@ static unsigned char *SendElementStatusRequestActual(
+ 
+ 		/*
+ 			First see if we have sense key of 'illegal request',
+-			additional sense code of '24', additional sense qualfier of 
++			additional sense code of '24', additional sense qualfier of
+ 			'0', and field in error of '4'. This means that we issued a request
+ 			w/bar code reader and did not have one, thus must re-issue the request
+ 			w/out barcode :-(.
+@@ -722,14 +723,14 @@ static unsigned char *SendElementStatusRequestActual(
+ 	PrintRequestSense(RequestSense); /* see what it sez :-(. */
+ 	fprintf(stderr,"Data:\n");
+ 	PrintHex(2, DataBuffer, 40);
+-#endif  
++#endif
+ 	return DataBuffer; /* we succeeded! */
+ }
+ 
+ 
+ unsigned char *SendElementStatusRequest(DEVICE_TYPE MediumChangerFD,
+ 										RequestSense_T *RequestSense,
+-										Inquiry_T *inquiry_info, 
++										Inquiry_T *inquiry_info,
+ 										SCSI_Flags_T *flags,
+ 										int ElementStart,
+ 										int NumElements,
+@@ -750,7 +751,7 @@ unsigned char *SendElementStatusRequest(DEVICE_TYPE MediumChangerFD,
+ 	/*
+ 		One weird loader wants either 8 or BYTE_COUNT_OF_REPORT
+ 		values for the ALLOCATION_LENGTH. Give it what it wants
+-		if we get an Sense Key of 05 Illegal Request with a 
++		if we get an Sense Key of 05 Illegal Request with a
+ 		CDB position of 7 as the field in error.
+ 	*/
+ 
+@@ -882,7 +883,7 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ 		{
+ 			/* TransportElementDescriptor =
+ 			(TransportElementDescriptor_T *) DataPointer; */
+-			memcpy(&TEBuf, DataPointer, 
++			memcpy(&TEBuf, DataPointer,
+ 				(TransportElementDescriptorLength <= sizeof(TEBuf)) ?
+ 					TransportElementDescriptorLength  :
+ 					sizeof(TEBuf));
+@@ -909,7 +910,7 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ 			case MediumTransportElement:
+ 				ElementStatus->TransportElementAddress = BigEndian16(TransportElementDescriptor->ElementAddress);
+ #ifdef DEBUG
+-				fprintf(stderr,"TransportElementAddress=%d\n",ElementStatus->TransportElementAddress); 
++				fprintf(stderr,"TransportElementAddress=%d\n",ElementStatus->TransportElementAddress);
+ #endif
+ 				break;
+ 
+@@ -936,7 +937,7 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ 				ElementStatus->StorageElementFull[ImportExportIndex] =
+ 					TransportElementDescriptor->Full;
+ 
+-				if ( (TransportElementDescriptorLength > 11) && 
++				if ( (TransportElementDescriptorLength > 11) &&
+ 					(ElementStatusPage->VolBits & E2_AVOLTAG))
+ 				{
+ 					copy_barcode(TransportElementDescriptor->AlternateVolumeTag,
+@@ -945,8 +946,8 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ 				else
+ 				{
+ 					ElementStatus->AlternateVolumeTag[ImportExportIndex][0] = 0;  /* null string. */;
+-				} 
+-				if ((TransportElementDescriptorLength > 11) && 
++				}
++				if ((TransportElementDescriptorLength > 11) &&
+ 					(ElementStatusPage->VolBits & E2_PVOLTAG))
+ 				{
+ 					copy_barcode(TransportElementDescriptor->PrimaryVolumeTag,
+@@ -967,8 +968,8 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ 				fprintf(stderr,"StorageElementCount=%d  ElementAddress = %d ",ElementStatus->StorageElementCount,BigEndian16(TransportElementDescriptor->ElementAddress));
+ #endif
+ 				/* ATL/Exabyte kludge -- skip slots that aren't installed :-( */
+-				if (TransportElementDescriptor->AdditionalSenseCode==0x83 && 
+-					TransportElementDescriptor->AdditionalSenseCodeQualifier==0x02) 
++				if (TransportElementDescriptor->AdditionalSenseCode==0x83 &&
++					TransportElementDescriptor->AdditionalSenseCodeQualifier==0x02)
+ 					continue;
+ 
+ 				ElementStatus->StorageElementAddress[ElementStatus->StorageElementCount] =
+@@ -986,7 +987,7 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ 						ElementStatus->StorageElementCount; /* slot idx. */
+ 					/*   ElementStatus->StorageElementAddress[ElementStatus->StorageElementCount]; */
+ 				}
+-				if ((TransportElementDescriptorLength >  11) && 
++				if ((TransportElementDescriptorLength >  11) &&
+ 					(ElementStatusPage->VolBits & E2_AVOLTAG))
+ 				{
+ 					copy_barcode(TransportElementDescriptor->AlternateVolumeTag,
+@@ -995,8 +996,8 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ 				else
+ 				{
+ 					ElementStatus->AlternateVolumeTag[ElementStatus->StorageElementCount][0]=0;  /* null string. */;
+-				} 
+-				if ((TransportElementDescriptorLength > 11) && 
++				}
++				if ((TransportElementDescriptorLength > 11) &&
+ 					(ElementStatusPage->VolBits & E2_PVOLTAG))
+ 				{
+ 					copy_barcode(TransportElementDescriptor->PrimaryVolumeTag,
+@@ -1009,9 +1010,9 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ 
+ 				ElementStatus->StorageElementCount++;
+ 				/*
+-					Note that the original mtx had no check here for 
++					Note that the original mtx had no check here for
+ 					buffer overflow, though some drives might mistakingly
+-					do one... 
++					do one...
+ 				*/
+ 
+ 				if (ElementStatus->StorageElementCount > mode_sense->NumStorage)
+@@ -1033,33 +1034,33 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ 				report that they have a 2nd tape drive when they don't. We
+ 				could generalize this in an ideal world, but my attempt to
+ 				do so failed with dual-drive Exabyte tape libraries that
+-				*DID* have the second drive. Sigh. 
++				*DID* have the second drive. Sigh.
+ 				*/
+-				if (TransportElementDescriptor->AdditionalSenseCode==0x83 && 
++				if (TransportElementDescriptor->AdditionalSenseCode==0x83 &&
+ 					TransportElementDescriptor->AdditionalSenseCodeQualifier==0x04)
+ 				{
+ 					continue;
+ 				}
+ 
+ 				/*	generalize it. Does it work? Let's try it! */
+-				/*	
++				/*
+ 					No, dammit, following does not work on dual-drive Exabyte
+ 					'cause if a tape is in the drive, it sets the AdditionalSense
+ 					code to something (sigh).
+ 				*/
+ 				/* if (TransportElementDescriptor->AdditionalSenseCode!=0)
+ 					continue;
+-				*/ 
++				*/
+ 
+ 				ElementStatus->DataTransferElementAddress[ElementStatus->DataTransferElementCount] =
+ 					BigEndian16(TransportElementDescriptor->ElementAddress);
+-				ElementStatus->DataTransferElementFull[ElementStatus->DataTransferElementCount] = 
++				ElementStatus->DataTransferElementFull[ElementStatus->DataTransferElementCount] =
+ 					TransportElementDescriptor->Full;
+ 				ElementStatus->DataTransferElementSourceStorageElementNumber[ElementStatus->DataTransferElementCount] =
+ 					BigEndian16(TransportElementDescriptor->SourceStorageElementAddress);
+ 
+ #ifdef DEBUG
+-				fprintf(stderr, "%d: ElementAddress = %d, Full = %d, SourceElement = %d\n", 
++				fprintf(stderr, "%d: ElementAddress = %d, Full = %d, SourceElement = %d\n",
+ 						ElementStatus->DataTransferElementCount,
+ 						ElementStatus->DataTransferElementAddress[ElementStatus->DataTransferElementCount],
+ 						ElementStatus->DataTransferElementFull[ElementStatus->DataTransferElementCount],
+@@ -1118,17 +1119,17 @@ static void ParseElementStatus(	int *EmptyStorageElementAddress,
+ /*
+  * We no longer do the funky trick to figure out ALLOCATION_LENGTH.
+  * Instead, we use the SCSI Generic command rather than SEND_SCSI_COMMAND
+- * under Linux, which gets around the @#%@ 4k buffer size in Linux. 
++ * under Linux, which gets around the @#%@ 4k buffer size in Linux.
+  * We still have the restriction that Linux cuts off the last two
+  * bytes of the SENSE DATA (Q#@$%@#$^ Linux!). Which means that the
+- * verbose widget won't work :-(. 
+- 
++ * verbose widget won't work :-(.
++
+  * We now look for that "attached" bit in the inquiry_info to see whether
+  * to use READ_ELEMENT_ATTACHED or plain old READ_ELEMENT. In addition, we
+  * look at the device type in the inquiry_info to see whether it is a media
+  * changer or tape device, and if it's a media changer device, we ignore the
+  * attached bit (one beta tester found an old 4-tape DAT changer that set
+- * the attached bit for both the tape device AND the media changer device). 
++ * the attached bit for both the tape device AND the media changer device).
+ 
+ */
+ 
+@@ -1155,7 +1156,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 
+ 	if (flags->no_attached)
+ 	{
+-		/* override, sigh */ 
++		/* override, sigh */
+ 		is_attached = false;
+ 	}
+ 
+@@ -1185,7 +1186,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 	ElementStatus->DataTransferElementCount = 0;
+ 
+ 	/* first, allocate some empty storage stuff: Note that we pass this
+-	* down to ParseElementStatus (sigh!) 
++	* down to ParseElementStatus (sigh!)
+ 	*/
+ 
+ 	EmptyStorageElementAddress = (int *)xzmalloc((mode_sense->NumStorage+1)*sizeof(int));
+@@ -1202,7 +1203,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 	for (i = 0; i < mode_sense->NumDataTransfer; i++)
+ 	{
+ 		/* initialize them to an illegal # so that we can fix later... */
+-		ElementStatus->DataTransferElementSourceStorageElementNumber[i] = -1; 
++		ElementStatus->DataTransferElementSourceStorageElementNumber[i] = -1;
+ 	}
+ 
+ 	if (flags->querytype == MTX_ELEMENTSTATUS_ORIGINAL)
+@@ -1308,7 +1309,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 			PrintRequestSense(RequestSense);
+ #endif
+ 			FreeElementData(ElementStatus);
+-			return NULL; 
++			return NULL;
+ 		}
+ 
+ #ifdef DEBUG
+@@ -1323,7 +1324,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 
+ 		/* grr, damned brain dead HP doesn't report that it has any! */
+ 		if (!mode_sense->NumMediumTransport)
+-		{ 
++		{
+ 			ElementStatus->TransportElementAddress = 0; /* default it sensibly :-(. */
+ 		}
+ 		else
+@@ -1347,8 +1348,8 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 				PrintRequestSense(RequestSense);
+ #endif
+ 				FreeElementData(ElementStatus);
+-				return NULL; 
+-			} 
++				return NULL;
++			}
+ #ifdef DEBUG
+ 			fprintf(stderr,"Parsing robot arm data\n");
+ #endif
+@@ -1366,8 +1367,8 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 		fprintf(stderr,"Using alternative element status polling method (all elements)\n");
+ #endif
+ 		/* ----------------- ALL Elements ---------------------- */
+-		/*	Just keep asking for elements till no more are returned 
+-			- increment our starting address as we go acording to the 
++		/*	Just keep asking for elements till no more are returned
++			- increment our starting address as we go acording to the
+ 			number of elements returned from the last call
+ 		*/
+ 
+@@ -1384,7 +1385,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 													mode_sense->MaxReadElementStatusData);
+ 			if (!DataBuffer)
+ 			{
+-				if (RequestSense->AdditionalSenseCode == 0x21 && 
++				if (RequestSense->AdditionalSenseCode == 0x21 &&
+ 				RequestSense->AdditionalSenseCodeQualifier == 0x01)
+ 				{
+ 					/* Error is invalid element address, we've probably just hit the end */
+@@ -1393,8 +1394,8 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 
+ 				/* darn. Free up stuff and return. */
+ 				FreeElementData(ElementStatus);
+-				return NULL; 
+-			} 
++				return NULL;
++			}
+ 
+ 			nLastEl = nNextEl;
+ 
+@@ -1423,7 +1424,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 	 *
+ 	 * Pass1:
+ 	 *	Translate from raw element # to our translated # (if possible).
+-	 *	First, check the SourceStorageElementNumbers against the list of 
++	 *	First, check the SourceStorageElementNumbers against the list of
+ 	 *	filled slots. If the slots indicated are empty, we accept that list as
+ 	 *	valid. Otherwise decide the SourceStorageElementNumbers are invalid.
+ 	 *
+@@ -1432,7 +1433,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 	 *	then we must search for free slots, and assign SourceStorageElementNumbers
+ 	 *	to those free slots. We happen to already built a list of free
+ 	 *	slots as part of the process of reading the storage element numbers
+-	 *	from the tape. So that's easy enough to do! 
++	 *	from the tape. So that's easy enough to do!
+ 	 */
+ 
+ #ifdef DEBUG_TAPELIST
+@@ -1448,7 +1449,7 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 
+ 	/*
+ 	 *	Now we re-assign origin slots if the "real" origin slot
+-	 *	is obviously defective: 
++	 *	is obviously defective:
+ 	 */
+ 	/* pass one: */
+ 	for (i = 0; i < ElementStatus->DataTransferElementCount; i++)
+@@ -1486,12 +1487,12 @@ ElementStatus_T *ReadElementStatus(DEVICE_TYPE MediumChangerFD, RequestSense_T *
+ 	 *	drives will be assigned a -1 (see the initialization loop for
+ 	 *	EmptyStorageElementAddress above), which will be reported as "slot 0"
+ 	 *	by the user interface. This is an invalid value, but more useful for us
+-	 *	to have than just crapping out here :-(. 
++	 *	to have than just crapping out here :-(.
+ 	*/
+ 	empty_idx=0;
+ 	for (i = 0; i < ElementStatus->DataTransferElementCount; i++)
+ 	{
+-		if (ElementStatus->DataTransferElementFull[i] && 
++		if (ElementStatus->DataTransferElementFull[i] &&
+ 			ElementStatus->DataTransferElementSourceStorageElementNumber[i] < 0)
+ 		{
+ #ifdef DEBUG_TAPELIST
+@@ -1543,7 +1544,7 @@ RequestSense_T *PositionElement(DEVICE_TYPE MediumChangerFD,
+ 
+ /* Now the actual media movement routine! */
+ RequestSense_T *MoveMedium(	DEVICE_TYPE MediumChangerFD, int SourceAddress,
+-							int DestinationAddress, 
++							int DestinationAddress,
+ 							ElementStatus_T *ElementStatus,
+ 							Inquiry_T *inquiry_info, SCSI_Flags_T *flags)
+ {
+@@ -1646,7 +1647,7 @@ RequestSense_T *ExchangeMedium(	DEVICE_TYPE MediumChangerFD, int SourceAddress,
+ 
+ #ifdef DEBUG_EXCHANGE
+ 	dump_cdb(&CDB,12);
+-#endif  
++#endif
+ 
+ 	if (SCSI_ExecuteCommand(MediumChangerFD, Output, &CDB, 12,
+ 							NULL, 0, RequestSense) != 0)
+@@ -1690,8 +1691,8 @@ RequestSense_T *Erase(DEVICE_TYPE MediumChangerFD)
+ 	return NULL;		/* Success! */
+ }
+ 
+-/* Routine to send an LOAD/UNLOAD from the MMC/SSC spec to a device. 
+- * For tapes and changers this can be used either to eject a tape 
++/* Routine to send an LOAD/UNLOAD from the MMC/SSC spec to a device.
++ * For tapes and changers this can be used either to eject a tape
+  * or to eject a magazine (on some Seagate changers, when sent to LUN 1 ).
+  * For CD/DVDs this is used to Load or Unload a disc which is required by
+  * some media changers.
+@@ -1721,8 +1722,8 @@ int LoadUnload(DEVICE_TYPE fd, int bLoad)
+ 	return 0; /* did do! */
+ }
+ 
+-/* Routine to send an START/STOP from the MMC/SSC spec to a device. 
+- * For tape drives this may be required prior to using the changer 
++/* Routine to send an START/STOP from the MMC/SSC spec to a device.
++ * For tape drives this may be required prior to using the changer
+  * Load or Unload commands.
+  * For CD/DVD drives this is used to Load or Unload a disc which may be
+  * required by some media changers.
+@@ -1746,9 +1747,9 @@ int StartStop(DEVICE_TYPE fd, int bStart)
+ 	return 0; /* did do! */
+ }
+ 
+-/* Routine to send a LOCK/UNLOCK from the SSC/MMC spec to a device. 
++/* Routine to send a LOCK/UNLOCK from the SSC/MMC spec to a device.
+  * This can be used to prevent or allow the Tape or CD/DVD from being
+- * removed. 
++ * removed.
+  */
+ 
+ int LockUnlock(DEVICE_TYPE fd, int bLock)
+@@ -1876,7 +1877,7 @@ void PrintRequestSense(RequestSense_T *RequestSense)
+ 	fprintf(stderr, "mtx: Request Sense: Valid Residual=%s\n", RequestSense->Valid ? Yes : No);
+ 
+ 	if (RequestSense->ErrorCode == 0x70)
+-	{ 
++	{
+ 		msg = "Current" ;
+ 	}
+ 	else if (RequestSense->ErrorCode == 0x71)

mtx-1.3.12/scsi_linux.c

@@ -57,10 +57,21 @@ $Revision: 193 $
 
 static int pack_id;
 static int sg_timeout;
+int sg_scsi_default_timeout = SG_SCSI_DEFAULT_TIMEOUT;
+
+void set_timeout(int timeout)
+{
+  sg_scsi_default_timeout = HZ*timeout;
+}
+
+int get_timeout(void)
+{
+  return(sg_scsi_default_timeout/HZ);
+}
 
 DEVICE_TYPE SCSI_OpenDevice(char *DeviceName)
 {
-	int timeout = SG_SCSI_DEFAULT_TIMEOUT;
+	int timeout = sg_scsi_default_timeout;
 #ifdef SG_IO
 	int k; /* version */
 #endif
@@ -93,7 +104,7 @@ void SCSI_Set_Timeout(int secs)
  
 void SCSI_Default_Timeout(void)
 {
-	sg_timeout = SG_SCSI_DEFAULT_TIMEOUT;
+	sg_timeout = sg_scsi_default_timeout;
 }
 
 void SCSI_CloseDevice(char *DeviceName, DEVICE_TYPE DeviceFD)
@@ -256,13 +267,13 @@ int SCSI_ExecuteCommand(DEVICE_TYPE DeviceFD,
 
 	int write_length = sizeof(struct sg_header)+CDB_Length;
 	int i;                  /* a random index...          */
-	int result;             /* the result of the write... */ 
+	int result;             /* the result of the write... */
 
 	struct sg_header *Header; /* we actually point this into Command... */
 	struct sg_header *ResultHeader; /* we point this into ResultBuf... */
 
 	/* First, see if we need to set our SCSI timeout to something different */
-	if (sg_timeout != SG_SCSI_DEFAULT_TIMEOUT)
+	if (sg_timeout != sg_scsi_default_timeout)
 	{
 		/* if not default, set it: */
 #ifdef DEBUG_TIMEOUT
@@ -448,9 +459,9 @@ int SCSI_ExecuteCommand(DEVICE_TYPE DeviceFD,
 	}
 
 	/* See if we need to reset our SCSI timeout */
-	if (sg_timeout != SG_SCSI_DEFAULT_TIMEOUT)
+	if (sg_timeout != sg_scsi_default_timeout)
 	{
-		sg_timeout = SG_SCSI_DEFAULT_TIMEOUT; /* reset it back to default */
+		sg_timeout = sg_scsi_default_timeout; /* reset it back to default */
 
 #ifdef DEBUG_TIMEOUT
 		fprintf(stderr,"Setting timeout to %d\n", sg_timeout);