X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=changer-src%2Fscsi-changer-driver.c;h=8693bf39709ca48b6da071c1fac04a3c08fdb82a;hb=fd48f3e498442f0cbff5f3606c7c403d0566150e;hp=0c274af7b64b64dcb6ac621c5d122916d2a3687e;hpb=12179dea039515c06168c0037d048566a3f623de;p=debian%2Famanda

diff --git a/changer-src/scsi-changer-driver.c b/changer-src/scsi-changer-driver.c
index 0c274af..8693bf3 100644
--- a/changer-src/scsi-changer-driver.c
+++ b/changer-src/scsi-changer-driver.c
@@ -5,41 +5,13 @@ static char rcsid[] = "$Id: scsi-changer-driver.c,v 1.52 2006/07/21 00:25:50 mar
  * Copyright (c) Thomas Hepper th@ant.han.de
  */
 
-#include <amanda.h>
+#include "amanda.h"
 
 #include "arglist.h"
-/*
-#ifdef HAVE_STDIO_H
-*/
-#include <stdio.h>
-/*
-#endif
-*/
-#ifdef  HAVE_STDLIB_H
-#include <stdlib.h>
-#endif
-#ifdef HAVE_FCNTL_H
-#include <fcntl.h>
-#endif
-#ifdef HAVE_ERRNO_H
-#include <errno.h>
-#endif
-#ifdef HAVE_STRING_H
-#include <string.h>
-#endif
-#ifdef HAVE_UNISTD_H
-#include <unistd.h>
-#endif
-#
-#ifdef STDC_HEADERS
-#include <stdarg.h>
-#else
-#include <varargs.h>
-#endif
 
 #include "scsi-defs.h"
 
-#include "tapeio.h"
+#include "device.h"
 
 extern FILE *debug_file;
 extern changer_t *changer;    /* Needed for the infos about emubarcode and labelfile */
@@ -74,6 +46,7 @@ int GenericFree(void);
 int TapeStatus(void);                   /* Is the tape loaded ? */
 int DLT4000Eject(char *Device, int type);
 int GenericEject(char *Device, int type);
+int SCSI_LogSenseClean(char *Device);           /* Does the tape need a clean */
 int GenericClean(char *Device);                 /* Does the tape need a clean */
 int GenericBarCode(int DeviceFD);               /* Do we have Barcode reader support */
 int NoBarCode(int DeviceFD);
@@ -407,7 +380,19 @@ ChangerCMD_T ChangerIO[] = {
    NoBarCode,
    GenericSearch,
    GenericSenseHandler},
-  {NULL, NULL, NULL,NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL}
+  {"SLR100",
+   "Tandberg SLR100",
+   GenericMove,
+   GenericElementStatus,
+   GenericResetStatus,
+   GenericFree,
+   GenericEject,
+   SCSI_LogSenseClean,
+   GenericRewind,
+   NoBarCode,
+   GenericSearch,
+   GenericSenseHandler},
+   {NULL, NULL, NULL,NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL}
 };
 
 
@@ -467,6 +452,38 @@ char *chgscsi_datestamp = NULL;       /* Result pointer for tape_rdlabel */
 char *chgscsi_label = NULL;           /* Result pointer for tape_rdlabel */
 char *chgscsi_result = NULL;          /* Needed for the result string of MapBarCode */
 
+/*
+ * This used to be in tape-src/tapeio.c; this is the Device API version.
+ */
+
+static char *
+tape_rdlabel(
+    char *devname,
+    char **datestamp,
+    char **label)
+{
+    Device *dev;
+    char *r = NULL;
+
+    dev = device_open(devname);
+    if (dev->status != DEVICE_STATUS_SUCCESS) {
+	r = g_strdup(device_error_or_status(dev));
+	g_object_unref(dev);
+	return r;
+    }
+
+    if (!device_configure(dev, TRUE) || !device_read_label(dev)) {
+	r = g_strdup(device_error_or_status(dev));
+	g_object_unref(dev);
+	return r;
+    }
+
+    *datestamp = g_strdup(dev->volume_time);
+    *label = g_strdup(dev->volume_label);
+
+    return NULL;
+}
+
 /*
  * First all functions which are called from extern
  */
@@ -494,28 +511,34 @@ PrintConf(void)
   int count;
   char *cwd;
 
-  printf("# Please replace every ??? with the correct parameter. It is not possible\n");
-  printf("# to guess everything :-)\n");
-  printf("# If the option is not needed, cleanmax for example if you have no cleaning\n");
-  printf("# tape remove the line.\n");
-  printf("#\n");
-  printf("number_configs   1   # Number of configs, you can have more than 1 config\n");
-  printf("                     # if you have for example more than one drive, or you\n");
-  printf("                     # to split your lib to use different dump levels\n");
-  printf("                     #\n");
-  printf("emubarcode       1   # If you drive has no barcode reader this will try\n");
-  printf("                     # keep an inventory of your tapes to find them faster\n");
-  printf("                     #\n");
-  printf("havebarcode      0   # Set this to 1 if you have an library with an installed\n");
-  printf("                     # barcode reader\n");
-  printf("                     #\n");
-  printf("debuglevel       0:0 # For debuging, see the docs /docs/TAPE-CHANGER\n");
-  printf("                     #\n");
-  printf("eject            ??? # set this to 1 if your drive needs an eject before move\n");
-  printf("                     #\n");
-  printf("sleep            ??? # How long to wait after an eject command before moving\n");
-  printf("                     # the tape\n");
-  printf("                     #\n");
+  g_printf(_("# Please replace every ??? with the correct parameter.\n"));
+  g_printf(_("# It is not possible to guess everything :-)\n"));
+  g_printf(_("# Remove the line if the option is not needed."));
+  g_printf(_("#   Example: cleanmax if you have no cleaning tape"));
+  g_printf(_("#\n"));
+  g_printf(_(
+   "number_configs  1 # Number of configs, you can have more than 1 config\n"
+   "                  # if you have for example more than one drive, or you\n"
+   "                  # to split your lib to use different dump levels\n"
+   "                  #\n"));
+  g_printf(_(
+   "emubarcode      1 # If you drive has no barcode reader this will try\n"
+   "                  # keep an inventory of your tapes to find them faster\n"
+   "                  #\n"));
+  g_printf(_(
+   "havebarcode     0 # Set this to 1 if you have a library with a\n"
+   "                  # barcode reader\n"
+   "                  #\n"));
+  g_printf(_(
+   "debuglevel    0:0 # For debuging, see the docs /docs/TAPE-CHANGER\n"
+   "                  #\n"));
+  g_printf(_(
+   "eject         ??? # set this to 1 if your drive needs an eject before move\n"
+   "                  #\n"));
+  g_printf(_(
+   "sleep         ??? # How long to wait after an eject command before moving\n"
+   "                  # the tape\n"
+   "                  #\n"));
 
   for (count = 0; count < CHG_MAXDEV ; count++)
     {
@@ -523,7 +546,7 @@ PrintConf(void)
 	{
 	  if (pDev[count].inquiry != NULL && pDev[count].inquiry->type == TYPE_CHANGER)
 	    {
-	      printf("changerdev   %s # This is the device to communicate with the robot\n", pDev[count].dev);
+	      g_printf(_("changerdev   %s # This is the device to communicate with the robot\n"), pDev[count].dev);
 	      break;
 	    }
 	}
@@ -538,24 +561,30 @@ PrintConf(void)
     {
       pDev[count].functions->function_status(count, 1);
     } else {
-      printf("changerdev   ??? # Ups nothing found. Please check the docs\n");
+      g_printf(_("changerdev ???       # Ups nothing found. Please check the docs\n"));
     }
 
-  printf("                     #\n");
-  printf("                     # Here now comes the config for the first tape\n");
-  printf("config             0 # This value is the one which is used in the amanda\n");
-  printf("                     # config file to tell the chg-scsi programm which tape\n");
-  printf("                     # and which slots to use\n");
-  printf("                     #\n");
-  printf("cleancart        ??? # The slot where the cleaning tape is located\n");
-  printf("                     # remove it if you have no cleaning tape\n");
-  printf("                     #\n");
-  printf("drivenum           0 # Which tape drive to use if there are more than one drive\n");
-  printf("                     #\n");
-  printf("dev              ??? # Which is the raw device to read/write data from the tape\n");
-  printf("                     # It is important to use the non rewinding tape, like\n");
-  printf("                     # /dev/nrst0 on linux, /dev/nrsa0 on BSD ....\n");
-  printf("                     #\n");
+  g_printf(_(
+   "                     #\n"));
+  g_printf(_(
+   "                     # Here now comes the config for the first tape\n"));
+  g_printf(_(
+   "config             0 # This value is the one which is used in the amanda\n"
+   "                     # config file to tell the chg-scsi programm which tape\n"
+   "                     # and which slots to use\n"
+   "                     #\n"));
+  g_printf(_(
+   "cleancart        ??? # The slot where the cleaning tape is located\n"
+   "                     # remove it if you have no cleaning tape\n"
+   "                     #\n"));
+  g_printf(_(
+   "drivenum           0 # Which tape drive to use if there are more than one drive\n"
+   "                     #\n"));
+  g_printf(_(
+   "dev              ??? # Which is the raw device to read/write data from the tape\n"
+   "                     # It is important to use the non rewinding tape, like\n"
+   "                     # /dev/nrst0 on linux, /dev/nrsa0 on BSD ....\n"
+   "                     #\n"));
 
   /*
    * OK now lets see if we have an direct SCSI channel
@@ -568,10 +597,11 @@ PrintConf(void)
 	{
 	  if (pDev[count].inquiry != NULL && pDev[count].inquiry->type == TYPE_TAPE)
 	    {
-	      printf("scsitapedev   %s # This is the device to communicate with the tape\n", pDev[count].dev);
-	      printf("                     # to get some device stats, not so importatn, and\n");
-	      printf("                     # if you run in problems delete it complete\n");
-	      printf("                     #\n");
+	      g_printf(_(
+		"scsitapedev   %s # This is the device to communicate with the tape\n"
+	        "                 # to get some device stats, not so important, and\n"
+	        "                 # if you run into problems delete it completely\n"
+	        "                 #\n"), pDev[count].dev);
 	      break;
 	    }
 	}
@@ -580,27 +610,32 @@ PrintConf(void)
 
   if (STE != 0)
     {
-      printf("startuse          0  # Which is the first slot to use\n");
-      printf("                     #\n");
-      printf("enduse            " SIZE_T_FMT "  # Which is the last slot to use\n", STE);
+      g_printf(_(
+	"startuse          0  # Which is the first slot to use\n"
+	"                     #\n"));
+      g_printf(_(
+	"enduse            %zu  # Which is the last slot to use.\n"), STE);
     } else {
-      printf("startuse         ??? # Which is the first slot to use\n");
-      printf("                     #\n");
-      printf("enduse           ??? # Which is the last slot to use\n");
+      g_printf(_(
+	"startuse         ??? # Which is the first slot to use\n"
+	"                     #\n"));
+      g_printf(_(
+	"enduse           ??? # Which is the last slot to use.\n"));
     }
-      printf("                     # decrement this value by 1 if you have an\n");
-      printf("                     # cleaning tape in the last slot\n");
-      printf("                     #\n");
+    g_printf(_(
+	"                     # Decrement this value by 1 if you have a\n"
+	"                     # cleaning tape in the last slot\n"
+	"                     #\n"));
 
   if ((cwd = getcwd(NULL, 0)) == NULL) {
-      cwd = "<unknown>";
+      cwd = _("<unknown>");
   }
 
-  printf("statfile %s/tape0-slot #\n",cwd);
-  printf("cleanfile %s/tape0-clean #\n", cwd);
-  printf("usagecount %s/tape0-totaltime #\n", cwd);
-  printf("tapestatus %s/tape0-tapestatus #\n", cwd);
-  printf("labelfile %s/labelfile #\n", cwd);
+  g_printf(_("statfile %s/tape0-slot #\n"),cwd);
+  g_printf(_("cleanfile %s/tape0-clean #\n"), cwd);
+  g_printf(_("usagecount %s/tape0-totaltime #\n"), cwd);
+  g_printf(_("tapestatus %s/tape0-tapestatus #\n"), cwd);
+  g_printf(_("labelfile %s/labelfile #\n"), cwd);
 }
 
 
@@ -642,13 +677,13 @@ Inventory(
   (void)start;	/* Quiet unused parameter warning */
   (void)stop;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO,SECTION_MAP_BARCODE, "##### START Inventory\n");
+  DebugPrint(DEBUG_INFO,SECTION_MAP_BARCODE, _("##### START Inventory\n"));
   pbarcoderes = alloc(SIZEOF(MBC_T));
   memset(pbarcoderes, 0 , SIZEOF(MBC_T));
 
   if (inv_done != 0)
     {
-      DebugPrint(DEBUG_INFO,SECTION_MAP_BARCODE, "##### STOP inv_done -> %d Inventory\n",inv_done);
+      DebugPrint(DEBUG_INFO,SECTION_MAP_BARCODE, _("##### STOP inv_done -> %d Inventory\n"),inv_done);
       free(pbarcoderes);
       return;
       /*NOTREACHED*/
@@ -689,7 +724,7 @@ Inventory(
        */
       if (load(INDEX_CHANGER, drive, x ) != 0)
 	{
-	  DebugPrint(DEBUG_ERROR,SECTION_MAP_BARCODE, "Load drive(%d) from(%d) failed\n", drive, x);
+	  DebugPrint(DEBUG_ERROR,SECTION_MAP_BARCODE, _("Load drive(%d) from(%d) failed\n"), drive, x);
 	  continue;
 	}
 
@@ -717,7 +752,7 @@ Inventory(
 	    MapBarCode(labelfile, pbarcoderes);
 	  }
       } else {
-	DebugPrint(DEBUG_ERROR,SECTION_MAP_BARCODE, "Read label failed\n");
+	DebugPrint(DEBUG_ERROR,SECTION_MAP_BARCODE, _("Read label failed\n"));
       }
 
       if (eject)
@@ -727,7 +762,7 @@ Inventory(
 
       (void)unload(INDEX_TAPE, drive, x);
     }
-  DebugPrint(DEBUG_INFO,SECTION_MAP_BARCODE, "##### STOP Inventory\n");
+  DebugPrint(DEBUG_INFO,SECTION_MAP_BARCODE, _("##### STOP Inventory\n"));
   free(pbarcoderes);
 }
 
@@ -741,13 +776,13 @@ isempty(
     int		slot)
 {
   extern OpenFiles_T *pDev;
-  DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### START isempty\n");
+  DebugPrint(DEBUG_INFO,SECTION_TAPE,_("##### START isempty\n"));
 
   if (ElementStatusValid == 0)
     {
       if ( pDev[fd].functions->function_status(fd, 1) != 0)
         {
-          DebugPrint(DEBUG_ERROR,SECTION_TAPE,"##### STOP isempty [-1]\n");
+          DebugPrint(DEBUG_ERROR,SECTION_TAPE,_("##### STOP isempty [-1]\n"));
           return(-1);
 	  /*NOTREACHED*/
         }
@@ -755,11 +790,11 @@ isempty(
 
   if (pSTE[slot].status == 'E')
     {
-      DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### STOP isempty [1]\n");
+      DebugPrint(DEBUG_INFO,SECTION_TAPE,_("##### STOP isempty [1]\n"));
       return(1);
       /*NOTREACHED*/
     }
-  DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### STOP isempty [0]\n");
+  DebugPrint(DEBUG_INFO,SECTION_TAPE,_("##### STOP isempty [0]\n"));
   return(0);
 }
 
@@ -771,16 +806,16 @@ get_clean_state(
   /* Return 1 if cleaning is needed */
   int ret;
 
-  DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### START get_clean_state\n");
+  DebugPrint(DEBUG_INFO,SECTION_TAPE,_("##### START get_clean_state\n"));
 
   if (pDev[INDEX_TAPECTL].SCSI == 0)
     {
-      DebugPrint(DEBUG_ERROR,SECTION_TAPE,"##### STOP get_clean_state [-1]\n");
+      DebugPrint(DEBUG_ERROR,SECTION_TAPE,_("##### STOP get_clean_state [-1]\n"));
       return(-1);
       /*NOTREACHED*/
     }
   ret=pDev[INDEX_TAPECTL].functions->function_clean(tapedev);
-  DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### STOP get_clean_state [%d]\n", ret);
+  DebugPrint(DEBUG_INFO,SECTION_TAPE,_("##### STOP get_clean_state [%d]\n"), ret);
   return(ret);
 }
 
@@ -800,7 +835,9 @@ eject_tape(
   extern OpenFiles_T *pDev;
   int ret;
 
-  DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### START eject_tape\n");
+  DebugPrint(DEBUG_INFO,SECTION_TAPE,_("##### START eject_tape %s\n"),tapedev);
+  if (pDev[INDEX_TAPECTL].functions == NULL)
+    return(-1);
 
   /*
    * Try to read the label
@@ -809,23 +846,28 @@ eject_tape(
     {
 
       if (pDev[INDEX_TAPECTL].SCSI == 1 && pDev[INDEX_TAPECTL].avail) {
+        DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### eject_tape rewind\n");
 	pDev[INDEX_TAPECTL].functions->function_rewind(INDEX_TAPECTL);
       } else {
+        DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### eject_tape rewind2\n");
 	pDev[INDEX_TAPE].functions->function_rewind(INDEX_TAPE);
       }
 
       if (pDev[INDEX_TAPE].devopen == 1)
 	{
+          DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### eject_tape close\n");
 	  SCSI_CloseDevice(INDEX_TAPE);
 	}
 
+      DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### tape_eject tape_rdlabel\n");
       chgscsi_result = (char *)tape_rdlabel(pDev[INDEX_TAPE].dev, &chgscsi_datestamp, &chgscsi_label);
     }
 
   if (pDev[INDEX_TAPECTL].SCSI == 1 && pDev[INDEX_TAPECTL].avail == 1 && type == 1)
     {
+      DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### tape_eject eject\n");
       ret=pDev[INDEX_TAPECTL].functions->function_eject(tapedev, type);
-      DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### STOP (SCSI)eject_tape [%d]\n", ret);
+      DebugPrint(DEBUG_INFO,SECTION_TAPE,_("##### STOP (SCSI)eject_tape [%d]\n"), ret);
       return(ret);
       /*NOTREACHED*/
     }
@@ -833,12 +875,12 @@ eject_tape(
   if (pDev[INDEX_TAPE].avail == 1)
     {
       ret=Tape_Ioctl(INDEX_TAPE, IOCTL_EJECT);
-      DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### STOP (ioctl)eject_tape [%d]\n", ret);
+      DebugPrint(DEBUG_INFO,SECTION_TAPE,_("##### STOP (ioctl)eject_tape [%d]\n"), ret);
       return(ret);
       /*NOTREACHED*/
     }
 
-  DebugPrint(DEBUG_INFO,SECTION_TAPE,"##### STOP eject_tape [-1]\n");
+  DebugPrint(DEBUG_INFO,SECTION_TAPE,_("##### STOP eject_tape [-1]\n"));
   return(-1);
 }
 
@@ -854,14 +896,14 @@ find_empty(
   size_t x;
   size_t end;
 
-  DebugPrint(DEBUG_INFO,SECTION_ELEMENT,"###### START find_empty\n");
+  DebugPrint(DEBUG_INFO,SECTION_ELEMENT,_("###### START find_empty\n"));
 
   if (ElementStatusValid == 0)
     {
       if ( pDev[fd].functions->function_status(fd , 1) != 0)
         {
           DebugPrint(DEBUG_ERROR,SECTION_ELEMENT,
-		     "###### END find_empty [-1]\n");
+		     _("###### END find_empty [-1]\n"));
           return((ssize_t)-1);
 	  /*NOTREACHED*/
         }
@@ -880,21 +922,21 @@ find_empty(
     }
 
   DebugPrint(DEBUG_INFO, SECTION_ELEMENT,
-	     "start at " SIZE_T_FMT ", end at " SIZE_T_FMT "\n",
-	     (SIZE_T_FMT_TYPE)start,
-	     (SIZE_T_FMT_TYPE)end);
+	     _("start at %zu, end at %zu\n"),
+	     (size_t)start,
+	     (size_t)end);
 
   for (x = start; x < end; x++)
     {
       if (pSTE[x].status == 'E')
         {
           DebugPrint(DEBUG_INFO,SECTION_ELEMENT,
-		     "###### END find_empty [" SIZE_T_FMT "]\n", x);
+		     _("###### END find_empty [%lu]\n"), x);
           return((ssize_t)x);
 	  /*NOTREACHED*/
         }
     }
-  DebugPrint(DEBUG_ERROR,SECTION_ELEMENT,"###### END find_empty [-1]\n");
+  DebugPrint(DEBUG_ERROR,SECTION_ELEMENT,_("###### END find_empty [-1]\n"));
   return((ssize_t)-1);
 }
 
@@ -913,26 +955,27 @@ drive_loaded(
 {
   extern OpenFiles_T *pDev;
 
-  DebugPrint(DEBUG_INFO,SECTION_TAPE,"###### START drive_loaded\n");
-  DebugPrint(DEBUG_INFO,SECTION_TAPE,"%-20s : fd %d drivenum %d \n", "drive_loaded", fd, drivenum);
+  DebugPrint(DEBUG_INFO,SECTION_TAPE,_("###### START drive_loaded\n"));
+  DebugPrint(DEBUG_INFO,SECTION_TAPE,
+		_("        drive_loaded : fd %d drivenum %d \n"), fd, drivenum);
 
 
   if (ElementStatusValid == 0)
     {
       if (pDev[INDEX_CHANGER].functions->function_status(INDEX_CHANGER, 1) != 0)
 	{
-	  DebugPrint(DEBUG_ERROR,SECTION_TAPE,"Fatal error\n");
+	  DebugPrint(DEBUG_ERROR,SECTION_TAPE,_("Fatal error\n"));
 	  return(-1);
 	  /*NOTREACHED*/
 	}
     }
 
   if (pDTE[drivenum].status == 'E') {
-    DebugPrint(DEBUG_INFO,SECTION_TAPE,"###### STOP drive_loaded (empty)\n");
+    DebugPrint(DEBUG_INFO,SECTION_TAPE,_("###### STOP drive_loaded (empty)\n"));
     return(0);
     /*NOTREACHED*/
   }
-  DebugPrint(DEBUG_INFO,SECTION_TAPE,"###### STOP drive_loaded (not empty)\n");
+  DebugPrint(DEBUG_INFO,SECTION_TAPE,_("###### STOP drive_loaded (not empty)\n"));
   return(1);
 }
 
@@ -954,8 +997,10 @@ unload(
   extern int do_inventory;
   MBC_T *pbarcoderes;
 
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"###### START unload\n");
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"%-20s : fd %d, slot %d, drive %d \n", "unload", fd, slot, drive);
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("###### START unload\n"));
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,
+			_("              unload : fd %d, slot %d, drive %d \n"),
+			fd, slot, drive);
   pbarcoderes = alloc(SIZEOF(MBC_T));
   memset(pbarcoderes, 0, SIZEOF(MBC_T));
 
@@ -967,19 +1012,17 @@ unload(
     {
       if (pDev[INDEX_CHANGER].functions->function_status(INDEX_CHANGER , 1) != 0)
 	{
-	  DebugPrint(DEBUG_ERROR, SECTION_TAPE,"Element Status not valid, reset failed\n");
-	  DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP unload (-1)\n");
+	  DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("Element Status not valid, reset failed\n"));
+	  DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("##### STOP unload (-1)\n"));
 	  free(pbarcoderes);
 	  return(-1);
 	  /*NOTREACHED*/
 	}
     }
 
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"%-20s : unload drive %d[%d] slot %d[%d]\n", "unload",
-	     drive,
-	     pDTE[drive].address,
-	     slot,
-	     pSTE[slot].address);
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,
+		_("              unload : unload drive %d[%d] slot %d[%d]\n"),
+		drive, pDTE[drive].address, slot, pSTE[slot].address);
 
   /*
    * Unloading an empty tape unit makes no sense
@@ -987,8 +1030,8 @@ unload(
    */
   if (pDTE[drive].status == 'E')
     {
-      DebugPrint(DEBUG_ERROR, SECTION_TAPE,"unload : Drive %d address %d is empty\n", drive, pDTE[drive].address);
-      DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP unload (-1)\n");
+      DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("unload : Drive %d address %d is empty\n"), drive, pDTE[drive].address);
+      DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("##### STOP unload (-1)\n"));
       free(pbarcoderes);
       return(-1);
       /*NOTREACHED*/
@@ -1000,10 +1043,10 @@ unload(
    */
   if (pSTE[slot].status == 'F')
     {
-      DebugPrint(DEBUG_INFO, SECTION_TAPE,"unload : Slot %d address %d is full\n", drive, pSTE[slot].address);
+      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("unload : Slot %d address %d is full\n"), drive, pSTE[slot].address);
       if ( ElementStatusValid == 0)
 	{
-	  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "unload: Element Status not valid, can't find an empty slot\n");
+	  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("unload: Element Status not valid, can't find an empty slot\n"));
 	  free(pbarcoderes);
 	  return(-1);
 	  /*NOTREACHED*/
@@ -1012,12 +1055,12 @@ unload(
       slot = find_empty(fd, 0, 0);
       if (slot == -1 )
       {
-	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "unload: No Empty slot found\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("unload: No Empty slot found\n"));
 	      free(pbarcoderes);
 	      return(-1);
 	      /*NOTREACHED*/
       }
-      DebugPrint(DEBUG_INFO, SECTION_TAPE,"unload : found empty one, try to unload to slot %d\n", slot);
+      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("unload : found empty one, try to unload to slot %d\n"), slot);
     }
 
 
@@ -1051,7 +1094,7 @@ unload(
    */
   if (pDev[INDEX_CHANGER].functions->function_move(INDEX_CHANGER,
            pDTE[drive].address, pSTE[slot].address) != 0) {
-      DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP unload (-1 move failed)\n");
+      DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("##### STOP unload (-1 move failed)\n"));
       free(pbarcoderes);
       return(-1);
       /*NOTREACHED*/
@@ -1063,7 +1106,7 @@ unload(
    */
   if (pDev[INDEX_CHANGER].functions->function_status(INDEX_CHANGER , 1) != 0)
     {
-      DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP unload (-1 update status failed)\n");
+      DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("##### STOP unload (-1 update status failed)\n"));
       free(pbarcoderes);
       return(-1);
       /*NOTREACHED*/
@@ -1104,14 +1147,14 @@ unload(
 	  } else {
 	    if (slot != pbarcoderes->data.slot)
 	      {
-		DebugPrint(DEBUG_ERROR, SECTION_TAPE,"Slot DB out of sync, slot %d != map %d",slot, pbarcoderes->data.slot);
+		DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("Slot DB out of sync, slot %d != map %d"),slot, pbarcoderes->data.slot);
 		do_inventory = 1;
 	      }
 	  }
       }
   }
 
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP unload(0)\n");
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP unload(0)\n"));
   free(pbarcoderes);
   return(0);
 }
@@ -1139,8 +1182,8 @@ load(
   extern int do_inventory;
   MBC_T *pbarcoderes;
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"###### START load\n");
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"%-20s : fd %d, drive %d, slot %d \n", "load", fd, drive, slot);
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("###### START load\n"));
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("%-20s : fd %d, drive %d, slot %d \n"), "load", fd, drive, slot);
   pbarcoderes = alloc(SIZEOF(MBC_T));
   memset(pbarcoderes, 0 , SIZEOF(MBC_T));
 
@@ -1148,8 +1191,8 @@ load(
       {
           if (pDev[fd].functions->function_status(fd, 1) != 0)
               {
-		DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"##### STOP load (-1)\n");
-		DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"##### STOP load (-1 update status failed)\n");
+		DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("##### STOP load (-1)\n"));
+		DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("##### STOP load (-1 update status failed)\n"));
 		free(pbarcoderes);
 		return(-1);
 		/*NOTREACHED*/
@@ -1164,8 +1207,8 @@ load(
    */
   if ((size_t)slot >= STE)
     {
-      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"load : slot %d ge STE %d\n",slot, STE);
-      ChgExit("load", "slot >= STE", FATAL);
+      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("load : slot %d ge STE %d\n"),slot, STE);
+      ChgExit("load", _("slot >= STE"), FATAL);
       /*NOTREACHED*/
     }
 
@@ -1174,20 +1217,20 @@ load(
    */
   if (drive >= (int)DTE)
     {
-      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"load : drive %d ge DTE %d\n",drive, DTE);
-      ChgExit("load", "drive >= DTE", FATAL);
+      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("load : drive %d ge DTE %d\n"),drive, DTE);
+      ChgExit("load", _("drive >= DTE"), FATAL);
       /*NOTREACHED*/
     }
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"load : load drive %d[%d] slot %d[%d]\n",drive,
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("load : load drive %d[%d] slot %d[%d]\n"),drive,
 	     pDTE[drive].address,
 	     slot,
 	     pSTE[slot].address);
 
   if (pDTE[drive].status == 'F')
     {
-      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"load : Drive %d address %d is full\n", drive, pDTE[drive].address);
-      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"##### STOP load (-1 update status failed)\n");
+      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("load : Drive %d address %d is full\n"), drive, pDTE[drive].address);
+      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("##### STOP load (-1 update status failed)\n"));
       free(pbarcoderes);
       return(-1);
       /*NOTREACHED*/
@@ -1195,8 +1238,8 @@ load(
 
   if (pSTE[slot].status == 'E')
     {
-      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"load : Slot %d address %d is empty\n", drive, pSTE[slot].address);
-      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"##### STOP load (-1 update status failed)\n");
+      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("load : Slot %d address %d is empty\n"), drive, pSTE[slot].address);
+      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("##### STOP load (-1 update status failed)\n"));
       free(pbarcoderes);
       return(-1);
       /*NOTREACHED*/
@@ -1209,7 +1252,7 @@ load(
    */
   if (pDev[fd].functions->function_status(fd, 1) != 0)
       {
-	DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"##### STOP load (-1 update status failed)\n");
+	DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("##### STOP load (-1 update status failed)\n"));
 	free(pbarcoderes);
 	return(-1);
 	/*NOTREACHED*/
@@ -1279,8 +1322,8 @@ load(
 	    } else { /* We got something, is it correct ? */
 	      if (slot != pbarcoderes->data.slot && do_inventory == 0)
 		{
-		  DebugPrint(DEBUG_ERROR, SECTION_TAPE,"Slot DB out of sync, slot %d != map %d",slot, pbarcoderes->data.slot);
-		  ChgExit("Load", "Label DB out of sync", FATAL);
+		  DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("Slot DB out of sync, slot %d != map %d"),slot, pbarcoderes->data.slot);
+		  ChgExit("Load", _("Label DB out of sync"), FATAL);
 		  /*NOTREACHED*/
 		} else { /* OK, so increment the load count */
 		  pbarcoderes->action = UPDATE_SLOT;
@@ -1293,16 +1336,16 @@ load(
 
       if (BarCode(INDEX_CHANGER) == 1 && changer->emubarcode == 1)
 	{
-	  ChgExit("Load", "BarCode == 1 and emubarcode == 1", FATAL);
+	  ChgExit("Load", _("BarCode == 1 and emubarcode == 1"), FATAL);
 	  /*NOTREACHED*/
 	}
 
-      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"##### STOP load (%d)\n",ret);
+      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("##### STOP load (%d)\n"),ret);
       free(pbarcoderes);
       return(ret);
       /*NOTREACHED*/
     }
-    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"##### STOP load (%d)\n",ret);
+    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("##### STOP load (%d)\n"),ret);
     free(pbarcoderes);
     return(ret);
 }
@@ -1318,16 +1361,15 @@ get_slot_count(
 {
   extern OpenFiles_T *pDev;
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"###### START get_slot_count\n");
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"%-20s : fd %d\n", "get_slot_count", fd);
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("###### START get_slot_count\n"));
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("%-20s : fd %d\n"), "get_slot_count", fd);
 
   if (ElementStatusValid == 0)
     {
       pDev[fd].functions->function_status(fd, 1);
     }
   DebugPrint(DEBUG_INFO, SECTION_ELEMENT,
-	     "##### STOP get_slot_count (" SIZE_T_FMT ")\n",
-	     (SIZE_T_FMT_TYPE)STE);
+	     _("##### STOP get_slot_count (%zu)\n"), STE);
   return((ssize_t)STE);
   /*
    * return the number of slots in the robot
@@ -1348,22 +1390,21 @@ get_drive_count(
 
   extern OpenFiles_T *pDev;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"###### START get_drive_count\n");
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-20s : fd %d\n", "get_drive_count", fd);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("###### START get_drive_count\n"));
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-20s : fd %d\n"), "get_drive_count", fd);
 
   if (ElementStatusValid == 0)
       {
           if ( pDev[fd].functions->function_status(fd, 1) != 0)
 	    {
-		DebugPrint(DEBUG_ERROR, SECTION_SCSI, "Error getting drive count\n");
-		DebugPrint(DEBUG_ERROR, SECTION_SCSI, "##### STOP get_drive_count (-1)\n");
+		DebugPrint(DEBUG_ERROR, SECTION_SCSI, _("Error getting drive count\n"));
+		DebugPrint(DEBUG_ERROR, SECTION_SCSI, _("##### STOP get_drive_count (-1)\n"));
 		return(-1);
 		/*NOTREACHED*/
 	    }
       }
   DebugPrint(DEBUG_INFO, SECTION_SCSI,
-	     "###### STOP get_drive_count (" SIZE_T_FMT " drives)\n",
-	     (SIZE_T_FMT_TYPE)DTE);
+	     _("###### STOP get_drive_count (%zu drives)\n"), DTE);
   return((ssize_t)DTE);
 }
 
@@ -1384,7 +1425,7 @@ OpenDevice(
     char *	ident)
 {
   extern OpenFiles_T *pDev;
-  char tmpstr[15];
+  char tmpstr[16];
   ChangerCMD_T *p = (ChangerCMD_T *)&ChangerIO;
 
   if (!ConfigName)
@@ -1392,8 +1433,8 @@ OpenDevice(
   if (!DeviceName)
 	return 1;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START OpenDevice\n");
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"OpenDevice : %s\n", DeviceName);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START OpenDevice\n"));
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("OpenDevice : %s\n"), DeviceName);
 
   pDev[ip].ConfigName = strdup(ConfigName);
   pDev[ip].dev = strdup(DeviceName);
@@ -1408,14 +1449,14 @@ OpenDevice(
               {
                 pDev[ip].functions = p;
 		strncpy(pDev[ip].ident, ident, 17);
-                DebugPrint(DEBUG_INFO, SECTION_SCSI,"override using ident = %s, type = %s\n",p->ident, p->type);
-		DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP OpenDevice\n");
+                DebugPrint(DEBUG_INFO, SECTION_SCSI,_("override using ident = %s, type = %s\n"),p->ident, p->type);
+		DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP OpenDevice\n"));
                 return(1);
 		/*NOTREACHED*/
               }
             p++;
           }
-	  ChgExit("OpenDevice", "ident not found", FATAL);
+	  ChgExit("OpenDevice", _("ident not found"), FATAL);
 	  /*NOTREACHED*/
       } else {
         while(p->ident != NULL)
@@ -1423,8 +1464,8 @@ OpenDevice(
             if (strcmp(pDev[ip].ident, p->ident) == 0)
               {
                 pDev[ip].functions = p;
-                DebugPrint(DEBUG_INFO, SECTION_SCSI,"using ident = %s, type = %s\n",p->ident, p->type);
-		DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP OpenDevice\n");
+                DebugPrint(DEBUG_INFO, SECTION_SCSI,_("using ident = %s, type = %s\n"),p->ident, p->type);
+		DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP OpenDevice\n"));
                 return(1);
 		/*NOTREACHED*/
               }
@@ -1435,23 +1476,25 @@ OpenDevice(
       /* divide generic in generic_type, where type is the */
       /* num returned by the inquiry command */
       p = (ChangerCMD_T *)&ChangerIO;
-      snprintf(&tmpstr[0], SIZEOF(tmpstr), "%s_%s","generic",pDev[0].type);
+      g_snprintf(&tmpstr[0], SIZEOF(tmpstr), "%s_%s","generic",pDev[0].type);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### OpenDevice trying GENERIC Device %s\n",tmpstr);
       while(p->ident != NULL)
         {
           if (strcmp(tmpstr, p->ident) == 0)
             {
               pDev[ip].functions = p;
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"using ident = %s, type = %s\n",p->ident, p->type);
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP OpenDevice\n");
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("using ident = %s, type = %s\n"),p->ident, p->type);
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP OpenDevice\n"));
               return(1);
 	      /*NOTREACHED*/
             }
           p++;
         }
     } else { /* Something failed, lets see what */
-      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"##### STOP OpenDevice failed\n");
+      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("##### STOP OpenDevice failed\n"));
     }
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP OpenDevice (nothing found) !!\n");
+  pDev[ip].functions = NULL;
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP OpenDevice (nothing found) !!\n"));
   return(0);
 }
 
@@ -1467,13 +1510,13 @@ BarCode(
   int ret;
   extern OpenFiles_T *pDev;
 
-  DebugPrint(DEBUG_INFO, SECTION_BARCODE,"##### START BarCode\n");
-  DebugPrint(DEBUG_INFO, SECTION_BARCODE,"%-20s : fd %d\n", "BarCode", fd);
+  DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("##### START BarCode\n"));
+  DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("%-20s : fd %d\n"), "BarCode", fd);
 
-  DebugPrint(DEBUG_INFO, SECTION_BARCODE,"Ident = [%s], function = [%s]\n", pDev[fd].ident,
+  DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("Ident = [%s], function = [%s]\n"), pDev[fd].ident,
 	     pDev[fd].functions->ident);
   ret = pDev[fd].functions->function_barcode(fd);
-  DebugPrint(DEBUG_INFO, SECTION_BARCODE,"##### STOP BarCode (%d)\n",ret);
+  DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("##### STOP BarCode (%d)\n"),ret);
   return(ret);
 }
 
@@ -1496,7 +1539,7 @@ Tape_Ready(
   time_t cnt = 0;
 
   RequestSense_T *pRequestSense;
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### START Tape_Ready\n");
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### START Tape_Ready\n"));
 
   /*
    * Which device should we use to get the
@@ -1522,7 +1565,7 @@ Tape_Ready(
 
   if (pDev[fd].avail == 1 && pDev[fd].SCSI == 0)
     {
-      DebugPrint(DEBUG_INFO, SECTION_TAPE,"Tape_Ready : Can't send SCSI commands, try ioctl\n");
+      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("Tape_Ready : Can't send SCSI commands, try ioctl\n"));
       /*
        * Do we get an non negative result.
        * If yes this function is available
@@ -1536,8 +1579,8 @@ Tape_Ready(
 	    {
 	      if ( ret & TAPE_ONLINE)
 		{
-		  DebugPrint(DEBUG_INFO, SECTION_TAPE,"Tape_Ready : Ready after %d seconds\n",cnt);
-		  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP Tape_Ready\n");
+		  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("Tape_Ready : Ready after %d seconds\n"),cnt);
+		  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP Tape_Ready\n"));
 		  return(0);
 		  /*NOTREACHED*/
 		}
@@ -1546,15 +1589,15 @@ Tape_Ready(
 	      ret = Tape_Status(fd);
 	    }
 
-	  DebugPrint(DEBUG_INFO, SECTION_TAPE,"Tape_Ready : not ready, stop after %d seconds\n",cnt);
-	  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP Tape_Ready\n");
+	  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("Tape_Ready : not ready, stop after %d seconds\n"),cnt);
+	  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP Tape_Ready\n"));
 	  return(0);
 	  /*NOTREACHED*/
 
 	}
-	DebugPrint(DEBUG_INFO, SECTION_TAPE,"Tape_Ready : no ioctl interface, will sleep for %d seconds\n", wait_time);
+	DebugPrint(DEBUG_INFO, SECTION_TAPE,_("Tape_Ready : no ioctl interface, will sleep for %d seconds\n"), wait_time);
 	sleep(wait_time);
-	DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP Tape_Ready\n");
+	DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP Tape_Ready\n"));
 	return(0);
 	/*NOTREACHED*/
     }
@@ -1583,43 +1626,43 @@ Tape_Ready(
 	  switch (SenseHandler(fd, 0, pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
 	    {
 	    case SENSE_NO:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeReady (TestUnitReady) SENSE_NO\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeReady (TestUnitReady) SENSE_NO\n"));
 	      done = 1;
 	      break;
 	    case SENSE_TAPE_NOT_ONLINE:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeReady (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeReady (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n"));
 	      break;
 	    case SENSE_IGNORE:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeReady (TestUnitReady) SENSE_IGNORE\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeReady (TestUnitReady) SENSE_IGNORE\n"));
 	      done = 1;
 	      break;
 	    case SENSE_ABORT:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"TapeReady (TestUnitReady) SENSE_ABORT\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("TapeReady (TestUnitReady) SENSE_ABORT\n"));
 	      amfree(pRequestSense);
 	      return(-1);
 	      /*NOTREACHED*/
 	    case SENSE_RETRY:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeReady (TestUnitReady) SENSE_RETRY\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeReady (TestUnitReady) SENSE_RETRY\n"));
 	      break;
 	    default:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeReady (TestUnitReady) default (SENSE)\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeReady (TestUnitReady) default (SENSE)\n"));
 	      done = 1;
 	      break;
 	    }
 	  break;
 	case SCSI_ERROR:
-	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"TapeReady (TestUnitReady) SCSI_ERROR\n");
+	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("TapeReady (TestUnitReady) SCSI_ERROR\n"));
 	  free(pRequestSense);
 	  return(-1);
 	  /*NOTREACHED*/
 	case SCSI_BUSY:
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeReady (TestUnitReady) SCSI_BUSY\n");
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeReady (TestUnitReady) SCSI_BUSY\n"));
 	  break;
 	case SCSI_CHECK:
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeReady (TestUnitReady) SCSI_CHECK\n");
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeReady (TestUnitReady) SCSI_CHECK\n"));
 	  break;
 	default:
-	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"TapeReady (TestUnitReady) unknown (%d)\n",ret);
+	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("TapeReady (TestUnitReady) unknown (%d)\n"),ret);
 	  break;
 	}
       sleep(1);
@@ -1627,8 +1670,8 @@ Tape_Ready(
     }
 
   amfree(pRequestSense);
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"Tape_Ready after %d sec\n", cnt);
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP Tape_Ready\n");
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("Tape_Ready after %d sec\n"), cnt);
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP Tape_Ready\n"));
   return(0);
 }
 
@@ -1641,27 +1684,27 @@ DecodeSCSI(
   SC_COM_T *pSCSICommand;
   int x;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI, "##### START DecodeSCSI\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI, _("##### START DecodeSCSI\n"));
   pSCSICommand = (SC_COM_T *)&SCSICommand;
 
   while (pSCSICommand->name != NULL)
     {
       if (CDB[0] == pSCSICommand->command)
         {
-          DebugPrint(DEBUG_INFO, SECTION_SCSI,"%s %s", string, pSCSICommand->name);
+          DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%s %s"), string, pSCSICommand->name);
           for (x=0; x < pSCSICommand->length; x++)
             {
               DebugPrint(DEBUG_INFO, SECTION_SCSI," %02X", CDB[x]);
             }
           DebugPrint(DEBUG_INFO, SECTION_SCSI,"\n");
-          DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP DecodeSCSI\n");
+          DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP DecodeSCSI\n"));
           return(0);
 	  /*NOTREACHED*/
 	}
       pSCSICommand++;
     }
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"Not found %X\n", CDB[0]);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP DecodeSCSI\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("Not found %X\n"), CDB[0]);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP DecodeSCSI\n"));
   return(0);
 }
 
@@ -1679,7 +1722,7 @@ DecodeModeSense(
 
   (void)pstring;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START DecodeModeSense\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START DecodeModeSense\n"));
 
   dump_hex(buffer, 255, DEBUG_INFO, SECTION_SCSI);
 
@@ -1689,20 +1732,20 @@ DecodeModeSense(
    */
   buffer = buffer + 4 + offset;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"buffer length = %d\n", length);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("buffer length = %d\n"), length);
 
   if (block) /* Do we have an block descriptor page ?*/
     {
       if (out != NULL)
-     	 fprintf(out, "DecodeModeSense : Density Code %x\n", (unsigned)buffer[0]);
+     	 g_fprintf(out, _("DecodeModeSense : Density Code %x\n"), (unsigned)buffer[0]);
       buffer++;
 
       if (out != NULL)
-      	fprintf(out, "DecodeModeSense : Number of Blocks %d\n", V3(buffer));
+      	g_fprintf(out, _("DecodeModeSense : Number of Blocks %d\n"), V3(buffer));
       buffer = buffer + 4;
 
       if (out != NULL)
-      	fprintf(out, "DecodeModeSense : Block Length %d\n", V3(buffer));
+      	g_fprintf(out, _("DecodeModeSense : Block Length %d\n"), V3(buffer));
       buffer = buffer + 3;
     }
 
@@ -1718,14 +1761,14 @@ DecodeModeSense(
           prp = (ReadWriteErrorRecoveryPage_T *)buffer;
 	  if (out != NULL)
           {
-          	fprintf(out, "DecodeModeSense : Read/Write Error Recovery Page\n");
-          	fprintf(out,"\tTransfer Block            %d\n", prp->tb);
-          	fprintf(out,"\tEnable Early Recovery     %d\n", prp->eer);
-          	fprintf(out,"\tPost Error                %d\n", prp->per);
-          	fprintf(out,"\tDisable Transfer on Error %d\n", prp->dte);
-          	fprintf(out,"\tDisable ECC Correction    %d\n", prp->dcr);
-          	fprintf(out,"\tRead Retry Count          %d\n", prp->ReadRetryCount);
-          	fprintf(out,"\tWrite Retry Count         %d\n", prp->WriteRetryCount);
+          	g_fprintf(out, _("DecodeModeSense : Read/Write Error Recovery Page\n"));
+          	g_fprintf(out,_("\tTransfer Block            %d\n"), prp->tb);
+          	g_fprintf(out,_("\tEnable Early Recovery     %d\n"), prp->eer);
+          	g_fprintf(out,_("\tPost Error                %d\n"), prp->per);
+          	g_fprintf(out,_("\tDisable Transfer on Error %d\n"), prp->dte);
+          	g_fprintf(out,_("\tDisable ECC Correction    %d\n"), prp->dcr);
+          	g_fprintf(out,_("\tRead Retry Count          %d\n"), prp->ReadRetryCount);
+          	g_fprintf(out,_("\tWrite Retry Count         %d\n"), prp->WriteRetryCount);
 	  }
           buffer++;
           break;
@@ -1733,18 +1776,18 @@ DecodeModeSense(
           pdrp = (DisconnectReconnectPage_T *)buffer;
 	  if (out != NULL)
           {
-          	fprintf(out, "DecodeModeSense : Disconnect/Reconnect Page\n");
-          	fprintf(out,"\tBuffer Full Ratio     %d\n", pdrp->BufferFullRatio);
-          	fprintf(out,"\tBuffer Empty Ratio    %d\n", pdrp->BufferEmptyRatio);
-          	fprintf(out,"\tBus Inactivity Limit  %d\n",
+          	g_fprintf(out, _("DecodeModeSense : Disconnect/Reconnect Page\n"));
+          	g_fprintf(out,_("\tBuffer Full Ratio     %d\n"), pdrp->BufferFullRatio);
+          	g_fprintf(out,_("\tBuffer Empty Ratio    %d\n"), pdrp->BufferEmptyRatio);
+          	g_fprintf(out,_("\tBus Inactivity Limit  %d\n"),
                   V2(pdrp->BusInactivityLimit));
-          	fprintf(out,"\tDisconnect Time Limit %d\n",
+          	g_fprintf(out,_("\tDisconnect Time Limit %d\n"),
                   V2(pdrp->DisconnectTimeLimit));
-          	fprintf(out,"\tConnect Time Limit    %d\n",
+          	g_fprintf(out,_("\tConnect Time Limit    %d\n"),
                   V2(pdrp->ConnectTimeLimit));
-          	fprintf(out,"\tMaximum Burst Size    %d\n",
+          	g_fprintf(out,_("\tMaximum Burst Size    %d\n"),
                   V2(pdrp->MaximumBurstSize));
-          	fprintf(out,"\tDTDC                  %d\n", pdrp->DTDC);
+          	g_fprintf(out,_("\tDTDC                  %d\n"), pdrp->DTDC);
 	  }
           buffer++;
           break;
@@ -1752,22 +1795,22 @@ DecodeModeSense(
           pEAAPage = (EAAPage_T *)buffer;
 	  if (out != NULL)
 	  {
-          	fprintf(out,"DecodeModeSense : Element Address Assignment Page\n");
-          	fprintf(out,"\tMedium Transport Element Address     %d\n",
+          	g_fprintf(out,_("DecodeModeSense : Element Address Assignment Page\n"));
+          	g_fprintf(out,_("\tMedium Transport Element Address     %d\n"),
                     V2(pEAAPage->MediumTransportElementAddress));
-          	fprintf(out,"\tNumber of Medium Transport Elements  %d\n",
+          	g_fprintf(out,_("\tNumber of Medium Transport Elements  %d\n"),
                     V2(pEAAPage->NoMediumTransportElements));
-          	fprintf(out, "\tFirst Storage Element Address       %d\n",
+          	g_fprintf(out, _("\tFirst Storage Element Address       %d\n"),
                     V2(pEAAPage->FirstStorageElementAddress));
-          	fprintf(out, "\tNumber of  Storage Elements         %d\n",
+          	g_fprintf(out, _("\tNumber of  Storage Elements         %d\n"),
                     V2(pEAAPage->NoStorageElements));
-          	fprintf(out, "\tFirst Import/Export Element Address %d\n",
+          	g_fprintf(out, _("\tFirst Import/Export Element Address %d\n"),
                     V2(pEAAPage->FirstImportExportElementAddress));
-          	fprintf(out, "\tNumber of  ImportExport Elements    %d\n",
+          	g_fprintf(out, _("\tNumber of  ImportExport Elements    %d\n"),
                     V2(pEAAPage->NoImportExportElements));
-          	fprintf(out, "\tFirst Data Transfer Element Address %d\n",
+          	g_fprintf(out, _("\tFirst Data Transfer Element Address %d\n"),
                     V2(pEAAPage->FirstDataTransferElementAddress));
-          	fprintf(out, "\tNumber of  Data Transfer Elements   %d\n",
+          	g_fprintf(out, _("\tNumber of  Data Transfer Elements   %d\n"),
                     V2(pEAAPage->NoDataTransferElements));
 	  }
           buffer++;
@@ -1776,43 +1819,43 @@ DecodeModeSense(
           pDeviceCapabilitiesPage = (DeviceCapabilitiesPage_T *)buffer;
 	  if (out != NULL)
 	  {
-          	fprintf(out, "DecodeModeSense : MT can store data cartridges %d\n",
+          	g_fprintf(out, _("DecodeModeSense : MT can store data cartridges %d\n"),
                     pDeviceCapabilitiesPage->MT);
-          	fprintf(out, "DecodeModeSense : ST can store data cartridges %d\n",
+          	g_fprintf(out, _("DecodeModeSense : ST can store data cartridges %d\n"),
                     pDeviceCapabilitiesPage->ST);
-          	fprintf(out, "DecodeModeSense : IE can store data cartridges %d\n",
+          	g_fprintf(out, _("DecodeModeSense : IE can store data cartridges %d\n"),
                     pDeviceCapabilitiesPage->IE);
-          	fprintf(out, "DecodeModeSense : DT can store data cartridges %d\n",
+          	g_fprintf(out, _("DecodeModeSense : DT can store data cartridges %d\n"),
                     pDeviceCapabilitiesPage->DT);
-          	fprintf(out, "DecodeModeSense : MT to MT %d\n",
+          	g_fprintf(out, _("DecodeModeSense : MT to MT %d\n"),
                     pDeviceCapabilitiesPage->MT2MT);
-          	fprintf(out, "DecodeModeSense : MT to ST %d\n",
+          	g_fprintf(out, _("DecodeModeSense : MT to ST %d\n"),
                     pDeviceCapabilitiesPage->MT2ST);
-          	fprintf(out, "DecodeModeSense : MT to IE %d\n",
+          	g_fprintf(out, _("DecodeModeSense : MT to IE %d\n"),
                     pDeviceCapabilitiesPage->MT2IE);
-          	fprintf(out, "DecodeModeSense : MT to DT %d\n",
+          	g_fprintf(out, _("DecodeModeSense : MT to DT %d\n"),
                     pDeviceCapabilitiesPage->MT2DT);
-          	fprintf(out, "DecodeModeSense : ST to MT %d\n",
+          	g_fprintf(out, _("DecodeModeSense : ST to MT %d\n"),
                     pDeviceCapabilitiesPage->ST2ST);
-          	fprintf(out, "DecodeModeSense : ST to MT %d\n",
+          	g_fprintf(out, _("DecodeModeSense : ST to MT %d\n"),
                     pDeviceCapabilitiesPage->ST2ST);
-          	fprintf(out, "DecodeModeSense : ST to DT %d\n",
+          	g_fprintf(out, _("DecodeModeSense : ST to DT %d\n"),
                     pDeviceCapabilitiesPage->ST2DT);
-          	fprintf(out, "DecodeModeSense : IE to MT %d\n",
+          	g_fprintf(out, _("DecodeModeSense : IE to MT %d\n"),
                     pDeviceCapabilitiesPage->IE2MT);
-          	fprintf(out, "DecodeModeSense : IE to ST %d\n",
+          	g_fprintf(out, _("DecodeModeSense : IE to ST %d\n"),
                     pDeviceCapabilitiesPage->IE2IE);
-          	fprintf(out, "DecodeModeSense : IE to ST %d\n",
+          	g_fprintf(out, _("DecodeModeSense : IE to ST %d\n"),
                     pDeviceCapabilitiesPage->IE2DT);
-          	fprintf(out, "DecodeModeSense : IE to ST %d\n",
+          	g_fprintf(out, _("DecodeModeSense : IE to ST %d\n"),
                     pDeviceCapabilitiesPage->IE2DT);
-          	fprintf(out, "DecodeModeSense : DT to MT %d\n",
+          	g_fprintf(out, _("DecodeModeSense : DT to MT %d\n"),
                     pDeviceCapabilitiesPage->DT2MT);
-          	fprintf(out, "DecodeModeSense : DT to ST %d\n",
+          	g_fprintf(out, _("DecodeModeSense : DT to ST %d\n"),
                     pDeviceCapabilitiesPage->DT2ST);
-          	fprintf(out, "DecodeModeSense : DT to IE %d\n",
+          	g_fprintf(out, _("DecodeModeSense : DT to IE %d\n"),
                     pDeviceCapabilitiesPage->DT2IE);
-          	fprintf(out, "DecodeModeSense : DT to DT %d\n",
+          	g_fprintf(out, _("DecodeModeSense : DT to DT %d\n"),
                     pDeviceCapabilitiesPage->DT2DT);
 	  }
           buffer++;
@@ -1846,67 +1889,67 @@ DecodeSense(
       return(0);
       /*NOTREACHED*/
     }
-  fprintf(out,"##### START DecodeSense\n");
-  fprintf(out,"%sSense Keys\n", pstring);
+  g_fprintf(out,_("##### START DecodeSense\n"));
+  g_fprintf(out,_("%sSense Keys\n"), pstring);
   if (sense->ErrorCode == 0x70)
     {
-    fprintf(out,"\tExtended Sense                     \n");
+    g_fprintf(out,_("\tExtended Sense                     \n"));
     } else {
-      fprintf(out,"\tErrorCode                     %02x\n", sense->ErrorCode);
-      fprintf(out,"\tValid                         %d\n", sense->Valid);
+      g_fprintf(out,_("\tErrorCode                     %02x\n"), sense->ErrorCode);
+      g_fprintf(out,_("\tValid                         %d\n"), sense->Valid);
     }
-  fprintf(out,"\tASC                           %02X\n", sense->AdditionalSenseCode);
-  fprintf(out,"\tASCQ                          %02X\n", sense->AdditionalSenseCodeQualifier);
-  fprintf(out,"\tSense key                     %02X\n", sense->SenseKey);
+  g_fprintf(out,_("\tASC                           %02X\n"), sense->AdditionalSenseCode);
+  g_fprintf(out,_("\tASCQ                          %02X\n"), sense->AdditionalSenseCodeQualifier);
+  g_fprintf(out,_("\tSense key                     %02X\n"), sense->SenseKey);
   switch (sense->SenseKey)
     {
     case 0:
-      fprintf(out,"\t\tNo Sense\n");
+      g_fprintf(out,_("\t\tNo Sense\n"));
       break;
     case 1:
-      fprintf(out,"\t\tRecoverd Error\n");
+      g_fprintf(out,_("\t\tRecoverd Error\n"));
       break;
     case 2:
-      fprintf(out,"\t\tNot Ready\n");
+      g_fprintf(out,_("\t\tNot Ready\n"));
       break;
     case 3:
-      fprintf(out,"\t\tMedium Error\n");
+      g_fprintf(out,_("\t\tMedium Error\n"));
       break;
     case 4:
-      fprintf(out,"\t\tHardware Error\n");
+      g_fprintf(out,_("\t\tHardware Error\n"));
       break;
     case 5:
-      fprintf(out,"\t\tIllegal Request\n");
+      g_fprintf(out,_("\t\tIllegal Request\n"));
       break;
     case 6:
-      fprintf(out,"\t\tUnit Attention\n");
+      g_fprintf(out,_("\t\tUnit Attention\n"));
       break;
     case 7:
-      fprintf(out,"\t\tData Protect\n");
+      g_fprintf(out,_("\t\tData Protect\n"));
       break;
     case 8:
-      fprintf(out,"\t\tBlank Check\n");
+      g_fprintf(out,_("\t\tBlank Check\n"));
       break;
     case 9:
-      fprintf(out,"\t\tVendor uniq\n");
+      g_fprintf(out,_("\t\tVendor uniq\n"));
       break;
     case 0xa:
-      fprintf(out,"\t\tCopy Aborted\n");
+      g_fprintf(out,_("\t\tCopy Aborted\n"));
       break;
     case 0xb:
-      fprintf(out,"\t\tAborted Command\n");
+      g_fprintf(out,_("\t\tAborted Command\n"));
       break;
     case 0xc:
-      fprintf(out,"\t\tEqual\n");
+      g_fprintf(out,_("\t\tEqual\n"));
       break;
     case 0xd:
-      fprintf(out,"\t\tVolume Overflow\n");
+      g_fprintf(out,_("\t\tVolume Overflow\n"));
       break;
     case 0xe:
-      fprintf(out,"\t\tMiscompare\n");
+      g_fprintf(out,_("\t\tMiscompare\n"));
       break;
     case 0xf:
-      fprintf(out,"\t\tReserved\n");
+      g_fprintf(out,_("\t\tReserved\n"));
       break;
     }
   return(0);
@@ -1920,65 +1963,65 @@ DecodeExtSense(
 {
   ExtendedRequestSense_T *p;
 
-  fprintf(out,"##### START DecodeExtSense\n");
+  g_fprintf(out,_("##### START DecodeExtSense\n"));
   p = sense;
 
-  fprintf(out,"%sExtended Sense\n", pstring);
+  g_fprintf(out,_("%sExtended Sense\n"), pstring);
   DecodeSense((RequestSense_T *)p, pstring, out);
-  fprintf(out,"\tLog Parameter Page Code         %02X\n", sense->LogParameterPageCode);
-  fprintf(out,"\tLog Parameter Code              %02X\n", sense->LogParameterCode);
-  fprintf(out,"\tUnderrun/Overrun Counter        %02X\n", sense->UnderrunOverrunCounter);
-  fprintf(out,"\tRead/Write Error Counter        %d\n", V3((char *)sense->ReadWriteDataErrorCounter));
+  g_fprintf(out,_("\tLog Parameter Page Code         %02X\n"), sense->LogParameterPageCode);
+  g_fprintf(out,_("\tLog Parameter Code              %02X\n"), sense->LogParameterCode);
+  g_fprintf(out,_("\tUnderrun/Overrun Counter        %02X\n"), sense->UnderrunOverrunCounter);
+  g_fprintf(out,_("\tRead/Write Error Counter        %d\n"), V3((char *)sense->ReadWriteDataErrorCounter));
   if (sense->AdditionalSenseLength > (u_char)sizeof(RequestSense_T))
     {
       if (sense->PF)
-        fprintf(out,"\tPower Fail\n");
+        g_fprintf(out,_("\tPower Fail\n"));
       if (sense->BPE)
-        fprintf(out,"\tSCSI Bus Parity Error\n");
+        g_fprintf(out,_("\tSCSI Bus Parity Error\n"));
       if (sense->FPE)
-        fprintf(out,"\tFormatted Buffer parity Error\n");
+        g_fprintf(out,_("\tFormatted Buffer parity Error\n"));
       if (sense->ME)
-        fprintf(out,"\tMedia Error\n");
+        g_fprintf(out,_("\tMedia Error\n"));
       if (sense->ECO)
-        fprintf(out,"\tError Counter Overflow\n");
+        g_fprintf(out,_("\tError Counter Overflow\n"));
       if (sense->TME)
-        fprintf(out,"\tTapeMotion Error\n");
+        g_fprintf(out,_("\tTapeMotion Error\n"));
       if (sense->TNP)
-        fprintf(out,"\tTape Not Present\n");
+        g_fprintf(out,_("\tTape Not Present\n"));
       if (sense->LBOT)
-        fprintf(out,"\tLogical Beginning of tape\n");
+        g_fprintf(out,_("\tLogical Beginning of tape\n"));
       if (sense->TMD)
-        fprintf(out,"\tTape Mark Detect Error\n");
+        g_fprintf(out,_("\tTape Mark Detect Error\n"));
       if (sense->WP)
-        fprintf(out,"\tWrite Protect\n");
+        g_fprintf(out,_("\tWrite Protect\n"));
       if (sense->FMKE)
-        fprintf(out,"\tFilemark Error\n");
+        g_fprintf(out,_("\tFilemark Error\n"));
       if (sense->URE)
-        fprintf(out,"\tUnder Run Error\n");
+        g_fprintf(out,_("\tUnder Run Error\n"));
       if (sense->WEI)
-        fprintf(out,"\tWrite Error 1\n");
+        g_fprintf(out,_("\tWrite Error 1\n"));
       if (sense->SSE)
-        fprintf(out,"\tServo System Error\n");
+        g_fprintf(out,_("\tServo System Error\n"));
       if (sense->FE)
-        fprintf(out,"\tFormatter Error\n");
+        g_fprintf(out,_("\tFormatter Error\n"));
       if (sense->UCLN)
-        fprintf(out,"\tCleaning Cartridge is empty\n");
+        g_fprintf(out,_("\tCleaning Cartridge is empty\n"));
       if (sense->RRR)
-        fprintf(out,"\tReverse Retries Required\n");
+        g_fprintf(out,_("\tReverse Retries Required\n"));
       if (sense->CLND)
-        fprintf(out,"\tTape Drive has been cleaned\n");
+        g_fprintf(out,_("\tTape Drive has been cleaned\n"));
       if (sense->CLN)
-        fprintf(out,"\tTape Drive needs to be cleaned\n");
+        g_fprintf(out,_("\tTape Drive needs to be cleaned\n"));
       if (sense->PEOT)
-        fprintf(out,"\tPhysical End of Tape\n");
+        g_fprintf(out,_("\tPhysical End of Tape\n"));
       if (sense->WSEB)
-        fprintf(out,"\tWrite Splice Error\n");
+        g_fprintf(out,_("\tWrite Splice Error\n"));
       if (sense->WSEO)
-        fprintf(out,"\tWrite Splice Error\n");
-      fprintf(out,"\tRemaing 1024 byte tape blocks   %d\n", V3((char *)sense->RemainingTape));
-      fprintf(out,"\tTracking Retry Counter          %02X\n", sense->TrackingRetryCounter);
-      fprintf(out,"\tRead/Write Retry Counter        %02X\n", sense->ReadWriteRetryCounter);
-      fprintf(out,"\tFault Sympton Code              %02X\n", sense->FaultSymptomCode);
+        g_fprintf(out,_("\tWrite Splice Error\n"));
+      g_fprintf(out,_("\tRemaing 1024 byte tape blocks   %d\n"), V3((char *)sense->RemainingTape));
+      g_fprintf(out,_("\tTracking Retry Counter          %02X\n"), sense->TrackingRetryCounter);
+      g_fprintf(out,_("\tRead/Write Retry Counter        %02X\n"), sense->ReadWriteRetryCounter);
+      g_fprintf(out,_("\tFault Sympton Code              %02X\n"), sense->FaultSymptomCode);
     }
   return(0);
 }
@@ -1987,19 +2030,19 @@ int
 PrintInquiry(
     SCSIInquiry_T *	SCSIInquiry)
 {
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START PrintInquiry\n");
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %x\n", "qualifier", SCSIInquiry->qualifier);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %x\n", "type", SCSIInquiry->type);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %x\n", "data_format", SCSIInquiry->data_format);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %X\n", "ansi_version", SCSIInquiry->ansi_version);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %X\n", "ecma_version", SCSIInquiry->ecma_version);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %X\n", "iso_version", SCSIInquiry->iso_version);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %X\n", "type_modifier", SCSIInquiry->type_modifier);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %x\n", "removable", SCSIInquiry->removable);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %.8s\n", "vendor_info", SCSIInquiry->vendor_info);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %.16s\n", "prod_ident", SCSIInquiry->prod_ident);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %.4s\n", "prod_version", SCSIInquiry->prod_version);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"%-15s %.19s\n", "vendor_specific", SCSIInquiry->vendor_specific);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START PrintInquiry\n"));
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %x\n"), "qualifier", SCSIInquiry->qualifier);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %x\n"), "type", SCSIInquiry->type);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %x\n"), "data_format", SCSIInquiry->data_format);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %X\n"), "ansi_version", SCSIInquiry->ansi_version);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %X\n"), "ecma_version", SCSIInquiry->ecma_version);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %X\n"), "iso_version", SCSIInquiry->iso_version);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %X\n"), "type_modifier", SCSIInquiry->type_modifier);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %x\n"), "removable", SCSIInquiry->removable);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %.8s\n"), "vendor_info", SCSIInquiry->vendor_info);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %.16s\n"), "prod_ident", SCSIInquiry->prod_ident);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %.4s\n"), "prod_version", SCSIInquiry->prod_version);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("%-15s %.19s\n"), "vendor_specific", SCSIInquiry->vendor_specific);
   return(0);
 }
 
@@ -2007,7 +2050,7 @@ PrintInquiry(
 int
 DoNothing0(void)
 {
-  dbprintf(("##### START DoNothing\n"));
+  dbprintf(_("##### START DoNothing\n"));
   return(0);
 }
 
@@ -2017,7 +2060,7 @@ DoNothing1(
 {
   (void)unused1;	/* Quiet unused parameter warning */
 
-  dbprintf(("##### START DoNothing\n"));
+  dbprintf(_("##### START DoNothing\n"));
   return(0);
 }
 
@@ -2029,7 +2072,7 @@ DoNothing2(
   (void)unused1;	/* Quiet unused parameter warning */
   (void)unused2;	/* Quiet unused parameter warning */
 
-  dbprintf(("##### START DoNothing\n"));
+  dbprintf(_("##### START DoNothing\n"));
   return(0);
 }
 
@@ -2043,21 +2086,21 @@ DoNothing3(
   (void)unused2;	/* Quiet unused parameter warning */
   (void)unused3;	/* Quiet unused parameter warning */
 
-  dbprintf(("##### START DoNothing\n"));
+  dbprintf(_("##### START DoNothing\n"));
   return(0);
 }
 
 int
 GenericFree(void)
 {
-  dbprintf(("##### START GenericFree\n"));
+  dbprintf(_("##### START GenericFree\n"));
   return(0);
 }
 
 int
 GenericSearch(void)
 {
-  dbprintf(("##### START GenericSearch\n"));
+  dbprintf(_("##### START GenericSearch\n"));
   return(0);
 }
 
@@ -2069,7 +2112,7 @@ TreeFrogBarCode(
 
   ModePageTreeFrogVendorUnique_T *pVendor;
 
-  dbprintf(("##### START TreeFrogBarCode\n"));
+  dbprintf(_("##### START TreeFrogBarCode\n"));
   if (pModePage == NULL)
     {
       pModePage = alloc(0xff);
@@ -2077,18 +2120,18 @@ TreeFrogBarCode(
 
   if (SCSI_ModeSense(DeviceFD, pModePage, 0xff, 0x0, 0x3f) == 0)
     {
-      DecodeModeSense(pModePage, 0, "TreeFrogBarCode :", 0, debug_file);
+      DecodeModeSense(pModePage, 0, _("TreeFrogBarCode :"), 0, debug_file);
 
       if (pVendorUnique == NULL)
       {
-         dbprintf(("TreeFrogBarCode : no pVendorUnique\n"));
+         dbprintf(_("TreeFrogBarCode : no pVendorUnique\n"));
          return(0);
 	 /*NOTREACHED*/
       }
       pVendor = ( ModePageTreeFrogVendorUnique_T *)pVendorUnique;
 
-      dbprintf(("TreeFrogBarCode : EBARCO %d\n", pVendor->EBARCO));
-      dbprintf(("TreeFrogCheckSum : CHKSUM  %d\n", pVendor->CHKSUM));
+      dbprintf(_("TreeFrogBarCode : EBARCO %d\n"), pVendor->EBARCO);
+      dbprintf(_("TreeFrogCheckSum : CHKSUM  %d\n"), pVendor->CHKSUM);
 
       dump_hex((u_char *)pDev[INDEX_CHANGER].inquiry, INQUIRY_SIZE, DEBUG_INFO, SECTION_ELEMENT);
       return(pVendor->EBARCO);
@@ -2106,14 +2149,14 @@ EXB_BarCode(
   ModePageEXB120VendorUnique_T *pVendor;
   ModePageEXB120VendorUnique_T *pVendorWork;
 
-  DebugPrint(DEBUG_INFO, SECTION_BARCODE,"##### START EXB_BarCode\n");
+  DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("##### START EXB_BarCode\n"));
   if (pModePage == NULL && LibModeSenseValid == 0)
     {
       pModePage = alloc(0xff);
 
       if (SCSI_ModeSense(DeviceFD, pModePage, 0xff, 0x8, 0x3f) == 0)
 	{
-	  DecodeModeSense(pModePage, 0, "EXB_BarCode :", 0, debug_file);
+	  DecodeModeSense(pModePage, 0, _("EXB_BarCode :"), 0, debug_file);
 	  LibModeSenseValid = 1;
 	} else {
 	  LibModeSenseValid = -1;
@@ -2124,25 +2167,25 @@ EXB_BarCode(
     {
       if (pVendorUnique == NULL)
 	{
-         DebugPrint(DEBUG_INFO, SECTION_BARCODE,"EXB_BarCode : no pVendorUnique\n");
+         DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("EXB_BarCode : no pVendorUnique\n"));
          return(0);
 	 /*NOTREACHED*/
       }
       pVendor = ( ModePageEXB120VendorUnique_T *)pVendorUnique;
 
-      DebugPrint(DEBUG_INFO, SECTION_BARCODE,"EXB_BarCode : NBL %d\n", pVendor->NBL);
-      DebugPrint(DEBUG_INFO, SECTION_BARCODE,"EXB_BarCode : PS  %d\n", pVendor->PS);
+      DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("EXB_BarCode : NBL %d\n"), pVendor->NBL);
+      DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("EXB_BarCode : PS  %d\n"), pVendor->PS);
       if (pVendor->NBL == 1 && pVendor->PS == 1 )
         {
           pVendorWork = alloc((size_t)pVendor->ParameterListLength + 2);
-          DebugPrint(DEBUG_INFO, SECTION_BARCODE,"EXB_BarCode : setting NBL to 1\n");
+          DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("EXB_BarCode : setting NBL to 1\n"));
           memcpy(pVendorWork, pVendor, (size_t)pVendor->ParameterListLength + 2);
           pVendorWork->NBL = 0;
           pVendorWork->PS = 0;
           pVendorWork->RSVD0 = 0;
           if (SCSI_ModeSelect(DeviceFD, (u_char *)pVendorWork, (u_char)(pVendorWork->ParameterListLength + 2), 0, 1, 0) == 0)
             {
-              DebugPrint(DEBUG_INFO, SECTION_BARCODE,"EXB_BarCode : SCSI_ModeSelect OK\n");
+              DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("EXB_BarCode : SCSI_ModeSelect OK\n"));
               /* Hack !!!!!!
                */
               pVendor->NBL = 0;
@@ -2151,12 +2194,12 @@ EXB_BarCode(
                */
               GenericResetStatus(DeviceFD);
             } else {
-              DebugPrint(DEBUG_INFO, SECTION_BARCODE,"EXB_BarCode : SCSI_ModeSelect failed\n");
+              DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("EXB_BarCode : SCSI_ModeSelect failed\n"));
             }
             amfree(pVendorWork);
         }
       dump_hex((u_char *)pDev[INDEX_CHANGER].inquiry, INQUIRY_SIZE, DEBUG_INFO, SECTION_BARCODE);
-      DebugPrint(DEBUG_INFO, SECTION_BARCODE,"EXB_BarCode : vendor_specific[19] %x\n",
+      DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("EXB_BarCode : vendor_specific[19] %x\n"),
 		 pDev[INDEX_CHANGER].inquiry->vendor_specific[19]);
     }
   return(1);
@@ -2168,8 +2211,8 @@ NoBarCode(
 {
   (void)DeviceFD;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO, SECTION_BARCODE,"##### START NoBarCode\n");
-  DebugPrint(DEBUG_INFO, SECTION_BARCODE,"##### STOP  NoBarCode\n");
+  DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("##### START NoBarCode\n"));
+  DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("##### STOP  NoBarCode\n"));
   return(0);
 }
 
@@ -2179,14 +2222,14 @@ GenericBarCode(
 {
   (void)DeviceFD;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO, SECTION_BARCODE,"##### START GenericBarCode\n");
+  DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("##### START GenericBarCode\n"));
   if ( changer->havebarcode  >= 1)
     {
-      DebugPrint(DEBUG_INFO, SECTION_BARCODE,"##### STOP GenericBarCode (havebarcode) => %d\n",changer->havebarcode);
+      DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("##### STOP GenericBarCode (havebarcode) => %d\n"),changer->havebarcode);
       return(1);
       /*NOTREACHED*/
     }
-  DebugPrint(DEBUG_INFO, SECTION_BARCODE,"##### STOP GenericBarCode => 0\n");
+  DebugPrint(DEBUG_INFO, SECTION_BARCODE,_("##### STOP GenericBarCode => 0\n"));
   return(0);
 }
 
@@ -2201,16 +2244,16 @@ SenseHandler(
 {
   extern OpenFiles_T *pDev;
   int ret = 0;
-  dbprintf(("##### START SenseHandler\n"));
+  dbprintf(_("##### START SenseHandler\n"));
   if (pDev[DeviceFD].inqdone == 1)
     {
-      dbprintf(("Ident = [%s], function = [%s]\n", pDev[DeviceFD].ident,
-		pDev[DeviceFD].functions->ident));
+      dbprintf(_("Ident = [%s], function = [%s]\n"), pDev[DeviceFD].ident,
+		pDev[DeviceFD].functions->ident);
       ret = pDev[DeviceFD].functions->function_error(DeviceFD, flag, SenseKey, AdditionalSenseCode, AdditionalSenseCodeQualifier, buffer);
     } else {
-      dbprintf(("    Ups no sense\n"));
+      dbprintf(_("    Ups no sense\n"));
     }
-  dbprintf(("#### STOP SenseHandler\n"));
+  dbprintf(_("#### STOP SenseHandler\n"));
   return(ret);
 }
 
@@ -2234,7 +2277,7 @@ TapeStatus(void)
   int cnt;
   RequestSense_T *pRequestSense;
 
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### START TapeStatus\n");
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### START TapeStatus\n"));
 
   /*
    * If it is an device which understand SCSI commands the
@@ -2249,7 +2292,7 @@ TapeStatus(void)
       for (done = 0, cnt = 0; !done && (cnt < 60); cnt++)
 	{
 	  ret = SCSI_TestUnitReady(INDEX_TAPECTL, pRequestSense);
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI, "TapeStatus TestUnitReady ret %d\n",ret);
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI, _("TapeStatus TestUnitReady ret %d\n"),ret);
 	  switch (ret)
 	    {
 	    case SCSI_OK:
@@ -2258,49 +2301,49 @@ TapeStatus(void)
 		{
 		case SENSE_IGNORE:
 		case SENSE_NO:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeStatus (TestUnitReady) SENSE_NO\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeStatus (TestUnitReady) SENSE_NO\n"));
 		  pDTE[0].status = 'F';
-		  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### FULL\n");
+		  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### FULL\n"));
 		  done = 1;
 		  break;
 
 		case SENSE_TAPE_NOT_ONLINE:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeStatus (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeStatus (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n"));
 		  pDTE[0].status = 'E';
-		  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### EMPTY\n");
+		  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### EMPTY\n"));
 		  done = 1;
 		  break;
 
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"TapeStatus (TestUnitReady) SENSE_ABORT\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("TapeStatus (TestUnitReady) SENSE_ABORT\n"));
 		  done = 1;
 		  break;
 
 		case SENSE_RETRY:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeStatus (TestUnitReady) SENSE_RETRY\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeStatus (TestUnitReady) SENSE_RETRY\n"));
 		  break;
 
 		default:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeStatus (TestUnitReady) default (SENSE)\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeStatus (TestUnitReady) default (SENSE)\n"));
 		  break;
 		}
 	      break;
 
 	    case SCSI_ERROR:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"TapeStatus (TestUnitReady) SCSI_ERROR\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("TapeStatus (TestUnitReady) SCSI_ERROR\n"));
 	      done = 1;
 	      break;
 
 	    case SCSI_BUSY:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeStatus (TestUnitReady) SCSI_BUSY\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeStatus (TestUnitReady) SCSI_BUSY\n"));
 	      break;
 
 	    case SCSI_CHECK:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"TapeStatus (TestUnitReady) SCSI_CHECK\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("TapeStatus (TestUnitReady) SCSI_CHECK\n"));
 	      break;
 
 	    default:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"TapeStatus (TestUnitReady) unknown (%d)\n",ret);
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("TapeStatus (TestUnitReady) unknown (%d)\n"),ret);
 	      break;
 
 	    }
@@ -2313,12 +2356,12 @@ TapeStatus(void)
       if ( ret & TAPE_ONLINE)
 	{
 	  pDTE[0].status ='F';
-	  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### FULL\n");
+	  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### FULL\n"));
 	} else {
 	  pDTE[0].status = 'E';
-	  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### EMPTY\n");
+	  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### EMPTY\n"));
 	}
-      DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP TapeStatus\n");
+      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP TapeStatus\n"));
     }
     return(0);
 }
@@ -2338,14 +2381,14 @@ DLT4000Eject(
 
   (void)Device;	/* Quiet unused parameter warning */
 
-  dbprintf(("##### START DLT4000Eject\n"));
+  dbprintf(_("##### START DLT4000Eject\n"));
 
   pRequestSense = alloc(SIZEOF(RequestSense_T));
   pExtendedRequestSense = alloc(SIZEOF(ExtendedRequestSense_T));
 
   if ( type > 1)
     {
-      dbprintf(("DLT4000Eject : use mtio ioctl for eject on %s\n", pDev[INDEX_TAPE].dev));
+      dbprintf(_("DLT4000Eject : use mtio ioctl for eject on %s\n"), pDev[INDEX_TAPE].dev);
       free(pExtendedRequestSense);
       free(pRequestSense);
       return(Tape_Ioctl(INDEX_TAPE, IOCTL_EJECT));
@@ -2356,7 +2399,7 @@ DLT4000Eject(
 
   if (pDev[INDEX_TAPECTL].SCSI == 0)
     {
-      dbprintf(("DLT4000Eject : Device %s not able to receive SCSI commands\n", pDev[INDEX_TAPE].dev));
+      dbprintf(_("DLT4000Eject : Device %s not able to receive SCSI commands\n"), pDev[INDEX_TAPE].dev);
       free(pExtendedRequestSense);
       free(pRequestSense);
       return(Tape_Ioctl(INDEX_TAPE, IOCTL_EJECT));
@@ -2364,17 +2407,17 @@ DLT4000Eject(
     }
 
 
-  dbprintf(("DLT4000Eject : SCSI eject on %s = %s\n", pDev[INDEX_TAPECTL].dev, pDev[INDEX_TAPECTL].ConfigName));
+  dbprintf(_("DLT4000Eject : SCSI eject on %s = %s\n"), pDev[INDEX_TAPECTL].dev, pDev[INDEX_TAPECTL].ConfigName);
 
   RequestSense(INDEX_TAPECTL, pExtendedRequestSense, 0);
-  DecodeExtSense(pExtendedRequestSense, "DLT4000Eject : ", debug_file);
+  DecodeExtSense(pExtendedRequestSense, _("DLT4000Eject : "), debug_file);
   /* Unload the tape, 0 ==  wait for success
    * 0 == unload
    */
   ret = SCSI_LoadUnload(INDEX_TAPECTL, pRequestSense, 0, 0);
 
   RequestSense(INDEX_TAPECTL, pExtendedRequestSense, 0);
-  DecodeExtSense(pExtendedRequestSense, "DLT4000Eject : ", debug_file);
+  DecodeExtSense(pExtendedRequestSense, _("DLT4000Eject : "), debug_file);
 
   /* < 0 == fatal */
   if (ret >= 0) {
@@ -2388,7 +2431,7 @@ DLT4000Eject(
   while (!done && cnt < 300)
     {
       ret = SCSI_TestUnitReady(INDEX_TAPECTL, pRequestSense);
-      DebugPrint(DEBUG_INFO, SECTION_SCSI, "DLT4000Eject TestUnitReady ret %d\n",ret);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI, _("DLT4000Eject TestUnitReady ret %d\n"),ret);
       switch (ret)
 	{
 	case SCSI_OK:
@@ -2398,46 +2441,46 @@ DLT4000Eject(
 	  switch (SenseHandler(INDEX_TAPECTL, 0, pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
 	    {
 	    case SENSE_NO:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"DLT4000Eject (TestUnitReady) SENSE_NO\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) SENSE_NO\n"));
 	      done = 1;
 	      break;
 	    case SENSE_TAPE_NOT_ONLINE:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"DLT4000Eject (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n"));
 	      done = 1;
 	      break;
 	    case SENSE_IGNORE:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"DLT4000Eject (TestUnitReady) SENSE_IGNORE\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) SENSE_IGNORE\n"));
 	      done = 1;
 	      break;
 	    case SENSE_ABORT:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"DLT4000Eject (TestUnitReady) SENSE_ABORT\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) SENSE_ABORT\n"));
 	      free(pExtendedRequestSense);
 	      free(pRequestSense);
 	      return(-1);
 	      /*NOTREACHED*/
 	    case SENSE_RETRY:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"DLT4000Eject (TestUnitReady) SENSE_RETRY\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) SENSE_RETRY\n"));
 	      break;
 	    default:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"DLT4000Eject (TestUnitReady) default (SENSE)\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) default (SENSE)\n"));
 	      done = 1;
 	      break;
 	    }
 	  break;
 	case SCSI_ERROR:
-	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"DLT4000Eject (TestUnitReady) SCSI_ERROR\n");
+	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) SCSI_ERROR\n"));
 	  free(pExtendedRequestSense);
 	  free(pRequestSense);
 	  return(-1);
 	  /*NOTREACHED*/
 	case SCSI_BUSY:
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"DLT4000Eject (TestUnitReady) SCSI_BUSY\n");
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) SCSI_BUSY\n"));
 	  break;
 	case SCSI_CHECK:
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"DLT4000Eject (TestUnitReady) SCSI_CHECK\n");
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) SCSI_CHECK\n"));
 	  break;
 	default:
-	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"DLT4000Eject (TestUnitReady) unknown (%d)\n",ret);
+	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("DLT4000Eject (TestUnitReady) unknown (%d)\n"),ret);
 	  break;
 	}
 
@@ -2445,7 +2488,7 @@ DLT4000Eject(
       sleep(2);
     }
 
-  dbprintf(("DLT4000Eject : Ready after %d sec, done = %d\n", cnt * 2, done));
+  dbprintf(_("DLT4000Eject : Ready after %d sec, done = %d\n"), cnt * 2, done);
 
   free(pExtendedRequestSense);
   free(pRequestSense);
@@ -2475,11 +2518,11 @@ GenericEject(
   (void)Device;	/* Quiet unused parameter warning */
   (void)type;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO, SECTION_TAPE, "##### START GenericEject\n");
+  DebugPrint(DEBUG_INFO, SECTION_TAPE, _("##### START GenericEject\n"));
 
   pRequestSense = alloc(SIZEOF(RequestSense_T));
 
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"GenericEject : SCSI eject on %s = %s\n",
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("GenericEject : SCSI eject on %s = %s\n"),
              pDev[INDEX_TAPECTL].dev, pDev[INDEX_TAPECTL].ConfigName);
 
   /*
@@ -2496,6 +2539,7 @@ GenericEject(
 
       /* < 0 == fatal */
       if (ret < 0) {
+        DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericEject SCSI_LoadUnload failed\n");
 	free(pRequestSense);
 	return(-1);
 	/*NOTREACHED*/
@@ -2505,7 +2549,7 @@ GenericEject(
       while (!done && cnt < 300)
 	{
 	  ret = SCSI_TestUnitReady(INDEX_TAPECTL, pRequestSense);
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI, "GenericEject TestUnitReady ret %d\n",ret);
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI, _("GenericEject TestUnitReady ret %d\n"),ret);
 	  switch (ret)
 	    {
 	    case SCSI_OK:
@@ -2513,52 +2557,52 @@ GenericEject(
 	      switch (SenseHandler(INDEX_TAPECTL, 0, pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
 		{
 		case SENSE_NO:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericEject (TestUnitReady) SENSE_NO\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericEject (TestUnitReady) SENSE_NO\n"));
 		  break;
 		case SENSE_TAPE_NOT_ONLINE:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericEject (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericEject (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n"));
 		  done = 1;
 		  break;
 		case SENSE_IGNORE:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericEject (TestUnitReady) SENSE_IGNORE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericEject (TestUnitReady) SENSE_IGNORE\n"));
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"GenericEject (TestUnitReady) SENSE_ABORT\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("GenericEject (TestUnitReady) SENSE_ABORT\n"));
 		  free(pRequestSense);
 		  return(-1);
 		  /*NOTREACHED*/
 		case SENSE_RETRY:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericEject (TestUnitReady) SENSE_RETRY\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericEject (TestUnitReady) SENSE_RETRY\n"));
 		  break;
 		default:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericEject (TestUnitReady) default (SENSE)\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericEject (TestUnitReady) default (SENSE)\n"));
 		  break;
 		}
 	      break;
 	    case SCSI_ERROR:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"GenericEject (TestUnitReady) SCSI_ERROR\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("GenericEject (TestUnitReady) SCSI_ERROR\n"));
 	      free(pRequestSense);
 	      return(-1);
 	      /*NOTREACHED*/
 	    case SCSI_BUSY:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericEject (TestUnitReady) SCSI_BUSY\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericEject (TestUnitReady) SCSI_BUSY\n"));
 	      break;
 	    case SCSI_CHECK:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericEject (TestUnitReady) SCSI_CHECK\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericEject (TestUnitReady) SCSI_CHECK\n"));
 	      break;
 	    default:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"GenericEject (TestUnitReady) unknown (%d)\n",ret);
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("GenericEject (TestUnitReady) unknown (%d)\n"),ret);
 	      break;
 	    }
 	  cnt++;
 	  sleep(2);
 	}
     } else {
-      DebugPrint(DEBUG_INFO, SECTION_TAPE,"GenericEject : Device can't understand SCSI try ioctl\n");
+      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("GenericEject : Device can't understand SCSI try ioctl\n"));
       Tape_Ioctl(INDEX_TAPECTL, IOCTL_EJECT);
     }
   DebugPrint(DEBUG_INFO, SECTION_TAPE,
-  	     "GenericEject : Ready after %d sec\n", cnt * 2);
+  	     _("GenericEject : Ready after %d sec\n"), cnt * 2);
   free(pRequestSense);
   return(0);
 }
@@ -2580,12 +2624,11 @@ GenericRewind(
   CDB_T CDB;
   extern OpenFiles_T *pDev;
   RequestSense_T *pRequestSense;
-  char *errstr;                    /* Used by tape_rewind */
   int ret;
   int cnt = 0;
   int done;
 
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### START GenericRewind pDEV -> %d\n",DeviceFD);
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### START GenericRewind pDEV -> %d\n"),DeviceFD);
 
 
   /*
@@ -2604,7 +2647,7 @@ GenericRewind(
       while (!done)
 	{
 	  ret = SCSI_TestUnitReady(DeviceFD, (RequestSense_T *)pRequestSense );
-	  DebugPrint(DEBUG_INFO, SECTION_TAPE, "GenericRewind (TestUnitReady) ret %d\n",ret);
+	  DebugPrint(DEBUG_INFO, SECTION_TAPE, _("GenericRewind (TestUnitReady) ret %d\n"),ret);
 	  switch (ret)
 	    {
 	    case SCSI_OK:
@@ -2614,55 +2657,55 @@ GenericRewind(
 	      switch (SenseHandler(DeviceFD, 0, pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
 		{
 		case SENSE_NO:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_NO\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_NO\n"));
 		  done = 1;
 		  break;
 		case SENSE_TAPE_NOT_ONLINE:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n"));
 		  free(pRequestSense);
 		  return(-1);
 		  /*NOTREACHED*/
 		case SENSE_IGNORE:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_IGNORE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_IGNORE\n"));
 		  done = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_ABORT\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_ABORT\n"));
 		  free(pRequestSense);
 		  return(-1);
 		  /*NOTREACHED*/
 		case SENSE_RETRY:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_RETRY\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_RETRY\n"));
 		  break;
 		default:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) default (SENSE)\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) default (SENSE)\n"));
 		  done = 1;
 		  break;
 		}  /* switch (SenseHandler(DeviceFD, 0, pRequestSense->SenseKey.... */
 	      break;
 
 	    case SCSI_ERROR:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"GenericRewind (TestUnitReady) SCSI_ERROR\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("GenericRewind (TestUnitReady) SCSI_ERROR\n"));
 	      free(pRequestSense);
 	      return(-1);
 	      /*NOTREACHED*/
 
 	    case SCSI_BUSY:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SCSI_BUSY\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SCSI_BUSY\n"));
 	      break;
 	    case SCSI_CHECK:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SCSI_CHECK\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SCSI_CHECK\n"));
 	      break;
 	    default:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"GenericRewind (TestUnitReady) unknown (%d)\n",ret);
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("GenericRewind (TestUnitReady) unknown (%d)\n"),ret);
 	      break;
 	    }
 
 	  sleep(1);
-	  DebugPrint(DEBUG_INFO, SECTION_TAPE," Wait .... (%d)\n",cnt);
+	  DebugPrint(DEBUG_INFO, SECTION_TAPE,_(" Wait .... (%d)\n"),cnt);
 	  if (cnt > 180)
 	    {
-	      DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP GenericRewind (-1)\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("##### STOP GenericRewind (-1)\n"));
 	      free(pRequestSense);
 	      return(-1);
 	      /*NOTREACHED*/
@@ -2686,7 +2729,7 @@ GenericRewind(
 			 pRequestSense,
 			 SIZEOF(RequestSense_T));
 
-	  DecodeSense(pRequestSense, "GenericRewind : ", debug_file);
+	  DecodeSense(pRequestSense, _("GenericRewind : "), debug_file);
 
 	  if (ret > 0)
 	    {
@@ -2701,7 +2744,7 @@ GenericRewind(
 	    }
 	  if (ret < 0)
 	    {
-	      DebugPrint(DEBUG_INFO, SECTION_TAPE,"GenericRewind : failed %d\n", ret);
+	      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("GenericRewind : failed %d\n"), ret);
 	      done = 1;
 	    }
 	}
@@ -2710,7 +2753,7 @@ GenericRewind(
       while (!done && (cnt < 300))
 	{
 	  ret = SCSI_TestUnitReady(DeviceFD, pRequestSense);
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI, "GenericRewind TestUnitReady ret %d\n",ret);
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI, _("GenericRewind TestUnitReady ret %d\n"),ret);
 	  switch (ret)
 	    {
 	    case SCSI_OK:
@@ -2720,45 +2763,45 @@ GenericRewind(
 	      switch (SenseHandler(DeviceFD, 0, pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
 		{
 		case SENSE_NO:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_NO\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_NO\n"));
 		  done = 1;
 		  break;
 		case SENSE_TAPE_NOT_ONLINE:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n"));
 		  free(pRequestSense);
 		  return(-1);
 		  /*NOTREACHED*/
 		case SENSE_IGNORE:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_IGNORE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_IGNORE\n"));
 		  done = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_ABORT\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_ABORT\n"));
 		  free(pRequestSense);
 		  return(-1);
 		  /*NOTREACHED*/
 		case SENSE_RETRY:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SENSE_RETRY\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SENSE_RETRY\n"));
 		  break;
 		default:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) default (SENSE)\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) default (SENSE)\n"));
 		  done = 1;
 		  break;
 		}
 	      break;
 	    case SCSI_ERROR:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"GenericRewind (TestUnitReady) SCSI_ERROR\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("GenericRewind (TestUnitReady) SCSI_ERROR\n"));
 	      return(-1);
 	      /*NOTREACHED*/
 
 	    case SCSI_BUSY:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SCSI_BUSY\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SCSI_BUSY\n"));
 	      break;
 	    case SCSI_CHECK:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"GenericRewind (TestUnitReady) SCSI_CHECK\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("GenericRewind (TestUnitReady) SCSI_CHECK\n"));
 	      break;
 	    default:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"GenericRewind (TestUnitReady) unknown (%d)\n",ret);
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("GenericRewind (TestUnitReady) unknown (%d)\n"),ret);
 	      break;
 	    }
 
@@ -2768,26 +2811,18 @@ GenericRewind(
 
       amfree(pRequestSense);
 
-      DebugPrint(DEBUG_INFO, SECTION_TAPE,"GenericRewind : Ready after %d sec, "
-      			"done = %d\n", cnt * 2, done);
-      DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP GenericRewind (0)\n");
+      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("GenericRewind : Ready after %d sec, "
+      			"done = %d\n"), cnt * 2, done);
+      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP GenericRewind (0)\n"));
     } else {
-      DebugPrint(DEBUG_INFO, SECTION_TAPE,"GenericRewind : use ioctl rewind\n");
+      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("GenericRewind : use ioctl rewind\n"));
       if (pDev[DeviceFD].devopen == 1)
 	{
-	  DebugPrint(DEBUG_INFO, SECTION_TAPE,"Close Device\n");
+	  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("Close Device\n"));
 	  SCSI_CloseDevice(DeviceFD);
 	}
-      /* We don't retry if it fails; that is left to the vtape driver. */
-      if ((errstr = tape_rewind(pDev[DeviceFD].dev)) == NULL) {
-          DebugPrint(DEBUG_INFO, SECTION_TAPE,"Rewind OK,\n", cnt);
-      } else {
-          DebugPrint(DEBUG_ERROR, SECTION_TAPE,"Rewind failed %s\n",errstr);
-          DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP GenericRewind (-1)\n");
-          return(-1);
-	  /*NOTREACHED*/
-      }
-      DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP GenericRewind (0)\n");
+      /* no actual rewind operation here -- the device itself will handle that */
+      DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP GenericRewind (0)\n"));
     }
 
   return(0);
@@ -2809,11 +2844,11 @@ GenericClean(
 
   (void)Device;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### START GenericClean\n");
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### START GenericClean\n"));
   if (pDev[INDEX_TAPECTL].SCSI == 0)
       {
-          DebugPrint(DEBUG_ERROR, SECTION_TAPE,"GenericClean : can't send SCSI commands\n");
-	  DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP GenericClean\n");
+          DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("GenericClean : can't send SCSI commands\n"));
+	  DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("##### STOP GenericClean\n"));
           return(0);
 	  /*NOTREACHED*/
       }
@@ -2824,16 +2859,84 @@ GenericClean(
   if ( RequestSense(INDEX_TAPECTL, &ExtRequestSense, 1) == 0)
     {
 
-      DecodeExtSense(&ExtRequestSense, "GenericClean : ", debug_file);
+      DecodeExtSense(&ExtRequestSense, _("GenericClean : "), debug_file);
       if(ExtRequestSense.CLN) {
 	ret = 1;
       } else {
 	ret = 0;
       }
     } else {
-      DebugPrint(DEBUG_ERROR, SECTION_TAPE,"Got error from RequestSense\n");
+      DebugPrint(DEBUG_ERROR, SECTION_TAPE,_("Got error from RequestSense\n"));
     }
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP GenericClean (%d)\n",ret);
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP GenericClean (%d)\n"),ret);
+  return(ret);
+}
+
+int
+SCSI_LogSenseClean(
+    char *	Device)
+{ 
+  extern OpenFiles_T *pDev;
+  CDB_T CDB;
+  RequestSense_T *pRequestSense;
+  int ret = 0;
+  u_char *buffer;
+  size_t size = 128;
+      
+  (void)Device;	/* Quiet unused parameter warning */
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### START SCSI_LogSenseClean\n");
+  if (pDev[INDEX_TAPECTL].SCSI == 0)
+      {
+          DebugPrint(DEBUG_ERROR, SECTION_TAPE,"SCSILogSenseClean : can't send SCSI commands\n");
+	  DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP SCSI_LogSenseClean\n");
+          return(0);
+	  /*NOTREACHED*/
+      }
+
+   if (NULL ==  (buffer = alloc(size))){
+          DebugPrint(DEBUG_ERROR, SECTION_TAPE,"SCSI_LogSenseClean : can't alloc buffer\n");
+	  DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP SCSI_LogSenseClean\n");
+          return(0);
+   }
+   if (NULL == (pRequestSense = alloc(SIZEOF(RequestSense_T)))){
+          DebugPrint(DEBUG_ERROR, SECTION_TAPE,"SCSI_LogSenseClean : can't alloc memory\n");
+	  DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP SCSI_LogSenseClean\n");
+          return(0);
+   }
+   
+   memset(buffer, 0, size);
+   CDB[0] = SC_COM_LOG_SENSE;
+   CDB[1] = 0;
+   CDB[2] = (u_char)(0x40 | 0x33);/* 0x40 for current values 0x33 Head Cleaning Page*/
+   CDB[3] = 0;
+   CDB[4] = 0;
+   CDB[5] = 0;
+   CDB[6] = 00;
+   MSB2(&CDB[7], size);
+   CDB[9] = 0;
+
+   if (SCSI_Run(INDEX_TAPECTL, Input, CDB, 10,
+                           buffer,
+                           size,
+                           pRequestSense,
+                           SIZEOF(RequestSense_T)) != 0)
+     {
+       DecodeSense(pRequestSense, "SCSI_LogSenseClean : ",debug_file);
+       free(pRequestSense);
+       free(buffer);
+       DebugPrint(DEBUG_ERROR, SECTION_TAPE,"##### STOP SCSI_LogSenseClean (0) Page could not be read.\n");
+       return(0);
+       /*NOTREACHED*/
+     }
+  if (1==(0x1 & buffer[8])){ /* Bit 0 of the 4th byte in the Clean Head Log Parameter, which are the bytes */
+		            /* 4 to 8 on the Log Sense Page 0x33 					  */
+    ret = 1;
+  }else {
+    ret = 0; 
+  }  
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP SCSI_LogSenseClean (%d)\n",ret);
+  free(pRequestSense);
+  free(buffer);
   return(ret);
 }
 
@@ -2846,7 +2949,7 @@ GenericResetStatus(
   int ret = 0;
   int retry = 1;
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, "##### START GenericResetStatus\n");
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, _("##### START GenericResetStatus\n"));
 
   pRequestSense = alloc(SIZEOF(RequestSense_T));
 
@@ -2867,11 +2970,11 @@ GenericResetStatus(
 
       if (ret < 0)
         {
-          /*        fprintf(stderr, "%s: Request Sense[Inquiry]: %02X", */
+          /*        g_fprintf(stderr, _("%s: Request Sense[Inquiry]: %02X"), */
           /*                "chs", ((u_char *) &pRequestSense)[0]); */
           /*        for (i = 1; i < SIZEOF(RequestSense_T); i++)                */
-          /*          fprintf(stderr, " %02X", ((u_char *) &pRequestSense)[i]); */
-          /*        fprintf(stderr, "\n");    */
+          /*          g_fprintf(stderr, " %02X", ((u_char *) &pRequestSense)[i]); */
+          /*        g_fprintf(stderr, "\n");    */
 	  free(pRequestSense);
           return(ret);
 	  /*NOTREACHED*/
@@ -2892,17 +2995,17 @@ GenericResetStatus(
               retry++;
               if (retry < MAX_RETRIES )
                 {
-                  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, "GenericResetStatus : retry %d\n", retry);
+                  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, _("GenericResetStatus : retry %d\n"), retry);
                   sleep(2);
                 } else {
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "GenericResetStatus : return (-1)\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("GenericResetStatus : return (-1)\n"));
 		  free(pRequestSense);
                   return(-1);
 		  /*NOTREACHED*/
                 }
               break;
             default:
-	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "GenericResetStatus :  (default) return (-1)\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("GenericResetStatus :  (default) return (-1)\n"));
 	      free(pRequestSense);
               return(-1);
               /*NOTREACHED*/
@@ -2911,7 +3014,7 @@ GenericResetStatus(
       if (ret == 0)
         retry = 0;
     }
-  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "##### STOP GenericResetStatus (%d)\n",ret);
+  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("##### STOP GenericResetStatus (%d)\n"),ret);
   free(pRequestSense);
   return(ret);
 }
@@ -2943,9 +3046,9 @@ GenericSenseHandler(
   int ret;
   char *info = NULL;
 
-  dbprintf(("##### START GenericSenseHandler\n"));
+  dbprintf(_("##### START GenericSenseHandler\n"));
 
-  DecodeSense(pRequestSense, "GenericSenseHandler : ", debug_file);
+  DecodeSense(pRequestSense, _("GenericSenseHandler : "), debug_file);
 
   ret = Sense2Action(pDev[ip].ident,
 		     pDev[ip].inquiry->type,
@@ -2954,7 +3057,7 @@ GenericSenseHandler(
 		     AdditionalSenseCodeQualifier,
 		     &info);
 
-  dbprintf(("##### STOP GenericSenseHandler\n"));
+  dbprintf(_("##### STOP GenericSenseHandler: %s\n"), _(info));
   return(ret);
 }
 
@@ -2986,31 +3089,31 @@ SDXMove(
   int SDX_STE = -1;     /* to                          */
   int SDX_DTE = -1;     /* AlignElements               */
 
-  DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### START SDXMove\n");
+  DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### START SDXMove\n"));
 
-  DebugPrint(DEBUG_INFO, SECTION_MOVE,"%-20s : from = %d, to = %d\n", "SDXMove", from, to);
+  DebugPrint(DEBUG_INFO, SECTION_MOVE,_("%-20s : from = %d, to = %d\n"), "SDXMove", from, to);
 
 
   if ((pfrom = LookupElement(from)) == NULL)
     {
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"SDXMove : ElementInfo for %d not found\n", from);
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP SDXMove\n");
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("SDXMove : ElementInfo for %d not found\n"), from);
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP SDXMove\n"));
       return(-1);
       /*NOTREACHED*/
     }
 
   if ((pto = LookupElement(to)) == NULL)
     {
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"SDXMove : ElementInfo for %d not found\n", to);
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP SDXMove\n");
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("SDXMove : ElementInfo for %d not found\n"), to);
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP SDXMove\n"));
       return(-1);
       /*NOTREACHED*/
     }
 
   if (pfrom->status == 'E')
     {
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"SDXMove : from %d is empty\n", from);
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP SDXMove\n");
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("SDXMove : from %d is empty\n"), from);
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP SDXMove\n"));
       return(-1);
       /*NOTREACHED*/
     }
@@ -3022,20 +3125,20 @@ SDXMove(
          case CHANGER:
            break;
          case STORAGE:
-           DebugPrint(DEBUG_INFO, SECTION_MOVE,"SDXMove : Destination Element %d Type %d is full\n",
+           DebugPrint(DEBUG_INFO, SECTION_MOVE,_("SDXMove : Destination Element %d Type %d is full\n"),
                 pto->address, pto->type);
             to = find_empty(DeviceFD, 0, 0);
 	    if (to == -1 )
 	    {
-		    DebugPrint(DEBUG_ERROR, SECTION_MOVE,"SDXMove : no empty slot found for unload\n");
+		    DebugPrint(DEBUG_ERROR, SECTION_MOVE,_("SDXMove : no empty slot found for unload\n"));
 		    return(-1);
 		    /*NOTREACHED*/
 	    }
-            DebugPrint(DEBUG_INFO, SECTION_MOVE,"SDXMove : Unload to %d\n", to);
+            DebugPrint(DEBUG_INFO, SECTION_MOVE,_("SDXMove : Unload to %d\n"), to);
             if ((pto = LookupElement(to)) == NULL)
             {
-	      DebugPrint(DEBUG_INFO, SECTION_MOVE, "SDXMove : ElementInfo for %d not found\n", to);
-	      DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP SDXMove\n");
+	      DebugPrint(DEBUG_INFO, SECTION_MOVE, _("SDXMove : ElementInfo for %d not found\n"), to);
+	      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP SDXMove\n"));
 	      return(-1);
 	      /*NOTREACHED*/
             }
@@ -3078,16 +3181,16 @@ SDXMove(
   if (SDX_DTE >= 0 && SDX_STE >= 0)
   {
     ret = SCSI_AlignElements(DeviceFD, SDX_MTE, SDX_DTE, SDX_STE);
-    DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### SCSI_AlignElemnts ret = %d\n",ret);
+    DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### SCSI_AlignElemnts ret = %d\n"),ret);
     if (ret != 0 )
     {
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP SDXMove\n");
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP SDXMove\n"));
       return(-1);
       /*NOTREACHED*/
     }
   } else {
-    DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### Error setting STE/DTE %d/%d\n", SDX_STE, SDX_DTE);
-    DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP SDXMove\n");
+    DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### Error setting STE/DTE %d/%d\n"), SDX_STE, SDX_DTE);
+    DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP SDXMove\n"));
     return(-1);
     /*NOTREACHED*/
   }
@@ -3114,11 +3217,11 @@ SDXMove(
   {
     ret = SCSI_Move(DeviceFD, 0, from, to);
   } else {
-    DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP SDXMove\n");
+    DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP SDXMove\n"));
     return(ret);
     /*NOTREACHED*/
   }
-  DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP SDXMove\n");
+  DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP SDXMove\n"));
   return(ret);
 }
 
@@ -3142,51 +3245,51 @@ GenericMove(
   ElementInfo_T *pto;
   int ret = 0;
 
-  DebugPrint(DEBUG_INFO, SECTION_MOVE, "##### START GenericMove\n");
+  DebugPrint(DEBUG_INFO, SECTION_MOVE, _("##### START GenericMove\n"));
 
-  DebugPrint(DEBUG_INFO, SECTION_MOVE, "%-20s : from = %d, to = %d\n", "GenericMove", from, to);
+  DebugPrint(DEBUG_INFO, SECTION_MOVE, _("%-20s : from = %d, to = %d\n"), "GenericMove", from, to);
 
 
   if ((pfrom = LookupElement(from)) == NULL)
     {
-      DebugPrint(DEBUG_INFO, SECTION_MOVE, "GenericMove : ElementInfo for %d not found\n", from);
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP GenericMove\n");
+      DebugPrint(DEBUG_INFO, SECTION_MOVE, _("GenericMove : ElementInfo for %d not found\n"), from);
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP GenericMove\n"));
       return(-1);
       /*NOTREACHED*/
     }
 
   if ((pto = LookupElement(to)) == NULL)
     {
-      DebugPrint(DEBUG_INFO, SECTION_MOVE, "GenericMove : ElementInfo for %d not found\n", to);
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP GenericMove\n");
+      DebugPrint(DEBUG_INFO, SECTION_MOVE, _("GenericMove : ElementInfo for %d not found\n"), to);
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP GenericMove\n"));
       return(-1);
       /*NOTREACHED*/
     }
 
   if (pfrom->status == 'E')
     {
-      DebugPrint(DEBUG_INFO, SECTION_MOVE, "GenericMove : from %d is empty\n", from);
-      DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP GenericMove\n");
+      DebugPrint(DEBUG_INFO, SECTION_MOVE, _("GenericMove : from %d is empty\n"), from);
+      DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP GenericMove\n"));
       return(-1);
       /*NOTREACHED*/
     }
 
   if (pto->status == 'F')
     {
-      DebugPrint(DEBUG_INFO, SECTION_MOVE, "GenericMove : Destination Element %d Type %d is full\n",
+      DebugPrint(DEBUG_INFO, SECTION_MOVE, _("GenericMove : Destination Element %d Type %d is full\n"),
 		 pto->address, pto->type);
       to = find_empty(DeviceFD, 0, 0);
       if ( to == -1)
       {
-	      DebugPrint(DEBUG_ERROR, SECTION_MOVE, "GenericMove : no empty slot found\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_MOVE, _("GenericMove : no empty slot found\n"));
 	      return(-1);
 	      /*NOTREACHED*/
       }
-      DebugPrint(DEBUG_INFO, SECTION_MOVE, "GenericMove : Unload to %d\n", to);
+      DebugPrint(DEBUG_INFO, SECTION_MOVE, _("GenericMove : Unload to %d\n"), to);
       if ((pto = LookupElement(to)) == NULL)
         {
-          DebugPrint(DEBUG_ERROR, SECTION_MOVE, " Ups should not happen\n");
-	  DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP GenericMove\n");
+          DebugPrint(DEBUG_ERROR, SECTION_MOVE, _(" Ups should not happen\n"));
+	  DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP GenericMove\n"));
 	  return(-1);
 	  /*NOTREACHED*/
         }
@@ -3197,8 +3300,8 @@ GenericMove(
       ret = SCSI_Move(DeviceFD, 0, from, to);
     }
 
-  DebugPrint(DEBUG_INFO, SECTION_MOVE, "GenericMove : SCSI_Move return (%d)\n", ret);
-  DebugPrint(DEBUG_INFO, SECTION_MOVE,"##### STOP GenericMove\n");
+  DebugPrint(DEBUG_INFO, SECTION_MOVE, _("GenericMove : SCSI_Move return (%d)\n"), ret);
+  DebugPrint(DEBUG_INFO, SECTION_MOVE,_("##### STOP GenericMove\n"));
   return(ret);
 }
 
@@ -3217,41 +3320,41 @@ CheckMove(
 {
 	int moveok = 0;
 
-	DebugPrint(DEBUG_INFO, SECTION_MOVE, "##### START CheckMove\n");
+	DebugPrint(DEBUG_INFO, SECTION_MOVE, _("##### START CheckMove\n"));
 	if (pDeviceCapabilitiesPage != NULL )
 	  {
-	    DebugPrint(DEBUG_INFO, SECTION_MOVE, "CheckMove : checking if move from %d to %d is legal\n", from->address, to->address);
+	    DebugPrint(DEBUG_INFO, SECTION_MOVE, _("CheckMove : checking if move from %d to %d is legal\n"), from->address, to->address);
 	    switch (from->type)
 	      {
 	      case CHANGER:
-		DebugPrint(DEBUG_INFO, SECTION_MOVE, "CheckMove : MT2");
+		DebugPrint(DEBUG_INFO, SECTION_MOVE, _("CheckMove : MT2"));
 		switch (to->type)
 		  {
 		  case CHANGER:
 		    if (pDeviceCapabilitiesPage->MT2MT == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "MT\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("MT\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case STORAGE:
 		    if (pDeviceCapabilitiesPage->MT2ST == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "ST\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("ST\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case IMPORT:
 		    if (pDeviceCapabilitiesPage->MT2IE == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "IE\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("IE\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case TAPETYPE:
 		    if (pDeviceCapabilitiesPage->MT2DT == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "DT\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("DT\n"));
 			moveok = 1;
 		      }
 		    break;
@@ -3260,34 +3363,34 @@ CheckMove(
 		  }
 		break;
 	      case STORAGE:
-		DebugPrint(DEBUG_INFO, SECTION_MOVE, "CheckMove : ST2");
+		DebugPrint(DEBUG_INFO, SECTION_MOVE, _("CheckMove : ST2"));
 		switch (to->type)
 		  {
 		  case CHANGER:
 		    if (pDeviceCapabilitiesPage->ST2MT == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "MT\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("MT\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case STORAGE:
 		    if (pDeviceCapabilitiesPage->ST2ST == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "ST\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("ST\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case IMPORT:
 		    if (pDeviceCapabilitiesPage->ST2IE == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "IE\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("IE\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case TAPETYPE:
 		    if (pDeviceCapabilitiesPage->ST2DT == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "DT\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("DT\n"));
 			moveok = 1;
 		      }
 		    break;
@@ -3296,34 +3399,34 @@ CheckMove(
 		  }
 		break;
 	      case IMPORT:
-		DebugPrint(DEBUG_INFO, SECTION_MOVE, "CheckMove : IE2");
+		DebugPrint(DEBUG_INFO, SECTION_MOVE, _("CheckMove : IE2"));
 		switch (to->type)
 		  {
 		  case CHANGER:
 		    if (pDeviceCapabilitiesPage->IE2MT == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "MT\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("MT\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case STORAGE:
 		    if (pDeviceCapabilitiesPage->IE2ST == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "ST\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("ST\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case IMPORT:
 		    if (pDeviceCapabilitiesPage->IE2IE == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "IE\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("IE\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case TAPETYPE:
 		    if (pDeviceCapabilitiesPage->IE2DT == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "DT\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("DT\n"));
 			moveok = 1;
 		      }
 		    break;
@@ -3332,34 +3435,34 @@ CheckMove(
 		  }
 		break;
 	      case TAPETYPE:
-		DebugPrint(DEBUG_INFO, SECTION_MOVE, "CheckMove : DT2");
+		DebugPrint(DEBUG_INFO, SECTION_MOVE, _("CheckMove : DT2"));
 		switch (to->type)
 		  {
 		  case CHANGER:
 		    if (pDeviceCapabilitiesPage->DT2MT == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "MT\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("MT\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case STORAGE:
 		    if (pDeviceCapabilitiesPage->DT2ST == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "ST\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("ST\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case IMPORT:
 		    if (pDeviceCapabilitiesPage->DT2IE == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "IE\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("IE\n"));
 			moveok = 1;
 		      }
 		    break;
 		  case TAPETYPE:
 		    if (pDeviceCapabilitiesPage->DT2DT == 1)
 		      {
-			DebugPrint(DEBUG_INFO, SECTION_MOVE, "DT\n");
+			DebugPrint(DEBUG_INFO, SECTION_MOVE, _("DT\n"));
 			moveok = 1;
 		      }
 		    break;
@@ -3371,14 +3474,14 @@ CheckMove(
 		break;
 	      }
 	  } else {
-	    DebugPrint(DEBUG_INFO, SECTION_MOVE, "CheckMove : pDeviceCapabilitiesPage == NULL");
+	    DebugPrint(DEBUG_INFO, SECTION_MOVE, _("CheckMove : pDeviceCapabilitiesPage == NULL"));
 	    /*
-	      ChgExit("CheckMove", "DeviceCapabilitiesPage == NULL", FATAL);
+	      ChgExit("CheckMove", _("DeviceCapabilitiesPage == NULL"), FATAL);
 	    */
 	    moveok=1;
 	  }
 
-	DebugPrint(DEBUG_INFO, SECTION_MOVE, "###### STOP CheckMove\n");
+	DebugPrint(DEBUG_INFO, SECTION_MOVE, _("###### STOP CheckMove\n"));
 	return(moveok);
 }
 
@@ -3392,13 +3495,13 @@ GetCurrentSlot(
 {
   extern OpenFiles_T *pDev;
   size_t x;
-  dbprintf(("##### START GetCurrentSlot\n"));
+  dbprintf(_("##### START GetCurrentSlot\n"));
 
   (void)fd;	/* Quiet unused parameter warning */
 
   if (pDev[0].SCSI == 0)
       {
-          dbprintf(("GetCurrentSlot : can't send SCSI commands\n"));
+          dbprintf(_("GetCurrentSlot : can't send SCSI commands\n"));
           return(-1);
 	  /*NOTREACHED*/
       }
@@ -3466,7 +3569,7 @@ GenericElementStatus(
 
   (void)InitStatus;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, "##### START GenericElementStatus\n");
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, _("##### START GenericElementStatus\n"));
 
   if (pEAAPage == NULL)
     {
@@ -3482,9 +3585,9 @@ GenericElementStatus(
 	  if (SCSI_ModeSense(DeviceFD, pModePage, 0xff, 0x8, 0x3f) == 0)
 	    {
 	      LibModeSenseValid = 1;
-	      DecodeModeSense(pModePage, 0, "GenericElementStatus :", 0, debug_file);
+	      DecodeModeSense(pModePage, 0, _("GenericElementStatus :"), 0, debug_file);
 	    } else {
-	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"GetElementStatus : failed SCSI_ModeSense\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("GetElementStatus : failed SCSI_ModeSense\n"));
 	      LibModeSenseValid = -1;
 	    }
         }
@@ -3503,7 +3606,7 @@ GenericElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "GenericElementStatus : Abort on MTE\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("GenericElementStatus : Abort on MTE\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3521,7 +3624,7 @@ GenericElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "GenericElementStatus : Abort on IEE\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("GenericElementStatus : Abort on IEE\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3540,7 +3643,7 @@ GenericElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "GenericElementStatus : Abort on IES\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("GenericElementStatus : Abort on IES\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3558,7 +3661,7 @@ GenericElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "GenericElementStatus : Abort on DTE\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("GenericElementStatus : Abort on DTE\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3575,7 +3678,7 @@ GenericElementStatus(
 	  if (GenericResetStatus(DeviceFD) != 0)
 	    {
 	      ElementStatusValid = 0;
-	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "GenericElementStatus : Can't init status STEError(%d) MTEError(%d) DTEError(%d) IEEError(%d)\n", STEError, MTEError, DTEError, IEEError);
+	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("GenericElementStatus : Can't init status STEError(%d) MTEError(%d) DTEError(%d) IEEError(%d)\n"), STEError, MTEError, DTEError, IEEError);
 	      return(-1);
 	      /*NOTREACHED*/
 	    }
@@ -3591,7 +3694,7 @@ GenericElementStatus(
 	   */
 	  if (pDTE[0].status == 'E')
 	    {
-	      DebugPrint(DEBUG_INFO, SECTION_ELEMENT, "GenericElementStatus : try to move tape to tape drive\n");
+	      DebugPrint(DEBUG_INFO, SECTION_ELEMENT, _("GenericElementStatus : try to move tape to tape drive\n"));
 	      pDev[DeviceFD].functions->function_move(DeviceFD, pDTE[0].address, pDTE[0].address);
 	    }
 	}
@@ -3600,13 +3703,13 @@ GenericElementStatus(
 
   if (error != 0)
     {
-      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "GenericElementStatus : Can't init status (after loop)\n");
+      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("GenericElementStatus : Can't init status (after loop)\n"));
       return(-1);
       /*NOTREACHED*/
     }
 
   ElementStatusValid = 1;
-  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "#### STOP GenericElementStatus\n");
+  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("#### STOP GenericElementStatus\n"));
   return(0);
 }
 
@@ -3630,7 +3733,7 @@ DLT448ElementStatus(
 
   (void)InitStatus;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, "##### START DLT448ElementStatus\n");
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, _("##### START DLT448ElementStatus\n"));
 
   if (pEAAPage == NULL)
     {
@@ -3646,9 +3749,9 @@ DLT448ElementStatus(
 	  if (SCSI_ModeSense(DeviceFD, pModePage, 0xff, 0x8, 0x3f) == 0)
 	    {
 	      LibModeSenseValid = 1;
-	      DecodeModeSense(pModePage, 12, "DLT448ElementStatus :", 0, debug_file);
+	      DecodeModeSense(pModePage, 12, _("DLT448ElementStatus :"), 0, debug_file);
 	    } else {
-	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"DLT448ElementStatus : failed SCSI_ModeSense\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("DLT448ElementStatus : failed SCSI_ModeSense\n"));
 	      LibModeSenseValid = -1;
 	    }
         }
@@ -3666,7 +3769,7 @@ DLT448ElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "DLT448ElementStatus : Abort on MTE\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("DLT448ElementStatus : Abort on MTE\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3683,7 +3786,7 @@ DLT448ElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "DLT448ElementStatus : Abort on IEE\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("DLT448ElementStatus : Abort on IEE\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3705,7 +3808,7 @@ DLT448ElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "DLT448ElementStatus : Abort on IES\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("DLT448ElementStatus : Abort on IES\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3723,7 +3826,7 @@ DLT448ElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "DLT448ElementStatus : Abort on DTE\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("DLT448ElementStatus : Abort on DTE\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3740,7 +3843,7 @@ DLT448ElementStatus(
 	  if (GenericResetStatus(DeviceFD) != 0)
 	    {
 	      ElementStatusValid = 0;
-	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "DLT448ElementStatus : Can't init status\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("DLT448ElementStatus : Can't init status\n"));
 	      return(-1);
 	      /*NOTREACHED*/
 	    }
@@ -3756,7 +3859,7 @@ DLT448ElementStatus(
 	   */
 	  if (pDTE[0].status == 'E')
 	    {
-	      DebugPrint(DEBUG_INFO, SECTION_ELEMENT, "DLT448ElementStatus : try to move tape to tape drive\n");
+	      DebugPrint(DEBUG_INFO, SECTION_ELEMENT, _("DLT448ElementStatus : try to move tape to tape drive\n"));
 	      pDev[DeviceFD].functions->function_move(DeviceFD, pDTE[0].address, pDTE[0].address);
 	    }
 	}
@@ -3765,13 +3868,13 @@ DLT448ElementStatus(
 
   if (error != 0)
     {
-      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "DLT448ElementStatus : Can't init status (after loop)\n");
+      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("DLT448ElementStatus : Can't init status (after loop)\n"));
       return(-1);
       /*NOTREACHED*/
     }
 
   ElementStatusValid = 1;
-  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "#### STOP DLT448ElementStatus\n");
+  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("#### STOP DLT448ElementStatus\n"));
   return(0);
 }
 
@@ -3792,7 +3895,7 @@ SDXElementStatus(
 
   (void)InitStatus;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, "##### START SDXElementStatus\n");
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT, _("##### START SDXElementStatus\n"));
 
   if (pEAAPage == NULL)
     {
@@ -3808,9 +3911,9 @@ SDXElementStatus(
 	  if (SCSI_ModeSense(DeviceFD, pModePage, 0xff, 0x8, 0x3f) == 0)
 	    {
 	      LibModeSenseValid = 1;
-	      DecodeModeSense(pModePage, 0, "SDXElementStatus :", 0, debug_file);
+	      DecodeModeSense(pModePage, 0, _("SDXElementStatus :"), 0, debug_file);
 	    } else {
-	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"SDXElementStatus : failed SCSI_ModeSense\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("SDXElementStatus : failed SCSI_ModeSense\n"));
 	      LibModeSenseValid = -1;
 	    }
         }
@@ -3829,7 +3932,7 @@ SDXElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "SDXElementStatus : Abort on MTE\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("SDXElementStatus : Abort on MTE\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3846,7 +3949,7 @@ SDXElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "SDXElementStatus : Abort on IEE\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("SDXElementStatus : Abort on IEE\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3864,7 +3967,7 @@ SDXElementStatus(
 		  error = 1;
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "SDXElementStatus : Abort on IES\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("SDXElementStatus : Abort on IES\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3883,7 +3986,7 @@ SDXElementStatus(
 		  */
 		  break;
 		case SENSE_ABORT:
-		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "SDXElementStatus : Abort on DTE\n");
+		  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("SDXElementStatus : Abort on DTE\n"));
 		  return(-1);
 		  /*NOTREACHED*/
 		}
@@ -3900,7 +4003,7 @@ SDXElementStatus(
 	  if (GenericResetStatus(DeviceFD) != 0)
 	    {
 	      ElementStatusValid = 0;
-	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "SDXElementStatus : Can't init status\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("SDXElementStatus : Can't init status\n"));
 	      return(-1);
 	      /*NOTREACHED*/
 	    }
@@ -3911,14 +4014,14 @@ SDXElementStatus(
 
   if (error != 0)
     {
-      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "SDXElementStatus : Can't init status\n");
+      DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("SDXElementStatus : Can't init status\n"));
       return(-1);
       /*NOTREACHED*/
     }
 
   ElementStatusValid = 1;
   TapeStatus();
-  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, "#### STOP SDXElementStatus\n");
+  DebugPrint(DEBUG_ERROR, SECTION_ELEMENT, _("#### STOP SDXElementStatus\n"));
   return(0);
 }
 
@@ -3954,7 +4057,7 @@ GetElementStatus(
   size_t length;	/* Length of an Element */
   size_t NoOfElements;
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"##### START GetElementStatus\n");
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("##### START GetElementStatus\n"));
 
   barcode = BarCode(DeviceFD);
 
@@ -3963,7 +4066,7 @@ GetElementStatus(
    */
   if (pEAAPage != NULL)
     {
-      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Reading Element Status with the info from mode sense\n");
+      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Reading Element Status with the info from mode sense\n"));
       /* First the Medim Transport*/
       if (V2(pEAAPage->NoMediumTransportElements)  > 0)
         {
@@ -3980,7 +4083,7 @@ GetElementStatus(
 				     SIZEOF(MediumTransportElementDescriptor_T),
                                      &DataBuffer) != 0)
             {
-              ChgExit("genericElementStatus","Can't read MTE status", FATAL);
+              ChgExit("genericElementStatus",_("Can't read MTE status"), FATAL);
 	      /*NOTREACHED*/
             }
           // ElementStatusData = (ElementStatusData_T *)DataBuffer;
@@ -3990,7 +4093,7 @@ GetElementStatus(
           offset = offset + SIZEOF(ElementStatusPage_T);
 	  length = V2(ElementStatusPage->length);
 
-          DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"MTE Length %d(%d)\n", length,
+          DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("MTE Length %d(%d)\n"), length,
 			SIZEOF(MediumTransportElementDescriptor_T));
 
           for (x = 0; x < MTE; x++)
@@ -4020,14 +4123,14 @@ GetElementStatus(
 		{
 		  pMTE[x].ASC = MediumTransportElementDescriptor->asc;
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASC MTE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASC MTE\n"));
 		}
 
 	      if (length >= 6)
 		{
 		  pMTE[x].ASCQ = MediumTransportElementDescriptor->ascq;
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASCQ MTE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASCQ MTE\n"));
 		}
 
 	      if (length >= 0xa)
@@ -4039,7 +4142,7 @@ GetElementStatus(
 		      pMTE[x].from = -1;
 		    }
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip source MTE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip source MTE\n"));
 		}
 	      offset = offset + length;
             }
@@ -4065,7 +4168,7 @@ GetElementStatus(
 				     SIZEOF(StorageElementDescriptor_T),
                                      &DataBuffer) != 0)
             {
-              ChgExit("GetElementStatus", "Can't read STE status", FATAL);
+              ChgExit("GetElementStatus", _("Can't read STE status"), FATAL);
 	      /*NOTREACHED*/
             }
 	  assert(DataBuffer != NULL);
@@ -4076,7 +4179,7 @@ GetElementStatus(
           ElementStatusPage = (ElementStatusPage_T *)&DataBuffer[offset];
           offset = offset + SIZEOF(ElementStatusPage_T);
 	  length = V2(ElementStatusPage->length);
-          DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"STE Length %d\n",length);
+          DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("STE Length %d\n"),length);
 
           for (x = 0; x < STE; x++)
             {
@@ -4105,14 +4208,14 @@ GetElementStatus(
 		{
 		  pSTE[x].ASC = StorageElementDescriptor->asc;
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASC STE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASC STE\n"));
 		}
 
 	      if (length >= 6)
 		{
 		  pSTE[x].ASCQ = StorageElementDescriptor->ascq;
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASCQ STE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASCQ STE\n"));
 		}
 
 	      if (length >= 0xa)
@@ -4124,7 +4227,7 @@ GetElementStatus(
 		      pSTE[x].from = -1;
 		    }
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip source STE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip source STE\n"));
 		}
 
               offset = offset + length;
@@ -4151,7 +4254,7 @@ GetElementStatus(
 				     SIZEOF(ImportExportElementDescriptor_T),
                                      &DataBuffer) != 0)
             {
-              ChgExit("GetElementStatus", "Can't read IEE status", FATAL);
+              ChgExit("GetElementStatus", _("Can't read IEE status"), FATAL);
 	      /*NOTREACHED*/
             }
 	  assert(DataBuffer != NULL);
@@ -4162,7 +4265,7 @@ GetElementStatus(
           ElementStatusPage = (ElementStatusPage_T *)&DataBuffer[offset];
           offset = offset + SIZEOF(ElementStatusPage_T);
 	  length = V2(ElementStatusPage->length);
-          DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"IEE Length %d\n",length);
+          DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("IEE Length %d\n"),length);
 
           for (x = 0; x < IEE; x++)
             {
@@ -4189,14 +4292,14 @@ GetElementStatus(
 		{
 		  pIEE[x].ASC = ImportExportElementDescriptor->asc;
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASC IEE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASC IEE\n"));
 		}
 
 	      if (length >= 6)
 		{
 		  pIEE[x].ASCQ = ImportExportElementDescriptor->ascq;
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASCQ IEE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASCQ IEE\n"));
 		}
 
 	      if (length >= 0xa)
@@ -4208,7 +4311,7 @@ GetElementStatus(
 		      pIEE[x].from = -1;
 		    }
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip source IEE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip source IEE\n"));
 		}
 
               offset = offset + length;
@@ -4235,7 +4338,7 @@ GetElementStatus(
 				     SIZEOF(DataTransferElementDescriptor_T),
                                      &DataBuffer) != 0)
             {
-              ChgExit("GenericElementStatus", "Can't read DTE status", FATAL);
+              ChgExit("GenericElementStatus", _("Can't read DTE status"), FATAL);
 	      /*NOTREACHED*/
             }
 	  assert(DataBuffer != NULL);
@@ -4246,7 +4349,7 @@ GetElementStatus(
           ElementStatusPage = (ElementStatusPage_T *)&DataBuffer[offset];
           offset = offset + SIZEOF(ElementStatusPage_T);
 	  length = V2(ElementStatusPage->length);
-          DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"DTE Length %d\n",length);
+          DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("DTE Length %d\n"),length);
 
           for (x = 0; x < DTE; x++)
             {
@@ -4274,14 +4377,14 @@ GetElementStatus(
 	      {
               	pDTE[x].ASC = DataTransferElementDescriptor->asc;
 	      } else {
-		DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASC DTE\n");
+		DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASC DTE\n"));
 	      }
 
 	      if (length >= 6)
 		{
 		  pDTE[x].ASCQ = DataTransferElementDescriptor->ascq;
 	      } else {
-		DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASCQ DTE\n");
+		DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASCQ DTE\n"));
 	      }
 
 	      if (length >= 0xa)
@@ -4293,7 +4396,7 @@ GetElementStatus(
 		      pDTE[x].from = -1;
 		    }
 		} else {
-		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip source STE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip source STE\n"));
 		}
 
               offset = offset + length;
@@ -4305,7 +4408,7 @@ GetElementStatus(
       /*
        * And now the old way, when we get here the read mode sense page has failed ...
        */
-      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Reading Element Status the old way .... (max 255 elements)\n");
+      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Reading Element Status the old way .... (max 255 elements)\n"));
       if (SCSI_ReadElementStatus(DeviceFD,
                                  0,
                                  0,
@@ -4315,7 +4418,7 @@ GetElementStatus(
 				 (size_t)0x7f,
                                  &DataBuffer) != 0)
         {
-          ChgExit("GenericElementStatus","Can't get ElementStatus", FATAL);
+          ChgExit("GenericElementStatus",_("Can't get ElementStatus"), FATAL);
 	  /*NOTREACHED*/
         }
       assert(DataBuffer != NULL);
@@ -4365,14 +4468,14 @@ GetElementStatus(
 		    {
 		      pMTE[x].ASC = MediumTransportElementDescriptor->asc;
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASC MTE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASC MTE\n"));
 		    }
 
 	          if (length >= 6)
 		    {
 		      pMTE[x].ASCQ = MediumTransportElementDescriptor->ascq;
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASCQ MTE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASCQ MTE\n"));
 		    }
 
 	          if (length >= 0xa)
@@ -4384,7 +4487,7 @@ GetElementStatus(
 			  pMTE[x].from = -1;
 			}
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip source MTE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip source MTE\n"));
 		    }
 
 		  offset = offset + length;
@@ -4422,14 +4525,14 @@ GetElementStatus(
 		    {
 		      pSTE[x].ASC = StorageElementDescriptor->asc;
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASC STE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASC STE\n"));
 		    }
 
 		  if (length >= 6)
 		    {
 		      pSTE[x].ASCQ = StorageElementDescriptor->ascq;
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASCQ STE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASCQ STE\n"));
 		    }
 
 		  if (length >= 0xa)
@@ -4441,7 +4544,7 @@ GetElementStatus(
 			  pSTE[x].from = -1;
 			}
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip source STE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip source STE\n"));
 		    }
 
                   offset = offset + length;
@@ -4479,14 +4582,14 @@ GetElementStatus(
 		    {
 		      pIEE[x].ASC = ImportExportElementDescriptor->asc;
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASC IEE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASC IEE\n"));
 		    }
 
 		  if (length >= 6)
 		    {
 		      pIEE[x].ASCQ = ImportExportElementDescriptor->ascq;
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASCQ IEE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASCQ IEE\n"));
 		    }
 
 		  if (length >= 0xa)
@@ -4498,7 +4601,7 @@ GetElementStatus(
 			  pIEE[x].from = -1;
 			}
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip source IEE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip source IEE\n"));
 		    }
 
 		  offset = offset + length;
@@ -4536,14 +4639,14 @@ GetElementStatus(
 		    {
 		      pDTE[x].ASC = DataTransferElementDescriptor->asc;
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASC DTE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASC DTE\n"));
 		    }
 
 		  if (length >= 6)
 		    {
 		      pDTE[x].ASCQ = DataTransferElementDescriptor->ascq;
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip ASCQ DTE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip ASCQ DTE\n"));
 		    }
 
 		  if (length >= 0xa)
@@ -4555,7 +4658,7 @@ GetElementStatus(
 			  pDTE[x].from = -1;
 			}
 		    } else {
-		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"Skip source STE\n");
+		      DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("Skip source STE\n"));
 		    }
 
 		  offset = offset + length;
@@ -4563,38 +4666,38 @@ GetElementStatus(
               break;
             default:
               offset = offset + length;
-              DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,"GetElementStatus : UnGknown Type %d\n",ElementStatusPage->type);
+              DebugPrint(DEBUG_ERROR, SECTION_ELEMENT,_("GetElementStatus : UnGknown Type %d\n"),ElementStatusPage->type);
               break;
             }
         }
 	free(DataBuffer);
     }
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"\n\n\tMedia Transport Elements (robot arms) :\n");
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("\n\n\tMedia Transport Elements (robot arms) :\n"));
 
   for ( x = 0; x < MTE; x++)
-    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"\t\tElement #%04d %c\n\t\t\tEXCEPT = %02x\n\t\t\tASC = %02X ASCQ = %02X\n\t\t\tType %d From = %04d\n\t\t\tTAG = %s\n",
+    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("\t\tElement #%04d %c\n\t\t\tEXCEPT = %02x\n\t\t\tASC = %02X ASCQ = %02X\n\t\t\tType %d From = %04d\n\t\t\tTAG = %s\n"),
               pMTE[x].address, pMTE[x].status, pMTE[x].except, pMTE[x].ASC,
               pMTE[x].ASCQ, pMTE[x].type, pMTE[x].from, pMTE[x].VolTag);
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"\n\n\tStorage Elements (Media slots) :\n");
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("\n\n\tStorage Elements (Media slots) :\n"));
 
   for ( x = 0; x < STE; x++)
-    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"\t\tElement #%04d %c\n\t\t\tEXCEPT = %02X\n\t\t\tASC = %02X ASCQ = %02X\n\t\t\tType %d From = %04d\n\t\t\tTAG = %s\n",
+    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("\t\tElement #%04d %c\n\t\t\tEXCEPT = %02X\n\t\t\tASC = %02X ASCQ = %02X\n\t\t\tType %d From = %04d\n\t\t\tTAG = %s\n"),
               pSTE[x].address, pSTE[x].status, pSTE[x].except, pSTE[x].ASC,
               pSTE[x].ASCQ, pSTE[x].type, pSTE[x].from, pSTE[x].VolTag);
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"\n\n\tData Transfer Elements (tape drives) :\n");
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("\n\n\tData Transfer Elements (tape drives) :\n"));
 
   for ( x = 0; x < DTE; x++)
-    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"\t\tElement #%04d %c\n\t\t\tEXCEPT = %02X\n\t\t\tASC = %02X ASCQ = %02X\n\t\t\tType %d From = %04d\n\t\t\tTAG = %s\n\t\t\tSCSI ADDRESS = %d\n",
+    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("\t\tElement #%04d %c\n\t\t\tEXCEPT = %02X\n\t\t\tASC = %02X ASCQ = %02X\n\t\t\tType %d From = %04d\n\t\t\tTAG = %s\n\t\t\tSCSI ADDRESS = %d\n"),
               pDTE[x].address, pDTE[x].status, pDTE[x].except, pDTE[x].ASC,
               pDTE[x].ASCQ, pDTE[x].type, pDTE[x].from, pDTE[x].VolTag,pDTE[x].scsi);
 
-  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"\n\n\tImport/Export Elements  :\n");
+  DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("\n\n\tImport/Export Elements  :\n"));
 
   for ( x = 0; x < IEE; x++)
-    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,"\t\tElement #%04d %c\n\t\t\tEXCEPT = %02X\n\t\t\t\tASC = %02X ASCQ = %02X\n\t\t\tType %d From = %04d\n\t\t\tTAG = %s\n",
+    DebugPrint(DEBUG_INFO, SECTION_ELEMENT,_("\t\tElement #%04d %c\n\t\t\tEXCEPT = %02X\n\t\t\t\tASC = %02X ASCQ = %02X\n\t\t\tType %d From = %04d\n\t\t\tTAG = %s\n"),
 	       pIEE[x].address, pIEE[x].status, pIEE[x].except, pIEE[x].ASC,
 	       pIEE[x].ASCQ, pIEE[x].type, pIEE[x].from, pIEE[x].VolTag);
 
@@ -4619,7 +4722,7 @@ RequestSense(
   CDB_T CDB;
   int ret;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START RequestSense\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START RequestSense\n"));
 
   CDB[0] = SC_COM_REQUEST_SENSE;               /* REQUEST SENSE */
   CDB[1] = 0;                                  /* Logical Unit Number = 0, Reserved */
@@ -4639,7 +4742,7 @@ RequestSense(
 
   if (ret < 0)
     {
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP RequestSense (%d)\n",ret);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP RequestSense (%d)\n"),ret);
       return(ret);
       /*NOTREACHED*/
     }
@@ -4647,7 +4750,7 @@ RequestSense(
   if ( ret > 0)
     {
       DecodeExtSense(ExtendedRequestSense, "RequestSense : ",debug_file);
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP RequestSense (%d)\n", ExtendedRequestSense->SenseKey);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP RequestSense (%d)\n"), ExtendedRequestSense->SenseKey);
       return(ExtendedRequestSense->SenseKey);
       /*NOTREACHED*/
     }
@@ -4655,7 +4758,7 @@ RequestSense(
   dump_hex((u_char *)ExtendedRequestSense ,
 	   SIZEOF(ExtendedRequestSense_T),
 	   DEBUG_INFO, SECTION_SCSI);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP RequestSense (0)\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP RequestSense (0)\n"));
   return(0);
 }
 
@@ -4671,7 +4774,7 @@ LookupElement(
 {
   size_t x;
 
-  dbprintf(("##### START LookupElement\n"));
+  dbprintf(_("##### START LookupElement\n"));
 
   if (DTE > 0)
     {
@@ -4679,7 +4782,7 @@ LookupElement(
         {
           if (pDTE[x].address == address)
 	  {
-            dbprintf(("##### STOP LookupElement (DTE)\n"));
+            dbprintf(_("##### STOP LookupElement (DTE)\n"));
             return(&pDTE[x]);
 	    /*NOTREACHED*/
 	  }
@@ -4692,7 +4795,7 @@ LookupElement(
         {
           if (pMTE[x].address == address)
 	  {
-            dbprintf(("##### STOP LookupElement (MTE)\n"));
+            dbprintf(_("##### STOP LookupElement (MTE)\n"));
             return(&pMTE[x]);
 	    /*NOTREACHED*/
 	  }
@@ -4705,7 +4808,7 @@ LookupElement(
         {
           if (pSTE[x].address == address)
 	  {
-            dbprintf(("##### STOP LookupElement (STE)\n"));
+            dbprintf(_("##### STOP LookupElement (STE)\n"));
             return(&pSTE[x]);
 	    /*NOTREACHED*/
 	  }
@@ -4718,7 +4821,7 @@ LookupElement(
         {
           if (pIEE[x].address == address)
 	  {
-            dbprintf(("##### STOP LookupElement (IEE)\n"));
+            dbprintf(_("##### STOP LookupElement (IEE)\n"));
             return(&pIEE[x]);
 	    /*NOTREACHED*/
 	  }
@@ -4758,7 +4861,7 @@ LogSense(
 
   (void)DeviceFD;	/* Quiet unused parameter warning */
 
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### START LogSense\n");
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### START LogSense\n"));
 
   if ((tapestatfile != NULL) && (pDev[INDEX_TAPECTL].SCSI == 1) &&
       ((StatFile = fopen(tapestatfile,"a")) != NULL))
@@ -4767,7 +4870,7 @@ LogSense(
 
       if (GenericRewind(INDEX_TAPECTL) < 0)
         {
-          DebugPrint(DEBUG_INFO, SECTION_TAPE,"LogSense : Rewind failed\n");
+          DebugPrint(DEBUG_INFO, SECTION_TAPE,_("LogSense : Rewind failed\n"));
           free(pRequestSense);
 	  fclose(StatFile);
           return(0);
@@ -4785,9 +4888,9 @@ LogSense(
 
 	  if ((chgscsi_result = (char *)tape_rdlabel(pDev[INDEX_TAPE].dev, &chgscsi_datestamp, &chgscsi_label)) == NULL)
 	    {
-	      fprintf(StatFile, "==== %s ==== %s ====\n", chgscsi_datestamp, chgscsi_label);
+	      g_fprintf(StatFile, _("==== %s ==== %s ====\n"), chgscsi_datestamp, chgscsi_label);
 	    } else {
-	      fprintf(StatFile, "%s\n", chgscsi_result);
+	      g_fprintf(StatFile, "%s\n", chgscsi_result);
 	    }
 	}
 
@@ -4869,14 +4972,14 @@ LogSense(
             if ((strcmp(pDev[INDEX_TAPECTL].ident, p->ident) == 0 ||strcmp("*", p->ident) == 0)  && p->LogPage == logpages[count]) {
               p->decode(LogParameter, length);
               found = 1;
-              fprintf(StatFile, "\n");
+              g_fprintf(StatFile, "\n");
               break;
             }
             p++;
           }
 
           if (!found) {
-            fprintf(StatFile, "Logpage No %d = %x\n", count ,logpages[count]);
+            g_fprintf(StatFile, _("Logpage No %d = %x\n"), count ,logpages[count]);
 
             while ((u_char *)LogParameter < (buffer + length)) {
               i = LogParameter->ParameterLength;
@@ -4884,30 +4987,30 @@ LogSense(
               switch (i) {
               case 1:
                 value = V1((u_char *)LogParameter + SIZEOF(LogParameter_T));
-                fprintf(StatFile, "ParameterCode %02X = %u(%d)\n", ParameterCode, value, i);
+                g_fprintf(StatFile, _("ParameterCode %02X = %u(%d)\n"), ParameterCode, value, i);
                 break;
               case 2:
                 value = V2((u_char *)LogParameter + SIZEOF(LogParameter_T));
-                fprintf(StatFile, "ParameterCode %02X = %u(%d)\n", ParameterCode, value, i);
+                g_fprintf(StatFile, _("ParameterCode %02X = %u(%d)\n"), ParameterCode, value, i);
                 break;
               case 3:
                 value = V3((u_char *)LogParameter + SIZEOF(LogParameter_T));
-                fprintf(StatFile, "ParameterCode %02X = %u(%d)\n", ParameterCode, value, i);
+                g_fprintf(StatFile, _("ParameterCode %02X = %u(%d)\n"), ParameterCode, value, i);
                 break;
               case 4:
                 value = V4((u_char *)LogParameter + SIZEOF(LogParameter_T));
-                fprintf(StatFile, "ParameterCode %02X = %u(%d)\n", ParameterCode, value, i);
+                g_fprintf(StatFile, _("ParameterCode %02X = %u(%d)\n"), ParameterCode, value, i);
                 break;
               case 5:
                 value = V5((u_char *)LogParameter + SIZEOF(LogParameter_T));
-                fprintf(StatFile, "ParameterCode %02X = %u(%d)\n", ParameterCode, value, i);
+                g_fprintf(StatFile, _("ParameterCode %02X = %u(%d)\n"), ParameterCode, value, i);
                 break;
               default:
-                fprintf(StatFile, "ParameterCode %02X size %d\n", ParameterCode, i);
+                g_fprintf(StatFile, _("ParameterCode %02X size %d\n"), ParameterCode, i);
               }
               LogParameter = (LogParameter_T *)((u_char *)LogParameter +  SIZEOF(LogParameter_T) + i);
             }
-            fprintf(StatFile, "\n");
+            g_fprintf(StatFile, "\n");
           }
         }
       }
@@ -4951,7 +5054,7 @@ LogSense(
       /*@end@*/
       fclose(StatFile);
     }
-  DebugPrint(DEBUG_INFO, SECTION_TAPE,"##### STOP LogSense\n");
+  DebugPrint(DEBUG_INFO, SECTION_TAPE,_("##### STOP LogSense\n"));
   return(0);
 }
 
@@ -4966,7 +5069,7 @@ WriteErrorCountersPage(
   unsigned ParameterCode;
   LogParameter = buffer;
 
-  fprintf(StatFile, "\tWrite Error Counters Page\n");
+  g_fprintf(StatFile, _("\tWrite Error Counters Page\n"));
 
   while ((u_char *)LogParameter < ((u_char *)buffer + length)) {
     i = LogParameter->ParameterLength;
@@ -4976,38 +5079,38 @@ WriteErrorCountersPage(
     if (Decode(LogParameter, &value) == 0) {
       switch (ParameterCode) {
       case 2:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Rewrites",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Rewrites"),
                 value);
         break;
       case 3:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Errors Corrected",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Errors Corrected"),
                 value);
         break;
       case 4:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Times E. Processed",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Times E. Processed"),
                 value);
         break;
       case 5:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Bytes Processed",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Bytes Processed"),
                 value);
         break;
       case 6:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Unrecoverable Errors",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Unrecoverable Errors"),
                 value);
         break;
       default:
-        fprintf(StatFile, "Unknown ParameterCode %02X = %u(%d)\n",
+        g_fprintf(StatFile, _("Unknown ParameterCode %02X = %u(%d)\n"),
                 ParameterCode,
                 value, i);
         break;
       }
     } else {
-      fprintf(StatFile, "Error decoding Result\n");
+      g_fprintf(StatFile, _("Error decoding Result\n"));
     }
     LogParameter = (LogParameter_T *)((u_char *)LogParameter +  SIZEOF(LogParameter_T) + i);
   }
@@ -5024,7 +5127,7 @@ ReadErrorCountersPage(
   unsigned ParameterCode;
   LogParameter = buffer;
 
-  fprintf(StatFile, "\tRead Error Counters Page\n");
+  g_fprintf(StatFile, _("\tRead Error Counters Page\n"));
 
   while ((u_char *)LogParameter < ((u_char *)buffer + length)) {
     i = LogParameter->ParameterLength;
@@ -5034,38 +5137,38 @@ ReadErrorCountersPage(
     if (Decode(LogParameter, &value) == 0) {
       switch (ParameterCode) {
       case 2:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Rereads",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Rereads"),
                 value);
         break;
       case 3:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Errors Corrected",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Errors Corrected"),
                 value);
         break;
       case 4:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Times E. Processed",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Times E. Processed"),
                 value);
         break;
       case 5:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Bytes Processed",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Bytes Processed"),
                 value);
         break;
       case 6:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Unrecoverable Errors",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Unrecoverable Errors"),
                 value);
         break;
       default:
-        fprintf(StatFile, "Unknown ParameterCode %02X = %u(%d)\n",
+        g_fprintf(StatFile, _("Unknown ParameterCode %02X = %u(%d)\n"),
                 ParameterCode,
                 value, i);
         break;
       }
     } else {
-      fprintf(StatFile, "Error decoding Result\n");
+      g_fprintf(StatFile, _("Error decoding Result\n"));
     }
     LogParameter = (LogParameter_T *)((u_char *)LogParameter +  SIZEOF(LogParameter_T) + i);
   }
@@ -5082,7 +5185,7 @@ C1553APage30(
   unsigned ParameterCode;
   LogParameter = buffer;
 
-  fprintf(StatFile, "\tData compression transfer Page\n");
+  g_fprintf(StatFile, _("\tData compression transfer Page\n"));
 
   while ((u_char *)LogParameter < ((u_char *)buffer + length)) {
     i = LogParameter->ParameterLength;
@@ -5092,7 +5195,7 @@ C1553APage30(
     if (Decode(LogParameter, &value) == 0) {
       switch (ParameterCode) {
       default:
-        fprintf(StatFile, "Unknown ParameterCode %02X = %u(%d)\n",
+        g_fprintf(StatFile, _("Unknown ParameterCode %02X = %u(%d)\n"),
                 ParameterCode,
                 value, i);
         break;
@@ -5113,7 +5216,7 @@ C1553APage37(
   unsigned ParameterCode;
   LogParameter = buffer;
 
-  fprintf(StatFile, "\tDrive Counters Page\n");
+  g_fprintf(StatFile, _("\tDrive Counters Page\n"));
 
   while ((u_char *)LogParameter < ((unsigned char *)buffer + length)) {
     i = LogParameter->ParameterLength;
@@ -5123,22 +5226,22 @@ C1553APage37(
     if (Decode(LogParameter, &value) == 0) {
       switch (ParameterCode) {
       case 1:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total loads",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total loads"),
                 value);
         break;
       case 2:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total write drive errors",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total write drive errors"),
                 value);
         break;
       case 3:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total read drive errors",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total read drive errors"),
                 value);
         break;
       default:
-        fprintf(StatFile, "Unknown ParameterCode %02X = %u(%d)\n",
+        g_fprintf(StatFile, _("Unknown ParameterCode %02X = %u(%d)\n"),
                 ParameterCode,
                 value, i);
         break;
@@ -5159,7 +5262,7 @@ EXB85058HEPage39(
   unsigned ParameterCode;
   LogParameter = buffer;
 
-  fprintf(StatFile, "\tData Compression Page\n");
+  g_fprintf(StatFile, _("\tData Compression Page\n"));
 
   while ((u_char *)LogParameter < ((unsigned char *)buffer + length)) {
     i = LogParameter->ParameterLength;
@@ -5169,17 +5272,17 @@ EXB85058HEPage39(
     if (Decode(LogParameter, &value) == 0) {
       switch (ParameterCode) {
       case 5:
-        fprintf(StatFile, "%-30s = %u\n",
-                "KB to Compressor",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("KB to Compressor"),
                 value);
         break;
       case 7:
-        fprintf(StatFile, "%-30s = %u\n",
-                "KB to tape",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("KB to tape"),
                 value);
         break;
       default:
-        fprintf(StatFile, "Unknown ParameterCode %02X = %u(%d)\n",
+        g_fprintf(StatFile, _("Unknown ParameterCode %02X = %u(%d)\n"),
                 ParameterCode,
                 value, i);
         break;
@@ -5200,7 +5303,7 @@ EXB85058HEPage3c(
   unsigned ParameterCode;
   LogParameter = buffer;
 
-  fprintf(StatFile, "\tDrive Usage Information Page\n");
+  g_fprintf(StatFile, _("\tDrive Usage Information Page\n"));
 
   while ((u_char *)LogParameter < ((unsigned char *)buffer + length)) {
     i = LogParameter->ParameterLength;
@@ -5216,21 +5319,21 @@ EXB85058HEPage3c(
       case 5:
         break;
       case 6:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Total Load Count",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Total Load Count"),
                 value);
         break;
       case 7:
-        fprintf(StatFile, "%-30s = %u\n",
-                "MinutesSince Last Clean",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("MinutesSince Last Clean"),
                 value);
         break;
       case 8:
       case 9:
         break;
       case 0xa:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Cleaning Count",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Cleaning Count"),
                 value);
         break;
       case 0xb:
@@ -5241,8 +5344,8 @@ EXB85058HEPage3c(
       case 0x10:
         break;
       case 0x11:
-        fprintf(StatFile, "%-30s = %u\n",
-                "Time to clean",
+        g_fprintf(StatFile, _("%-30s = %u\n"),
+                _("Time to clean"),
                 value);
         break;
       case 0x12:
@@ -5250,7 +5353,7 @@ EXB85058HEPage3c(
       case 0x14:
         break;
       default:
-        fprintf(StatFile, "Unknown ParameterCode %02X = %u(%d)\n",
+        g_fprintf(StatFile, _("Unknown ParameterCode %02X = %u(%d)\n"),
                 ParameterCode,
                 value, i);
         break;
@@ -5266,8 +5369,8 @@ Decode(
     unsigned *		value)
 {
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START Decode\n");
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"Decode Parameter with length %d\n", LogParameter->ParameterLength);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START Decode\n"));
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("Decode Parameter with length %d\n"), LogParameter->ParameterLength);
 
   *value = 0;
   switch (LogParameter->ParameterLength) {
@@ -5290,14 +5393,14 @@ Decode(
     *value = V6((u_char *)LogParameter + SIZEOF(LogParameter_T));
     break;
   default:
-    fprintf(StatFile, "Can't decode ParameterCode %02X size %d\n",
+    g_fprintf(StatFile, _("Can't decode ParameterCode %02X size %d\n"),
             V2(LogParameter->ParameterCode), LogParameter->ParameterLength);
-    DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP Decode (1)\n");
+    DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP Decode (1)\n"));
     return(1);
     /*NOTREACHED*/
   }
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"Result = %d\n", *value);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP Decode(0)\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("Result = %d\n"), *value);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP Decode(0)\n"));
   return(0);
 }
 
@@ -5308,14 +5411,14 @@ DumpDev(
 {
 	if (p != NULL)
 	{
-		printf("%s Devicefd   %d\n", device, p->fd);
-		printf("%s Can SCSI   %d\n", device, p->SCSI);
-		printf("%s Device     %s\n", device, (p->dev != NULL)? p->dev:"No set");
-		printf("%s ConfigName %s\n", device, (p->ConfigName != NULL) ? p->ConfigName:"Not ser");
+		g_printf(_("%s Devicefd   %d\n"), device, p->fd);
+		g_printf(_("%s Can SCSI   %d\n"), device, p->SCSI);
+		g_printf(_("%s Device     %s\n"), device, (p->dev != NULL)? p->dev:_("No set"));
+		g_printf(_("%s ConfigName %s\n"), device, (p->ConfigName != NULL) ? p->ConfigName:_("Not ser"));
 	} else {
-		printf("%s Null Pointer ....\n", device);
+		g_printf(_("%s Null Pointer ....\n"), device);
 	}
-	printf("\n");
+	g_printf(_("\n"));
 }
 
 void
@@ -5377,7 +5480,7 @@ ChangerStatus(
 
   if ((out = fdopen(1 , "w")) == NULL)
     {
-      printf("Error fdopen stdout\n");
+      g_printf(_("Error fdopen stdout\n"));
       free(pbarcoderes);
       return;
       /*NOTREACHED*/
@@ -5387,7 +5490,7 @@ ChangerStatus(
   {
     while(p->ident != NULL)
       {
-         printf ("Ident = %s, type = %s\n",p->ident, p->type);
+         g_printf (_("Ident = %s, type = %s\n"),p->ident, p->type);
          p++;
       }
     DumpSense();
@@ -5399,7 +5502,7 @@ ChangerStatus(
           {
             if (pDev[INDEX_CHANGER].functions->function_status(pDev[INDEX_CHANGER].fd, 1) != 0)
               {
-                printf("Can not initialize changer status\n");
+                g_printf(_("Can not initialize changer status\n"));
 		free(pbarcoderes);
 	        fclose(out);
                 return;
@@ -5409,18 +5512,18 @@ ChangerStatus(
         /*      0123456789012345678901234567890123456789012 */
 	if (HasBarCode)
 	{
-        	printf("Address Type Status From Barcode Label\n");
+        	g_printf(_("Address Type Status From Barcode Label\n"));
 	} else {
-        	printf("Address Type Status From\n");
+        	g_printf(_("Address Type Status From\n"));
 	}
-        printf("-------------------------------------------\n");
+        g_printf(_("-------------------------------------------\n"));
 
 
         for ( x = 0; x < MTE; x++)
 	if (HasBarCode)
 	{
-          printf("%07d MTE  %s  %04d %s ",pMTE[x].address,
-                 (pMTE[x].full ? "Full " :"Empty"),
+          g_printf(_("%07d MTE  %s  %04d %s "),pMTE[x].address,
+                 (pMTE[x].full ? _("Full ") :_("Empty")),
                  pMTE[x].from, pMTE[x].VolTag);
 
 	  if (pMTE[x].full == 1)
@@ -5431,16 +5534,16 @@ ChangerStatus(
 
 	      if (MapBarCode(labelfile, pbarcoderes) == 0 )
 		{
-		  printf("No mapping\n");
+		  g_printf(_("No mapping\n"));
 		} else {
-		  printf("%s \n",pbarcoderes->data.voltag);
+		  g_printf(_("%s \n"),pbarcoderes->data.voltag);
 		}
 	    } else {
-	      printf("\n");
+	      g_printf("\n");
 	    }
 	} else {
-          printf("%07d MTE  %s  %04d \n",pMTE[x].address,
-                 (pMTE[x].full ? "Full " :"Empty"),
+          g_printf(_("%07d MTE  %s  %04d \n"),pMTE[x].address,
+                 (pMTE[x].full ? _("Full ") :_("Empty")),
                  pMTE[x].from);
 	}
 
@@ -5448,8 +5551,8 @@ ChangerStatus(
         for ( x = 0; x < STE; x++)
 	if (HasBarCode)
 	{
-          printf("%07d STE  %s  %04d %s ",pSTE[x].address,
-                 (pSTE[x].full ? "Full ":"Empty"),
+          g_printf(_("%07d STE  %s  %04d %s "),pSTE[x].address,
+                 (pSTE[x].full ? _("Full "):_("Empty")),
                  pSTE[x].from, pSTE[x].VolTag);
 
 	  if (pSTE[x].full == 1)
@@ -5460,16 +5563,16 @@ ChangerStatus(
 
 	      if (MapBarCode(labelfile, pbarcoderes) == 0 )
 		{
-		  printf("No mapping\n");
+		  g_printf(_("No mapping\n"));
 		} else {
-		  printf("%s \n",pbarcoderes->data.voltag);
+		  g_printf(_("%s \n"),pbarcoderes->data.voltag);
 		}
 	    } else {
-	      printf("\n");
+	      g_printf("\n");
 	    }
 	} else {
-          printf("%07d STE  %s  %04d %s\n",pSTE[x].address,
-                 (pSTE[x].full ? "Full ":"Empty"),
+          g_printf(_("%07d STE  %s  %04d %s\n"),pSTE[x].address,
+                 (pSTE[x].full ? _("Full"):_("Empty")),
                  pSTE[x].from, pSTE[x].VolTag);
 	}
 
@@ -5477,8 +5580,8 @@ ChangerStatus(
         for ( x = 0; x < DTE; x++)
 	if (HasBarCode)
 	{
-          printf("%07d DTE  %s  %04d %s ",pDTE[x].address,
-                 (pDTE[x].full ? "Full " : "Empty"),
+          g_printf(_("%07d DTE  %s  %04d %s "),pDTE[x].address,
+                 (pDTE[x].full ? _("Full") : _("Empty")),
                  pDTE[x].from, pDTE[x].VolTag);
 
 	  if (pDTE[x].full == 1)
@@ -5489,25 +5592,25 @@ ChangerStatus(
 
 	      if (MapBarCode(labelfile, pbarcoderes) == 0 )
 		{
-		  printf("No mapping\n");
+		  g_printf(_("No mapping\n"));
 		} else {
-		  printf("%s \n",pbarcoderes->data.voltag);
+		  g_printf("%s \n",pbarcoderes->data.voltag);
 		}
 	    } else {
-	      printf("\n");
+	      g_printf("\n");
 	    }
 
 	} else {
-          printf("%07d DTE  %s  %04d %s\n",pDTE[x].address,
-                 (pDTE[x].full ? "Full " : "Empty"),
+          g_printf(_("%07d DTE  %s  %04d %s\n"),pDTE[x].address,
+                 (pDTE[x].full ?_( "Full ") : _("Empty")),
                  pDTE[x].from, pDTE[x].VolTag);
 	}
 
         for ( x = 0; x < IEE; x++)
 	if (HasBarCode)
 	{
-          printf("%07d IEE  %s  %04d %s ",pIEE[x].address,
-                 (pIEE[x].full ? "Full " : "Empty"),
+          g_printf(_("%07d IEE  %s  %04d %s "),pIEE[x].address,
+                 (pIEE[x].full ? _("Full ") : _("Empty")),
                  pIEE[x].from, pIEE[x].VolTag);
 
 	  if (pIEE[x].full == 1)
@@ -5518,17 +5621,17 @@ ChangerStatus(
 
 	      if (MapBarCode(labelfile, pbarcoderes) == 0 )
 		{
-		  printf("No mapping\n");
+		  g_printf(_("No mapping\n"));
 		} else {
-		  printf("%s \n",pbarcoderes->data.voltag);
+		  g_printf(_("%s \n"),pbarcoderes->data.voltag);
 		}
 	    } else {
-	      printf("\n");
+	      g_printf("\n");
 	    }
 
 	} else {
-          printf("%07d IEE  %s  %04d %s\n",pIEE[x].address,
-                 (pIEE[x].full ? "Full " : "Empty"),
+          g_printf(_("%07d IEE  %s  %04d %s\n"),pIEE[x].address,
+                 (pIEE[x].full ? _("Full ") : _("Empty")),
                  pIEE[x].from, pIEE[x].VolTag);
 	}
 
@@ -5538,23 +5641,23 @@ ChangerStatus(
     {
       if (pDev[INDEX_CHANGER].SCSI == 1)
 	{
-           printf("\nSense Status from robot:\n");
+           g_printf(_("\nSense Status from robot:\n"));
            RequestSense(INDEX_CHANGER , &ExtRequestSense, 0);
            DecodeExtSense(&ExtRequestSense, "", out);
 	}
 
       if (pDev[INDEX_TAPE].SCSI == 1)
         {
-          printf("\n");
-          printf("Sense Status from tape (tapectl):\n");
+          g_printf("\n");
+          g_printf(_("Sense Status from tape (tapectl):\n"));
           RequestSense(INDEX_TAPE, &ExtRequestSense, 0);
           DecodeExtSense(&ExtRequestSense, "", out);
         }
 
       if (pDev[INDEX_TAPECTL].SCSI == 1)
         {
-          printf("\n");
-          printf("Sense Status from tape (tapectl):\n");
+          g_printf("\n");
+          g_printf(_("Sense Status from tape (tapectl):\n"));
           RequestSense(INDEX_TAPECTL, &ExtRequestSense, 0);
           DecodeExtSense(&ExtRequestSense, "", out);
         }
@@ -5562,7 +5665,7 @@ ChangerStatus(
 
     if (strcmp("ModeSenseRobot", option) == 0 || strcmp("all", option) == 0)
       {
-        printf("\n");
+        g_printf("\n");
         if (SCSI_ModeSense(INDEX_CHANGER, pModePage, 0xff, 0x08, 0x3f) == 0)
           {
             DecodeModeSense(pModePage, 0, "Changer :" , 0, out);
@@ -5573,7 +5676,7 @@ ChangerStatus(
       {
         if (pDev[INDEX_TAPECTL].SCSI == 1)
         {
-          printf("\n");
+          g_printf("\n");
           if (SCSI_ModeSense(INDEX_TAPECTL, pModePage, 0xff, 0x0, 0x3f) == 0)
             {
               DecodeModeSense(pModePage, 0, "Tape :" , 1, out);
@@ -5583,16 +5686,16 @@ ChangerStatus(
 
     if (strcmp("fd", option) == 0 || strcmp("all", option) == 0)
     {
-      printf("changer_dev  %s\n",changer_dev);
-      printf("changer_file %s\n", changer_file);
-      printf("tape_device  %s\n\n", tape_device);
+      g_printf("changer_dev  %s\n",changer_dev);
+      g_printf("changer_file %s\n", changer_file);
+      g_printf("tape_device  %s\n\n", tape_device);
       DumpDev(&pDev[INDEX_TAPE], "pTapeDev");
       DumpDev(&pDev[INDEX_TAPECTL], "pTapeDevCtl");
       DumpDev(&pDev[INDEX_CHANGER], "pChangerDev");
     }
 
   if (GenericClean("") == 1)
-    printf("Tape needs cleaning\n");
+    g_printf(_("Tape needs cleaning\n"));
 
   free(pbarcoderes);
   fclose(out);
@@ -5613,7 +5716,7 @@ dump_hex(
         DebugPrint(level, section,"%02X ", (u_char)p[row_count]);
         if (((row_count + 1) % 16) == 0)
           {
-            dbprintf(("   "));
+            dbprintf("   ");
             for (x = 16; x > 0; x--)
               {
 		if (isalnum((u_char)p[row_count - x + 1 ]))
@@ -5647,8 +5750,8 @@ ChgExit(
 {
     (void)level;	/* Quiet unused parameter warning */
 
-   dbprintf(("ChgExit in %s, reason %s\n", where, reason));
-   fprintf(stderr,"%s\n",reason);
+   dbprintf(_("ChgExit in %s, reason %s\n"), where, reason);
+   g_fprintf(stderr,"%s\n",reason);
    exit(2);
 }
 
@@ -5685,11 +5788,11 @@ SCSI_Run(
 
   pRqS = (RequestSense_T *)pRequestSense;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI, "SCSI_Run TestUnitReady\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI, _("SCSI_Run TestUnitReady\n"));
   while (!ok && maxtries < MAXTRIES)
     {
       ret = SCSI_TestUnitReady(DeviceFD, (RequestSense_T *)pRequestSense );
-      DebugPrint(DEBUG_INFO, SECTION_SCSI, "SCSI_Run TestUnitReady ret %d\n",ret);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI, _("SCSI_Run TestUnitReady ret %d\n"),ret);
       switch (ret)
 	{
 	case SCSI_OK:
@@ -5699,42 +5802,42 @@ SCSI_Run(
 	  switch (SenseHandler(DeviceFD, 0, pRqS->SenseKey, pRqS->AdditionalSenseCode, pRqS->AdditionalSenseCodeQualifier, pRqS))
 	    {
 	    case SENSE_NO:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run (TestUnitReady) SENSE_NO\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run (TestUnitReady) SENSE_NO\n"));
 	      ok=1;
 	      break;
 	    case SENSE_TAPE_NOT_ONLINE:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run (TestUnitReady) SENSE_TAPE_NOT_ONLINE\n"));
 	      ok=1;
 	      break;
 	    case SENSE_IGNORE:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run (TestUnitReady) SENSE_IGNORE\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run (TestUnitReady) SENSE_IGNORE\n"));
 	      ok=1;
 	      break;
 	    case SENSE_ABORT:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_Run (TestUnitReady) SENSE_ABORT\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("SCSI_Run (TestUnitReady) SENSE_ABORT\n"));
 	      return(-1);
 	      /*NOTREACHED*/
 	    case SENSE_RETRY:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run (TestUnitReady) SENSE_RETRY\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run (TestUnitReady) SENSE_RETRY\n"));
 	      break;
 	    default:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run (TestUnitReady) default (SENSE)\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run (TestUnitReady) default (SENSE)\n"));
 	      ok=1;
 	      break;
 	    }
 	  break;
 	case SCSI_ERROR:
-	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_Run (TestUnitReady) SCSI_ERROR\n");
+	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("SCSI_Run (TestUnitReady) SCSI_ERROR\n"));
 	  return(-1);
 	  /*NOTREACHED*/
 	case SCSI_BUSY:
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run (TestUnitReady) SCSI_BUSY\n");
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run (TestUnitReady) SCSI_BUSY\n"));
 	  break;
 	case SCSI_CHECK:
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run (TestUnitReady) SCSI_CHECK\n");
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run (TestUnitReady) SCSI_CHECK\n"));
 	  break;
 	default:
-	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_Run (TestUnitReady) unknown (%d)\n",ret);
+	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("SCSI_Run (TestUnitReady) unknown (%d)\n"),ret);
 	  break;
 	}
       if (!ok)
@@ -5744,11 +5847,11 @@ SCSI_Run(
       }
     }
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run TestUnitReady after %d sec:\n",maxtries);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run TestUnitReady after %d sec:\n"),maxtries);
 
   if (ok != 1)
     {
-      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_Run Exit %d\n",ret);
+      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("SCSI_Run Exit %d\n"),ret);
       return(-1);
       /*NOTREACHED*/
     }
@@ -5766,7 +5869,7 @@ SCSI_Run(
 				pRequestSense,
 				RequestSenseLength);
 
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run Exit %d\n",ret);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run Exit %d\n"),ret);
       switch (ret)
 	{
 	case SCSI_OK:
@@ -5776,42 +5879,42 @@ SCSI_Run(
 	  switch (SenseHandler(DeviceFD, 0, pRqS->SenseKey, pRqS->AdditionalSenseCode, pRqS->AdditionalSenseCodeQualifier, pRqS))
 	    {
 	    case SENSE_NO:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run SENSE_NO\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run SENSE_NO\n"));
 	      ok=1;
 	      break;
 	    case SENSE_TAPE_NOT_ONLINE:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run SENSE_TAPE_NOT_ONLINE\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run SENSE_TAPE_NOT_ONLINE\n"));
 	      ok=1;
 	      break;
 	    case SENSE_IGNORE:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run SENSE_IGNORE\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run SENSE_IGNORE\n"));
 	      ok=1;
 	      break;
 	    case SENSE_ABORT:
-	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_Run SENSE_ABORT\n");
+	      DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("SCSI_Run SENSE_ABORT\n"));
 	      return(-1);
 	      /*NOTREACHED*/
 	    case SENSE_RETRY:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run SENSE_RETRY\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run SENSE_RETRY\n"));
 	      break;
 	    default:
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run default (SENSE)\n");
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run default (SENSE)\n"));
 	      ok=1;
 	      break;
 	    }
 	  break;
 	case SCSI_ERROR:
-	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_Run SCSI_ERROR\n");
+	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("SCSI_Run SCSI_ERROR\n"));
 	  return(-1);
 	  /*NOTREACHED*/
 	case SCSI_BUSY:
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run SCSI_BUSY\n");
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run SCSI_BUSY\n"));
 	  break;
 	case SCSI_CHECK:
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Run (TestUnitReady) SCSI_CHECK\n");
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Run (TestUnitReady) SCSI_CHECK\n"));
 	  break;
 	default:
-	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_Run (TestUnitReady) unknown (%d)\n",ret);
+	  DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("SCSI_Run (TestUnitReady) unknown (%d)\n"),ret);
 	  break;
 	}
       maxtries++;
@@ -5843,7 +5946,7 @@ SCSI_AlignElements(
   int ret;
   int i;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START SCSI_AlignElements\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START SCSI_AlignElements\n"));
 
   pRequestSense = alloc(SIZEOF(RequestSense_T));
 
@@ -5862,12 +5965,12 @@ SCSI_AlignElements(
       ret = SCSI_Run(DeviceFD, Input, CDB, 12,
                                 NULL, 0, pRequestSense, SIZEOF(RequestSense_T));
 
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_AlignElements : SCSI_Run = %d\n", ret);
-      DecodeSense(pRequestSense, "SCSI_AlignElements :",debug_file);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_AlignElements : SCSI_Run = %d\n"), ret);
+      DecodeSense(pRequestSense, _("SCSI_AlignElements :"),debug_file);
 
       if (ret < 0)
         {
-          DebugPrint(DEBUG_ERROR, SECTION_SCSI,"%s: Request Sense[Inquiry]: %02X",
+          DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("%s: Request Sense[Inquiry]: %02X"),
                     "chs", ((u_char *) &pRequestSense)[0]);
           for (i = 1; i < (int)sizeof(RequestSense_T); i++)
             DebugPrint(DEBUG_ERROR, SECTION_SCSI," %02X", ((u_char *) &pRequestSense)[i]);
@@ -5880,35 +5983,35 @@ SCSI_AlignElements(
           switch(SenseHandler(DeviceFD, 0 , pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
             {
             case SENSE_IGNORE:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_AlignElements : SENSE_IGNORE\n");
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_AlignElements : SENSE_IGNORE\n"));
               return(0);
               /*NOTREACHED*/
             case SENSE_RETRY:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_AlignElements : SENSE_RETRY no %d\n", retry);
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_AlignElements : SENSE_RETRY no %d\n"), retry);
               break;
             case SENSE_ABORT:
-              DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_AlignElements : SENSE_ABORT\n");
+              DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("SCSI_AlignElements : SENSE_ABORT\n"));
               return(-1);
               /*NOTREACHED*/
             case SENSE_TAPE_NOT_UNLOADED:
-              DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_AlignElements : Tape still loaded, eject failed\n");
+              DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("SCSI_AlignElements : Tape still loaded, eject failed\n"));
               return(-1);
               /*NOTREACHED*/
             default:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_AlignElements : end %d\n", pRequestSense->SenseKey);
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_AlignElements : end %d\n"), pRequestSense->SenseKey);
               return(pRequestSense->SenseKey);
               /*NOTREACHED*/
             }
         }
       if (ret == 0)
         {
-          DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_AlignElements : end %d\n", ret);
+          DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_AlignElements : end %d\n"), ret);
           return(ret);
 	  /*NOTREACHED*/
         }
     }
-  DebugPrint(DEBUG_ERROR, SECTION_SCSI,"SCSI_AlignElements :"
-	     "Retries exceeded = %d\n", retry);
+  DebugPrint(DEBUG_ERROR, SECTION_SCSI,
+	    _("SCSI_AlignElements: Retries exceeded = %d\n"), retry);
   return(-1);
 }
 
@@ -5926,7 +6029,7 @@ SCSI_Move(
   int ret = -1;
   int i;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START SCSI_Move\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START SCSI_Move\n"));
 
   pRequestSense = alloc(SIZEOF(RequestSense_T));
 
@@ -5946,12 +6049,12 @@ SCSI_Move(
       ret = SCSI_Run(DeviceFD, Input, CDB, 12,
                                 NULL, 0, pRequestSense, SIZEOF(RequestSense_T));
 
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Move : SCSI_Run = %d\n", ret);
-      DecodeSense(pRequestSense, "SCSI_Move :",debug_file);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Move : SCSI_Run = %d\n"), ret);
+      DecodeSense(pRequestSense, _("SCSI_Move :"),debug_file);
 
       if (ret < 0)
         {
-          DebugPrint(DEBUG_ERROR, SECTION_SCSI,"%s: Request Sense[Inquiry]: %02X",
+          DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("%s: Request Sense[Inquiry]: %02X"),
                     "chs", ((u_char *) &pRequestSense)[0]);
           for (i = 1; i < (int)sizeof(RequestSense_T); i++)
             DebugPrint(DEBUG_ERROR, SECTION_SCSI," %02X", ((u_char *) &pRequestSense)[i]);
@@ -5964,28 +6067,28 @@ SCSI_Move(
           switch(SenseHandler(DeviceFD,  0 , pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
             {
             case SENSE_IGNORE:
-              dbprintf(("SCSI_Move : SENSE_IGNORE\n"));
+              dbprintf(_("SCSI_Move : SENSE_IGNORE\n"));
               return(0);
               /*NOTREACHED*/
             case SENSE_RETRY:
-              dbprintf(("SCSI_Move : SENSE_RETRY no %d\n", retry));
+              dbprintf(_("SCSI_Move : SENSE_RETRY no %d\n"), retry);
               break;
             case SENSE_ABORT:
-              dbprintf(("SCSI_Move : SENSE_ABORT\n"));
+              dbprintf(_("SCSI_Move : SENSE_ABORT\n"));
               return(-1);
               /*NOTREACHED*/
             case SENSE_TAPE_NOT_UNLOADED:
-              dbprintf(("SCSI_Move : Tape still loaded, eject failed\n"));
+              dbprintf(_("SCSI_Move : Tape still loaded, eject failed\n"));
               return(-1);
               /*NOTREACHED*/
             default:
-              dbprintf(("SCSI_Move : end %d\n", pRequestSense->SenseKey));
+              dbprintf(_("SCSI_Move : end %d\n"), pRequestSense->SenseKey);
               return(pRequestSense->SenseKey);
               /*NOTREACHED*/
             }
         }
     }
-  dbprintf(("SCSI_Move : end %d\n", ret));
+  dbprintf(_("SCSI_Move : end %d\n"), ret);
   return(ret);
 }
 
@@ -5999,7 +6102,7 @@ SCSI_LoadUnload(
   CDB_T CDB;
   int ret;
 
-  dbprintf(("##### START SCSI_LoadUnload\n"));
+  dbprintf(_("##### START SCSI_LoadUnload\n"));
 
   CDB[0] = SC_COM_UNLOAD;
   CDB[1] = byte1;
@@ -6016,11 +6119,12 @@ SCSI_LoadUnload(
 
   if (ret < 0)
     {
-      dbprintf(("SCSI_Unload : failed %d\n", ret));
+      dbprintf(_("SCSI_Unload : failed %d\n"), ret);
       return(-1);
       /*NOTREACHED*/
     }
 
+  dbprintf(_("##### STOP SCSI_LoadUnload\n"));
   return(ret);
 }
 
@@ -6032,7 +6136,7 @@ SCSI_TestUnitReady(
   CDB_T CDB;
   int ret;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START SCSI_TestUnitReady\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START SCSI_TestUnitReady\n"));
 
   CDB[0] = SC_COM_TEST_UNIT_READY;
   CDB[1] = 0;
@@ -6051,7 +6155,7 @@ SCSI_TestUnitReady(
    */
   if (ret > 0)
     {
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"###### STOP SCSI_TestUnitReady (1)\n");
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("###### STOP SCSI_TestUnitReady (1)\n"));
       return(ret);
       /*NOTREACHED*/
     }
@@ -6062,7 +6166,7 @@ SCSI_TestUnitReady(
    */
   if (pRequestSense->ErrorCode == 0 && pRequestSense->SenseKey == 0)
     {
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"###### STOP SCSI_TestUnitReady (1)\n");
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("###### STOP SCSI_TestUnitReady (1)\n"));
       return(0);
       /*NOTREACHED*/
     }
@@ -6070,7 +6174,13 @@ SCSI_TestUnitReady(
   /*
    * Some sense is set
    */
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"###### STOP SCSI_TestUnitReady (0)\n");
+  if (pRequestSense->ErrorCode != 0){
+    DebugPrint(DEBUG_INFO, SECTION_SCSI,_("###### STOP SCSI_TestUnitReady ErrorCode set\n"));
+  }
+  if (pRequestSense->SenseKey != 0) {
+    DebugPrint(DEBUG_INFO, SECTION_SCSI,_("###### STOP SCSI_TestUnitReady Sense Key set\n"));
+  }
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("###### STOP SCSI_TestUnitReady (0)\n"));
   return(SCSI_SENSE);
 }
 
@@ -6090,9 +6200,9 @@ SCSI_ModeSelect(
   int retry;
   u_char *sendbuf;
 
-  dbprintf(("##### START SCSI_ModeSelect\n"));
+  dbprintf(_("##### START SCSI_ModeSelect\n"));
 
-  dbprintf(("SCSI_ModeSelect start length = %u:\n", (unsigned)length));
+  dbprintf(_("SCSI_ModeSelect start length = %u:\n"), (unsigned)length);
   pRequestSense = alloc(SIZEOF(RequestSense_T));
   sendbuf = alloc((size_t)length + 4);
   memset(sendbuf, 0 , (size_t)length + 4);
@@ -6117,7 +6227,7 @@ SCSI_ModeSelect(
                                 SIZEOF(RequestSense_T));
       if (ret < 0)
         {
-          dbprintf(("SCSI_ModeSelect : ret %d\n", ret));
+          dbprintf(_("SCSI_ModeSelect : ret %d\n"), ret);
 	  goto done;
           /*NOTREACHED*/
         }
@@ -6130,12 +6240,12 @@ SCSI_ModeSelect(
 			      pRequestSense))
             {
             case SENSE_IGNORE:
-              dbprintf(("SCSI_ModeSelect : SENSE_IGNORE\n"));
+              dbprintf(_("SCSI_ModeSelect : SENSE_IGNORE\n"));
 	      goto done;
               /*NOTREACHED*/
 
             case SENSE_RETRY:
-              dbprintf(("SCSI_ModeSelect : SENSE_RETRY no %d\n", retry));
+              dbprintf(_("SCSI_ModeSelect : SENSE_RETRY no %d\n"), retry);
               break;
 
             default:
@@ -6145,7 +6255,7 @@ SCSI_ModeSelect(
         }
     }
 end:
-  dbprintf(("SCSI_ModeSelect end: %d\n", ret));
+  dbprintf(_("SCSI_ModeSelect end: %d\n"), ret);
 
 done:
   free(pRequestSense);
@@ -6168,9 +6278,9 @@ SCSI_ModeSense(
   int ret = 1;
   int retry = 1;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START SCSI_ModeSense\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START SCSI_ModeSense\n"));
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense start length = %d:\n", size);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense start length = %d:\n"), size);
   pRequestSense = alloc(SIZEOF(RequestSense_T));
 
   while (ret && retry < MAX_RETRIES)
@@ -6200,14 +6310,14 @@ SCSI_ModeSense(
           switch(SenseHandler(DeviceFD, 0, pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
             {
             case SENSE_IGNORE:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense : SENSE_IGNORE\n");
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense : SENSE_IGNORE\n"));
               return(0);
               /*NOTREACHED*/
             case SENSE_RETRY:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense : SENSE_RETRY no %d\n", retry);
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense : SENSE_RETRY no %d\n"), retry);
               break;
             default:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense : end %d\n", pRequestSense->SenseKey);
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense : end %d\n"), pRequestSense->SenseKey);
               return(pRequestSense->SenseKey);
               /*NOTREACHED*/
             }
@@ -6215,7 +6325,7 @@ SCSI_ModeSense(
       retry++;
     }
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense end: %d\n", ret);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense end: %d\n"), ret);
   return(ret);
 }
 
@@ -6233,9 +6343,9 @@ SCSI_Inquiry(
 
   assert(size <= UCHAR_MAX);
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI, "##### START SCSI_Inquiry\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI, _("##### START SCSI_Inquiry\n"));
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI, "SCSI_Inquiry start length = %d:\n", size);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI, _("SCSI_Inquiry start length = %d:\n"), size);
 
   pRequestSense = alloc((size_t)size);
 
@@ -6256,12 +6366,12 @@ SCSI_Inquiry(
                                 SIZEOF(RequestSense_T));
       if (ret < 0)
         {
-          DebugPrint(DEBUG_ERROR, SECTION_SCSI,"%s: Request Sense[Inquiry]: %02X",
+          DebugPrint(DEBUG_ERROR, SECTION_SCSI,_("%s: Request Sense[Inquiry]: %02X"),
                     "chs", ((u_char *) pRequestSense)[0]);
           for (i = 1; i < (int)sizeof(RequestSense_T); i++)
             DebugPrint(DEBUG_ERROR, SECTION_SCSI," %02X", ((u_char *) pRequestSense)[i]);
           DebugPrint(DEBUG_ERROR, SECTION_SCSI, "\n");
-	  DebugPrint(DEBUG_ERROR, SECTION_SCSI, "Inquiry end: %d\n", ret);
+	  DebugPrint(DEBUG_ERROR, SECTION_SCSI, _("Inquiry end: %d\n"), ret);
 	  return(ret);
 	  /*NOTRACHED*/
         }
@@ -6270,14 +6380,14 @@ SCSI_Inquiry(
           switch(SenseHandler(DeviceFD, 0, pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
             {
             case SENSE_IGNORE:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Inquiry : SENSE_IGNORE\n");
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Inquiry : SENSE_IGNORE\n"));
               return(0);
               /*NOTREACHED*/
             case SENSE_RETRY:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI, "SCSI_Inquiry : SENSE_RETRY no %d\n", retry);
+              DebugPrint(DEBUG_INFO, SECTION_SCSI, _("SCSI_Inquiry : SENSE_RETRY no %d\n"), retry);
               break;
             default:
-              DebugPrint(DEBUG_ERROR, SECTION_SCSI, "SCSI_Inquiry : end %d\n", pRequestSense->SenseKey);
+              DebugPrint(DEBUG_ERROR, SECTION_SCSI, _("SCSI_Inquiry : end %d\n"), pRequestSense->SenseKey);
               return(pRequestSense->SenseKey);
               /*NOTREACHED*/
             }
@@ -6286,13 +6396,13 @@ SCSI_Inquiry(
       if (ret == 0)
         {
           dump_hex((u_char *)buffer, size, DEBUG_INFO, SECTION_SCSI);
-          DebugPrint(DEBUG_INFO, SECTION_SCSI, "SCSI_Inquiry : end %d\n", ret);
+          DebugPrint(DEBUG_INFO, SECTION_SCSI, _("SCSI_Inquiry : end %d\n"), ret);
           return(ret);
 	  /*NOTRACHED*/
         }
     }
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_Inquiry end: %d\n", ret);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_Inquiry end: %d\n"), ret);
   return(ret);
 }
 
@@ -6325,7 +6435,7 @@ SCSI_ReadElementStatus(
   int retry = 1;
   int ret = -1;
 
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### START SCSI_ReadElementStatus\n");
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### START SCSI_ReadElementStatus\n"));
 
   pRequestSense = alloc(SIZEOF(RequestSense_T));
 
@@ -6334,7 +6444,7 @@ SCSI_ReadElementStatus(
    */
   if (NoOfElements == 0)
     {
-      ChgExit("SCSI_ReadElementStatus","No of Elements passed are le 0",FATAL);
+      ChgExit("SCSI_ReadElementStatus",_("No of Elements passed are le 0"),FATAL);
       /*NOTREACHED*/
     }
 
@@ -6367,11 +6477,11 @@ SCSI_ReadElementStatus(
 			 *data, 8,
 			 pRequestSense, SIZEOF(RequestSense_T));
 
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ReadElementStatus : (1) SCSI_Run %d\n", ret);
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ReadElementStatus : (1) SCSI_Run %d\n"), ret);
 	  if (ret < 0)
 	    {
 	      DecodeSense(pRequestSense, "SCSI_ReadElementStatus :",debug_file);
-	      DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP SCSI_ReadElementStatus (%d)\n",ret);
+	      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP SCSI_ReadElementStatus (%d)\n"),ret);
 	      return(ret);
 	      /*NOTRACHED*/
 	    }
@@ -6380,15 +6490,15 @@ SCSI_ReadElementStatus(
 	      switch(SenseHandler(DeviceFD, 0, pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
 		{
 		case SENSE_IGNORE:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense : SENSE_IGNORE\n");
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense : SENSE_IGNORE\n"));
 		  retry = 0;
 		  break;
 		case SENSE_RETRY:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense : SENSE_RETRY no %d\n", retry);
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense : SENSE_RETRY no %d\n"), retry);
 		  sleep(2);
 		  break;
 		default:
-		  DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense : end %d\n", pRequestSense->SenseKey);
+		  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense : end %d\n"), pRequestSense->SenseKey);
 		  return(pRequestSense->SenseKey);
 		  /*NOTREACHED*/
 		}
@@ -6401,7 +6511,7 @@ SCSI_ReadElementStatus(
 	}
       if (retry > 0)
 	{
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP SCSI_ReadElementStatus (%d)\n",ret);
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP SCSI_ReadElementStatus (%d)\n"),ret);
 	  return(ret);
 	  /*NOTRACHED*/
 	}
@@ -6409,7 +6519,7 @@ SCSI_ReadElementStatus(
       ElementStatusData = (ElementStatusData_T *)*data;
       DataBufferLength = V3(ElementStatusData->count);
 
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ReadElementStatus: DataBufferLength %X, ret %d\n",DataBufferLength, ret);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ReadElementStatus: DataBufferLength %X, ret %d\n"),DataBufferLength, ret);
 
       dump_hex(*data, 8, DEBUG_INFO, SECTION_ELEMENT);
     } else { /* DescriptorSize != 0 */
@@ -6439,11 +6549,11 @@ SCSI_ReadElementStatus(
                                 pRequestSense, SIZEOF(RequestSense_T));
 
 
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ReadElementStatus : (2) SCSI_Run %d\n", ret);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ReadElementStatus : (2) SCSI_Run %d\n"), ret);
       if (ret < 0)
         {
-          DecodeSense(pRequestSense, "SCSI_ReadElementStatus :",debug_file);
-	  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP SCSI_ReadElementStatus (%d)\n",ret);
+          DecodeSense(pRequestSense, _("SCSI_ReadElementStatus :"),debug_file);
+	  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP SCSI_ReadElementStatus (%d)\n"),ret);
           return(ret);
 	  /*NOTRACHED*/
         }
@@ -6452,15 +6562,15 @@ SCSI_ReadElementStatus(
           switch(SenseHandler(DeviceFD, 0, pRequestSense->SenseKey, pRequestSense->AdditionalSenseCode, pRequestSense->AdditionalSenseCodeQualifier, pRequestSense))
             {
             case SENSE_IGNORE:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense : SENSE_IGNORE\n");
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense : SENSE_IGNORE\n"));
               retry = 0;
               break;
             case SENSE_RETRY:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense : SENSE_RETRY no %d\n", retry);
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense : SENSE_RETRY no %d\n"), retry);
               sleep(2);
               break;
             default:
-              DebugPrint(DEBUG_INFO, SECTION_SCSI,"SCSI_ModeSense : end %d\n", pRequestSense->SenseKey);
+              DebugPrint(DEBUG_INFO, SECTION_SCSI,_("SCSI_ModeSense : end %d\n"), pRequestSense->SenseKey);
               return(pRequestSense->SenseKey);
               /*NOTREACHED*/
             }
@@ -6474,13 +6584,13 @@ SCSI_ReadElementStatus(
 
   if (retry > 0)
     {
-      DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP SCSI_ReadElementStatus (%d)\n",ret);
+      DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP SCSI_ReadElementStatus (%d)\n"),ret);
       return(ret);
       /*NOTRACHED*/
     }
 
   dump_hex(*data, DataBufferLength, DEBUG_INFO, SECTION_SCSI);
-  DebugPrint(DEBUG_INFO, SECTION_SCSI,"##### STOP SCSI_ReadElementStatus (%d)\n",ret);
+  DebugPrint(DEBUG_INFO, SECTION_SCSI,_("##### STOP SCSI_ReadElementStatus (%d)\n"),ret);
   return(ret);
 }
 
@@ -6495,8 +6605,8 @@ printf_arglist_function2(void DebugPrint, int, level, int, section, char *, fmt)
   if (changer->debuglevel)
     {
       if (sscanf(changer->debuglevel,"%d:%d", &dlevel, &dsection) != 2) {
-      	dbprintf(("Parse error: line is '%s' expected [0-9]*:[0-9]*\n",
-		  changer->debuglevel));
+      	dbprintf(_("Parse error: line is '%s' expected [0-9]*:[0-9]*\n"),
+		  changer->debuglevel);
         dlevel=1;
         dsection=1;
       }
@@ -6506,16 +6616,16 @@ printf_arglist_function2(void DebugPrint, int, level, int, section, char *, fmt)
     }
 
   arglist_start(argp, fmt);
-  vsnprintf(buf, SIZEOF(buf), fmt, argp);
+  g_vsnprintf(buf, SIZEOF(buf), fmt, argp);
   if (dlevel >= level)
     {
       if (section == dsection || dsection == 0)
 	{
-	  if (index(buf, '\n') != NULL && strlen(buf) > 1)
+	  if (strchr(buf, '\n') != NULL && strlen(buf) > 1)
           {
-	     dbprintf(("%ld:%s", (long)ti, buf));
+	     dbprintf(_("%ld:%s"), (long)ti, buf);
 	  } else {
-	     dbprintf(("%s", buf));
+	     dbprintf("%s", buf);
 	  }
 	}
     }