ebl update for next-vol test

[bacula/bacula] / regress / scripts / cleanup-tape.in

diff --git a/regress/scripts/cleanup-tape.in b/regress/scripts/cleanup-tape.in
index 1fbefe6d490d302816caee89ae35a27213bab91f..936540289db983a13199aa913ac319d654e000ef 100755 (executable)
--- a/regress/scripts/cleanup-tape.in
+++ b/regress/scripts/cleanup-tape.in
@@ -1,12 +1,26 @@
 #!/bin/sh
 #
-# Cleanup left over files -- both before and after test run
+# Cleanup left over files, then load $SLOT1 into drive and    
+#   write an EOF on it.
 #
+
+. scripts/functions
+
 scripts/cleanup
 
-a=`bin/mtx-changer @autochanger@ loaded 0 @tape_drive@ 0`
-if test $a = 0 ; then
-  bin/mtx-changer @autochanger@ load 1 @tape_drive@ 0
+if test x@autochanger@ != x/dev/null; then
+   slot=`bin/@changer_script@ @autochanger@ loaded 0 @tape_drive@ $DRIVE1`
+   case $slot in
+   0)
+      bin/@changer_script@ @autochanger@ load $SLOT1 @tape_drive@ $DRIVE1
+      ;;
+   $SLOT1)
+      ;;
+   default)
+      bin/@changer_script@ @autochanger@ unload $slot @tape_drive@ $DRIVE1
+      bin/@changer_script@ @autochanger@ load $SLOT1 @tape_drive@ $DRIVE1
+      ;;
+  esac
 fi
-mt -f @tape_drive@ rewind
-mt -f @tape_drive@ weof
+
+init_drive @tape_drive@