methods/csh/tm-au

   1 #!/bin/csh -f
   2
   3 if (! $?TM_TMP_DIR) then
   4     setenv TM_TMP_DIR /tmp
   5 endif
   6
   7 switch( $4 )
   8 case "play":
   9         set filename = /dev/audio
  10         breaksw
  11 case "extract":
  12         if( $5 == "" ) then
  13                 set filename = "$TM_TMP_DIR/mime$$.au"
  14         else
  15                 set filename = "$TM_TMP_DIR/$5"
  16         endif
  17         breaksw
  18 default:
  19         exit -1
  20 endsw
  21
  22 echo "$2; $3 -> $filename"
  23
  24 tmdecode $3 $1 $filename