ebl Add sleep in vtape changer to simulate real hardware

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

diff --git a/regress/scripts/cleanup-tape.in b/regress/scripts/cleanup-tape.in
index 1627c91d714cfb463e1e5d4e59a76b12a21920d4..e08b12a854b3be6a53d31ccf41c9c835a45f16b1 100755 (executable)
--- a/regress/scripts/cleanup-tape.in
+++ b/regress/scripts/cleanup-tape.in
@@ -1,14 +1,29 @@
 #!/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.
 #
-. ./config
+
+. scripts/functions
 
 scripts/cleanup
 
-a=`bin/mtx-changer @autochanger@ loaded $SLOT1 @tape_drive@ 0`
-if test $a = 0 ; then
-  bin/mtx-changer @autochanger@ load $SLOT1 @tape_drive@ 0
+# init slot for vtape driver
+init_slot @tape_drive@ $SLOT1
+
+if test x@autochanger@ != x/dev/null; then
+   slot=`$scripts/@changer_script@ @autochanger@ loaded 0 @tape_drive@ $DRIVE1`
+   case $slot in
+   0)
+      $scripts/@changer_script@ @autochanger@ load $SLOT1 @tape_drive@ $DRIVE1
+      ;;
+   $SLOT1)
+      ;;
+   *)
+      $scripts/@changer_script@ @autochanger@ unload $slot @tape_drive@ $DRIVE1
+      $scripts/@changer_script@ @autochanger@ load $SLOT1 @tape_drive@ $DRIVE1
+      ;;
+  esac
 fi
-mt -f @tape_drive@ rewind
-mt -f @tape_drive@ weof
+
+init_drive @tape_drive@