1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
# mtx completion -*- shell-script -*-
# by Jon Middleton <jjm@ixtab.org.uk>
_mtx()
{
local cur prev words cword
_init_completion || return
local options tapes drives
options="-f nobarcode invert noattach --version inquiry noattach \
inventory status load unload eepos first last next"
tapes=$(mtx status 2>/dev/null |
awk '/Storage Element [0-9]+:Full/ { printf "%s ", $3 }')
tapes=${tapes//:Full/}
drives=$(mtx status 2>/dev/null |
awk '/Data Transfer Element [0-9]+:(Full|Empty)/ { printf "%s ", $4 }')
drives=${drives//:Full/}
drives=${drives//:Empty/}
if ((cword > 1)); then
case $prev in
load)
COMPREPLY=($(compgen -W "$tapes" -- "$cur"))
;;
unload | first | last | next)
COMPREPLY=($(compgen -W "$drives" -- "$cur"))
;;
-f)
true
;;
*)
true
;;
esac
else
COMPREPLY=($(compgen -W "$options" -- "$cur"))
fi
} &&
complete -F _mtx mtx
# ex: filetype=sh
|
