tm 5.16
[elisp/tm.git] / methods / tm-file
1 #!/bin/csh
2
3 if (! $?TM_TMP_DIR) then
4     set TM_TMP_DIR=/tmp
5 endif
6
7 if( $5 == "" ) then
8         set filename="$TM_TMP_DIR/mime$$"
9 else
10         set filename = $TM_TMP_DIR/$5
11 endif
12
13 echo "$2; $3 -> $filename"
14
15 switch ( $3 )
16 case "7bit":
17 case "8bit":
18 case "binary":
19         /bin/cp $1 $filename
20         breaksw
21 case "base64":
22         decode-b < $1 > $filename
23         breaksw
24 case "quoted-printable":
25         mmencode -q -u $1 > $filename
26         breaksw
27 case "x-uue":
28         pushd $TM_TMP_DIR
29         uudecode $1
30         popd
31         breaksw
32 default:
33         echo "unknown encoding"
34         exit -1
35 endsw
36
37 /bin/rm $1
38 echo "$1 was removed."