X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=bacula%2Fscripts%2Fmtx-changer.in;h=a40e13769cf845cd3dd5be6a2601df9a9e74562f;hb=840f9cf38fa5839c9031ff6201f81287ed91aa5a;hp=f25467d434d90f17da598718248329f2707a3eff;hpb=c44199a547a3c66b23851b5f0b2831d2c4552ef8;p=bacula%2Fbacula

diff --git a/bacula/scripts/mtx-changer.in b/bacula/scripts/mtx-changer.in
index f25467d434..a40e13769c 100644
--- a/bacula/scripts/mtx-changer.in
+++ b/bacula/scripts/mtx-changer.in
@@ -6,15 +6,34 @@
 #
 #  If you set in your Device resource
 #
-#  Changer Command = "path-to-this-script/mtx-changer" %c %o %S %a %d
+#  Changer Command = "path-to-this-script/mtx-changer %c %o %S %a %d"
 #    you will have the following input to this script:
 #
+#  So Bacula will always call with all the following arguments, even though
+#    in come cases, not all are used.
+#
 #  mtx-changer "changer-device" "command" "slot" "archive-device" "drive-index"
 #		   $1		   $2	    $3	      $4	       $5
 #
 #  for example:
 #
 #  mtx-changer /dev/sg0 load 1 /dev/nst0 0 (on a Linux system)
+# 
+#  will request to load the first cartidge into drive 0, where
+#   the SCSI control channel is /dev/sg0, and the read/write device
+#   is /dev/nst0.
+#
+#  The commands are:
+#      Command		  Function
+#      unload		  unload a given slot
+#      load		  load a given slot
+#      loaded		  which slot is loaded?
+#      list		  list Volume names (requires barcode reader)
+#      slots		  how many slots total?
+#
+#  Slots are numbered from 1 ...
+#  Drives are numbered from 0 ...
+#
 #
 #  If you need to an offline, refer to the drive as $4
 #    e.g.   mt -f $4 offline
@@ -27,101 +46,156 @@
 #   exit code, Bacula will assume the request failed.
 #
 
+# source our conf file
+. @scriptdir@/mtx-changer.conf
+
 MTX=@MTX@
 
+if test ${debug_log} -ne 0 ; then
+  touch @working_dir@/mtx.log
+fi
+dbgfile="@working_dir@/mtx.log"
+debug() {
+    if test -f $dbgfile; then
+	echo "`date +\"%Y%m%d-%H:%M:%S\"` $*" >> $dbgfile
+    fi
+}
+
+
+#
+# Create a temporary file
+#
+make_temp_file() {
+  TMPFILE=`mktemp @working_dir@/mtx.XXXXXXXXXX`
+  if test x${TMPFILE} = x; then
+     TMPFILE="@working_dir@/mtx.$$"
+     if test -f ${TMPFILE}; then
+	echo "Temp file security problem on: ${TMPFILE}"
+	exit 1
+     fi
+  fi
+}
+
+#
+# The purpose of this function to wait a maximum 
+#   time for the drive. It will
+#   return as soon as the drive is ready, or after
+#   waiting a maximum of 300 seconds.
+# Note, this is very system dependent, so if you are
+#   not running on Linux, you will probably need to
+#   re-write it, or at least change the grep target.
+#   We've attempted to get the appropriate OS grep targets
+#   in the code at the top of this script.
+#
 wait_for_drive() {
-  while ! mt -f $1 status >/dev/null 2>&1; do
-#   echo "Device $1 - not ready, retrying..."
-    sleep 5
+  i=0 
+  while [ $i -le 300 ]; do  # Wait max 300 seconds
+    if mt -f $1 status 2>&1 | grep "${ready}" >/dev/null 2>&1; then
+      break
+    fi
+    debug "Device $1 - not ready, retrying..."
+    sleep 1
+    i=`expr $i + 1`
   done
 }
 
+# check parameter count on commandline
+#
+check_parm_count() {
+    pCount=$1
+    pCountNeed=$2
+    if test $pCount -lt $pCountNeed; then
+	echo "usage: mtx-changer ctl-device command [slot archive-device drive-index]"
+	echo "	Insufficient number of arguments given."
+	if test $pCount -lt 2; then
+	    echo "  Mimimum usage is first two arguments ..."
+	else
+	    echo "  Command expected $pCountNeed arguments"
+	fi
+	exit 1
+    fi
+}
+
+# Check for special cases where only 2 arguments are needed, 
+#  all others are a minimum of 5
+#
+case $2 in
+    list)
+	check_parm_count $# 2
+	;;
+    slots)
+	check_parm_count $# 2
+	;;
+    *)
+	check_parm_count $# 5
+	;;
+esac
 
-if test $# -lt 2 ; then
-  echo "usage: mtx-changer ctl-device command slot archive-device drive"
-  echo "  Insufficient number of arguments arguments given."
-  echo "  Mimimum usage is first two arguments ..."
-  exit 1
-fi
 
 # Setup arguments
 ctl=$1
 cmd="$2"
 slot=$3
 device=$4
-# If drive not given, default to 0
-if test $# = 5 ; then
-  drive=$5
-else
-  drive=0
-fi
-
-#
-# Check for special cases where only 2 arguments are needed, 
-#  all others are a minimum of 3
-case $cmd in
-   loaded)
-     ;;
-   unload)
-     ;;
-   list)
-     ;;
-   slots)
-     ;;
-   *)
-     if test $# -lt 3; then
-	echo "usage: mtx-changer ctl-device command slot archive-device drive"
-	echo "	Insufficient number of arguments arguments given."
-	echo "	Mimimum usage is first three arguments ..."
-	exit 1
-     fi
-     ;;
-esac
+drive=$5
 
+debug "Parms: $ctl $cmd $slot $device $drive"
 
 case $cmd in 
    unload)
-#     echo "Doing mtx -f $ctl unload $slot $drive"
-#
-# enable the following line if you need to eject the cartridge
-#     mt -f $device offline
-      if test x$slot = x; then
-	 ${MTX} -f $ctl unload
-      else
-	 ${MTX} -f $ctl unload $slot $drive
+      debug "Doing mtx -f $ctl unload $slot $drive"
+
+      if test ${offline} -eq 1 ; then
+	mt -f $device offline
       fi
+      if test ${offline_sleep} -ne 0 ; then
+	sleep ${offline_sleep}
+      fi
+      ${MTX} -f $ctl unload $slot $drive
       ;;
 
    load)
-#     echo "Doing mtx -f $ctl load $slot $drive"
+      debug "Doing mtx -f $ctl load $slot $drive"
       ${MTX} -f $ctl load $slot $drive
       rtn=$?
-#
-# Increase the sleep time if you have a slow device
-# or remove the sleep and add the following:
-#     wait_for_drive $device
-      sleep 15
+      if test ${load_sleep} -ne 0 ; then
+	sleep ${load_sleep}
+      fi
+      wait_for_drive $device
       exit $rtn
       ;;
 
    list) 
-#     echo "Requested list"
-      ${MTX} -f $ctl status | grep " *Storage Element [0-9]*:.*Full" | awk "{print \$3 \$4}" | sed "s/Full *\(:VolumeTag=\)*//"
-# Comment out the previous line and add a line here
-# to print "fake" barcodes.
+      debug "Doing mtx -f $ctl -- to list volumes"
+      make_temp_file
+      if test ${inventory} -ne 0 ; then
+	${MTX} -f $ctl inventory
+      fi
+      ${MTX} -f $ctl status >${TMPFILE}
+      rtn=$?
+      if test ${vxa_packetloader} -ne 0 ; then
+	cat ${TMPFILE} | grep " *Storage Element [0-9]*:.*Full" | sed "s/ Storage Element //" | sed "s/Full :VolumeTag=//"
+      else
+	cat ${TMPFILE} | grep " Storage Element [0-9]*:.*Full" | awk "{print \$3 \$4}" | sed "s/Full *\(:VolumeTag=\)*//"
+      fi
+      cat ${TMPFILE} | grep "^Data Transfer Element [0-9]*:Full (Storage Element [0-9]" | awk '{printf "%s:%s\n",$7,$10}'
+      rm -f ${TMPFILE} >/dev/null 2>&1
+      exit $rtn
       ;;
 
    loaded)
-      ${MTX} -f $ctl status >/tmp/mtx.$$
+      debug "Doing mtx -f $ctl $drive -- to find what is loaded"
+      make_temp_file
+      ${MTX} -f $ctl status >${TMPFILE}
       rtn=$?
-      cat /tmp/mtx.$$ | grep "^Data Transfer Element $drive:Full" | awk "{print \$7}"
-      cat /tmp/mtx.$$ | grep "^Data Transfer Element $drive:Empty" | awk "{print 0}"
-      rm -f /tmp/mtx.$$
+      cat ${TMPFILE} | grep "^Data Transfer Element $drive:Full" | awk "{print \$7}"
+      cat ${TMPFILE} | grep "^Data Transfer Element $drive:Empty" | awk "{print 0}"
+      rm -f ${TMPFILE} >/dev/null 2>&1
       exit $rtn
       ;;
 
    slots)
-#     echo "Request slots"
+      debug "Doing mtx -f $ctl -- to get count of slots"
       ${MTX} -f $ctl status | grep " *Storage Changer" | awk "{print \$5}"
       ;;
 esac