|
4
|
1 #!/bin/sh -
|
|
|
2 #
|
|
82
|
3 # $Id: tm-au,v 1.4 1997/01/23 05:29:22 steve Exp $
|
|
4
|
4 #
|
|
14
|
5
|
|
80
|
6 PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH
|
|
|
7
|
|
4
|
8 if [ "$TM_TMP_DIR" = "" ]; then
|
|
|
9 TM_TMP_DIR=/tmp
|
|
|
10 export TM_TMP_DIR
|
|
|
11 fi
|
|
|
12
|
|
|
13 if [ "$5" = "" ]; then
|
|
|
14 filename="$TM_TMP_DIR/mime$$.au"
|
|
|
15 else
|
|
|
16 filename="$TM_TMP_DIR/$5"
|
|
|
17 fi
|
|
|
18
|
|
|
19
|
|
|
20 case "$4" in
|
|
|
21 "play")
|
|
|
22 echo "$2; $3 ->"
|
|
76
|
23 tmdecode $3 $1 $filename
|
|
4
|
24 if [ "$AUDIOSERVER" = "" ]; then
|
|
82
|
25 case "`uname`" in
|
|
|
26 IRIX ) sfplay $filename ;;
|
|
|
27 OSF1 ) decsound -play $filename ;;
|
|
|
28 * ) cat $filename > /dev/audio ;;
|
|
|
29 esac
|
|
4
|
30 else
|
|
82
|
31 autool -v 40 $filename
|
|
4
|
32 fi
|
|
82
|
33
|
|
76
|
34 trap 'rm -f $filename' 0 1 2 3 13 15
|
|
4
|
35 ;;
|
|
|
36 "extract")
|
|
|
37 echo "$2; $3 -> $filename"
|
|
|
38 echo "extract to $filename"
|
|
|
39 tmdecode $3 $1 $filename
|
|
|
40 ;;
|
|
|
41 esac
|
