]> git.sur5r.net Git - bacula/bacula/blob - bacula/examples/autochangers/locking-mtx-changer
Fix scanf of PoolId in catreq to handle 64 bit Ids.
[bacula/bacula] / bacula / examples / autochangers / locking-mtx-changer
1 #!/bin/ksh
2 #
3 # Bacula interface to mtx autoloader
4 #
5 #  $Id$
6 #
7 #  If you set in your Device resource
8 #
9 #  Changer Command = "path-to-this-script/mtx-changer" %c %o %S %a %d
10 #    you will have the following input to this script:
11 #
12 #  mtx-changer "changer-device" "command" "slot" "archive-device" "drive-index"
13 #                  $1              $2       $3        $4               $5
14 #
15 #  for example:
16 #
17 #  mtx-changer /dev/sg0 load 1 /dev/nst0 0 (on a Linux system)
18 #
19 #  If you need to an offline, refer to the drive as $4
20 #    e.g.   mt -f $4 offline
21 #
22 #  Many changers need an offline after the unload. Also many
23 #   changers need a sleep 60 after the mtx load.
24 #
25 #  N.B. If you change the script, take care to return either 
26 #   the mtx exit code or a 0. If the script exits with a non-zero
27 #   exit code, Bacula will assume the request failed.
28 #
29
30 MTX=/lysator/bin/mtx
31 LOCKDIR=/tmp
32
33 if test $# -lt 2 ; then
34   echo "usage: mtx-changer ctl-device command slot archive-device drive"
35   echo "  Insufficient number of arguments arguments given."
36   echo "  Mimimum usage is first two arguments ..."
37   exit 1
38 fi
39
40 # Setup arguments
41 ctl=$1
42 cmd="$2"
43 slot=$3
44 device=$4
45 # If drive not given, default to 0
46 if test $# = 5 ; then
47   drive=$5
48 else
49   drive=0
50 fi
51
52 wait_for_drive() {
53     while ! mt -f $1 status >/dev/null 2>/dev/null; do
54 #       echo "Device $1 - not ready, retrying..."
55         sleep 5
56     done
57 }
58
59 LOCKFILE="${LOCKDIR}/mtx-changer:`echo $ctl | tr / _'"
60
61 changer_lock() {
62     echo "$$" >$LOCKFILE.$$
63     
64     while ! ln -n $LOCKFILE.$$ $LOCKFILE 2>/dev/null; do
65        echo "$0: changer lock busy, retrying in 30 seconds..."
66        sleep 30
67     done
68
69     rm $LOCKFILE.$$
70 }
71
72 changer_unlock() {
73     LOCKPID="`cat $LOCKFILE 2>/dev/null`"
74     if [ "$LOCKPID" != $$ ]; then
75         echo "$0: Invalid lock file (${LOCKFILE}) - not owned by us!"
76         exit 1
77     fi
78     rm -f $LOCKFILE
79 }
80
81
82
83 #
84 # Check for special cases where only 2 arguments are needed, 
85 #  all others are a minimum of 3
86 case $cmd in
87    loaded)
88      ;;
89    unload)
90      ;;
91    list)
92      ;;
93    slots)
94      ;;
95    *)
96      if test $# -lt 3; then
97         echo "usage: mtx-changer ctl-device command slot archive-device drive"
98         echo "  Insufficient number of arguments arguments given."
99         echo "  Mimimum usage is first three arguments ..."
100         exit 1
101      fi
102      ;;
103 esac
104
105 changer_lock $ctl
106
107 case $cmd in 
108    unload)
109 #     echo "Doing mtx -f $ctl unload $slot $drive"
110 #
111 # enable the following line if you need to eject the cartridge
112       mt -f $device offline
113       if test x$slot = x; then
114          ${MTX} -f $ctl unload
115          rtn=$?
116       else
117          ${MTX} -f $ctl unload $slot $drive
118          rtn=$?
119       fi
120       ;;
121
122    load)
123 #     echo "Doing mtx -f $ctl load $slot $drive"
124       ${MTX} -f $ctl load $slot $drive
125       rtn=$?
126
127       wait_for_drive $device
128       changer_unlock $ctl
129       exit $rtn
130       ;;
131
132    list) 
133 #     echo "Requested list"
134       ${MTX} -f $ctl status | tr ':=' '  ' | nawk '($1 == "Storage" && $2 == "Element" && $4 == "Full") { printf "%s:%s\n", $3, $6 }'
135       rtn=$?
136       ;;
137
138    loaded)
139       ${MTX} -f $ctl status >/tmp/mtx.$$
140       rtn=$?
141       cat /tmp/mtx.$$ | grep "^Data Transfer Element $drive:Full" | awk "{print \$7}"
142       cat /tmp/mtx.$$ | grep "^Data Transfer Element $drive:Empty" | awk "{print 0}"
143       rm -f /tmp/mtx.$$
144       changer_unlock $ctl
145       exit $rtn
146       ;;
147
148    slots)
149 #     echo "Request slots"
150       ${MTX} -f $ctl status | grep " *Storage Changer" | awk "{print \$5}"
151       rtn=$?
152       ;;
153 esac
154
155 changer_unlock $ctl
156 exit $rtn