|
4
|
1 #!/bin/sh -
|
|
|
2 #
|
|
80
|
3 # $Id: tm-au,v 1.3 1997/01/11 20:13:51 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
|
|
70
|
25 if [ `uname` = "IRIX" ]; then
|
|
|
26 sfplay $filename
|
|
|
27 else
|
|
76
|
28 cat $filename > /dev/audio
|
|
70
|
29 fi
|
|
4
|
30 else
|
|
70
|
31 autool -v 40 $filename
|
|
4
|
32 fi
|
|
76
|
33 trap 'rm -f $filename' 0 1 2 3 13 15
|
|
4
|
34 ;;
|
|
|
35 "extract")
|
|
|
36 echo "$2; $3 -> $filename"
|
|
|
37 echo "extract to $filename"
|
|
|
38 tmdecode $3 $1 $filename
|
|
|
39 ;;
|
|
|
40 esac
|
