ebl Ok in the current trunk

[bacula/bacula] / bacula / scripts / disk-changer.in

diff --git a/bacula/scripts/disk-changer.in b/bacula/scripts/disk-changer.in
index 7181c60f2d0d6158f154f4d0c3894cd262fcccc4..8a901558bc57c8b2a06dda35df87f66b8bc0ba44 100644 (file)
--- a/bacula/scripts/disk-changer.in
+++ b/bacula/scripts/disk-changer.in
@@ -2,11 +2,38 @@
 #
 # Bacula interface to virtual autoloader using disk storage
 #
+#  Written by Kern Sibbald
+#
+#  Copyright (C) 2000-2007 Free Software Foundation Europe e.V.
+#
+#  The main author of Bacula is Kern Sibbald, with contributions from
+#  many others, a complete list can be found in the file AUTHORS.
+#  This program is Free Software; you can redistribute it and/or
+#  modify it under the terms of version two of the GNU General Public
+#  License as published by the Free Software Foundation, which is 
+#  listed in the file LICENSE.
+#
+#  This program is distributed in the hope that it will be useful, but
+#  WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+#  General Public License for more details.
+#
+#  You should have received a copy of the GNU General Public License
+#  along with this program; if not, write to the Free Software
+#  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+#  02110-1301, USA.
+#
+#  Bacula® is a registered trademark of John Walker.
+#  The licensor of Bacula is the Free Software Foundation Europe
+#  (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich,
+#  Switzerland, email:ftf@fsfeurope.org.
+#
+#
 #  $Id$
 #
 #  If you set in your Device resource
 #
-#  Changer Command = "path-to-this-script/disk-changer" %c %o %S %a %d
+#  Changer Command = "path-to-this-script/disk-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
@@ -64,7 +91,7 @@ wd=@working_dir@
 #
 dbgfile="$wd/disk-changer.log"
 debug() {
-    if test -e $dbgfile; then
+    if test -f $dbgfile; then
        echo "`date +\"%Y%m%d-%H:%M:%S\"` $*" >> $dbgfile
     fi
 }
@@ -107,7 +134,12 @@ check_parm_count() {
 #
 get_dir() {
    bn=`basename $device`
-   dir=`echo "$device" | sed -e s%/$bn%%g -`
+   dir=`echo "$device" | sed -e s%/$bn%%g`
+   if [ ! -d $dir ]; then
+      echo "ERROR: Autochanger directory \"$dir\" does not exist.\n"
+      echo "      You must create it.\n"
+      exit 1
+   fi
 }
 
 
@@ -159,23 +191,39 @@ case $cmd in
    unload)
       debug "Doing disk -f $ctl unload $slot $device $drive"
       get_dir
-      echo "0" >$dir/loaded${drive}
-      unlink $device 2>/dev/null >/dev/null
-      rm -f $device
+      ld=`cat $dir/loaded${drive}`
+      if [ $slot -eq $ld ]; then
+        echo "0" >$dir/loaded${drive}
+        unlink $device 2>/dev/null >/dev/null
+        rm -f $device
+      else
+        echo "Storage Element $slot is Already Full"
+        exit 1
+      fi
       ;;
 
    load)
       debug "Doing disk $ctl load $slot $device $drive"
       get_dir
-      echo "0" >$dir/loaded${drive}
-      unlink $device 2>/dev/null >/dev/null
-      rm -f $device
-      ln -s $dir/slot${slot} $device
-      rtn=$?
-      if [ $rtn -eq 0 ]; then
-        echo $slot >$dir/loaded${drive}
+      if [ -f $dir/loaded${drive} ]; then
+        ld=`cat $dir/loaded${drive}`
+      else
+        ld=0
+      fi
+      if [ $ld -eq 0 ]; then
+        echo "0" >$dir/loaded${drive}
+        unlink $device 2>/dev/null >/dev/null
+        rm -f $device
+        ln -s $dir/slot${slot} $device
+        rtn=$?
+        if [ $rtn -eq 0 ]; then
+           echo $slot >$dir/loaded${drive}
+        fi
+        exit $rtn
+      else
+        echo "Drive ${drive} Full (Storage element ${ld} loaded)"
+        exit 1
       fi
-      exit $rtn
       ;;
 
    list)