methods/tm-image

   1 #!/bin/csh
   2
   3 if (! $?TM_TMP_DIR) then
   4     set TM_TMP_DIR=/tmp
   5 endif
   6
   7 if( $5 == "" ) then
   8         switch ( $2 )
   9         case "image/gif":
  10                 set filename="$TM_TMP_DIR/mime$$.gif"
  11                 breaksw
  12         case "image/jpeg":
  13                 set filename="$TM_TMP_DIR/mime$$.jpg"
  14                 breaksw
  15         case "image/tiff":
  16         case "image/x-tiff":
  17                 set filename="$TM_TMP_DIR/mime$$.tif"
  18                 breaksw
  19         case "image/x-xwd":
  20                 set filename="$TM_TMP_DIR/mime$$.xwd"
  21                 breaksw
  22         case "image/x-xbm":
  23                 set filename="$TM_TMP_DIR/mime$$.xbm"
  24                 breaksw
  25         case "image/x-pic":
  26                 set filename="$TM_TMP_DIR/mime$$.pic"
  27                 breaksw
  28         default:
  29                 set filename="$TM_TMP_DIR/mime$$.img"
  30         endsw
  31 else
  32         set filename = $TM_TMP_DIR/$5
  33 endif
  34
  35 echo "$2; $3 -> $filename"
  36
  37 switch( $3 )
  38 case "7bit":
  39 case "8bit":
  40 case "binary":
  41         /bin/cp $1 $filename
  42         breaksw
  43 case "base64":
  44         decode-b < $1 > $filename
  45         breaksw
  46 case "quoted-printable":
  47         mmencode -u -q $1 > $filename
  48         breaksw
  49 endsw
  50
  51 /bin/rm $1
  52
  53 switch( $4 )
  54 case "play":
  55         xv -geometry +1+1 $filename
  56         /bin/rm $filename
  57         breaksw
  58 case "extract":
  59         echo "extract to $filename"
  60         breaksw
  61 endsw