home *** CD-ROM | disk | FTP | other *** search
/ SGI Desktop Special Edition 1.1 / SGI Desktop Special Edition 1.1.iso / dist / mmail.idb / usr / lib / Zmail / bin / check-partials.z / check-partials
Encoding:
Text File  |  1995-11-13  |  749 b   |  21 lines
  1. #!/bin/sh -ep
  2.  
  3. parts="`ls -dt \"$1\"/* | egrep '/[0-9]+$'`"
  4.  
  5. stale="`find $parts -mtime +2 -print`"
  6.  
  7. if [ -n "$stale" ]; then
  8.   oldest="`echo \"$parts\" | head -1`"
  9.   date="`ls -l \"$oldest\" | awk '{ print $6, $7, $8 }'`"
  10.   from="`sed -n '1,/^$/s/^From:[     ]*//p' \"$oldest\" | head -1`"
  11.   if [ -z "$from" ]; then from=someone; fi
  12.   
  13.   fmt <<EOF
  14. A very large message from $from started to arrive on $date.  All pieces have still not arrived.
  15.  
  16. Ask the sender to resend pieces that may have "bounced" back to them.  If the message still does not arrive, remove the peices that have arrived and ask the sender to resend the message.
  17.  
  18. Pieces are located in $1. These pieces will continue to occupy space on your hard disk until you delete them. 
  19. EOF
  20. fi
  21.