Home | History | Annotate | Line # | Download | only in scripts 
      1 # -*- perl -*-
      2 ##############################################################################
      3 #									     #
      4 #			CONFIGURABLE VALUES				     #
      5 #									     #
      6 ##############################################################################
      7 
      8 $MAILGRUNT="postmaster";	# To whom to send log mail if mail is prefered.
      9 
     10 $TMPDIR="/tmp/";		# Place lostmail can do its dirty work.
     11 
     12 $LOCAL_LOCK_EXT=".lock";	# Name of file local mailer uses to lock
     13 				# spool file.  This the correct setting for
     14 				# /bin/mail
     15 
     16 $SYSTEM_FROM_ADDRESS="Mailer-Daemon";
     17 
     18 $MAILDIR="/var/alt_mail";	# What directory should I run out of.
     19 $MAILER='/usr/lib/sendmail -t'; # Which mailer should I use.
     20 
     21 $LOCALMAILJUNK='.*~|\#.*|core';	# Files name patterns that might appear in 
     22 				# alt_mail and should be ignored. This REGEXP
     23 				# gets or'ed with $MAILJUNK below.
     24 
     25 $SMTPHOST='localhost';		# The name of a local host which speaks SMTP
     26 				# and knows *all* your aliases. You probably
     27 				# don't want to change this.  If the machine
     28 				# running lost_alt mail doesn't run an SMTP,
     29 				# daemon then something is either wrong or you
     30 				# should be setting `noverify' to prevent
     31 				# SMTP verification.
     32 
     33 $HOSTNAME='localhost';		# Hostname to use for SMTP HELO 
     34 
     35 # Subject of lost log mail message. Must define $MAILGRUNT.
     36 # I overwrite this variable in the subroutine Clean_up. Please make sure I
     37 # haven't noodle-headdly forgotten to remove that hack in the distribution!
     38 # No newline here please. The script will insert it for you.
     39 $LOG_SUBJECT="Log of lostmail resends";
     40 
     41 ##############################################################################
     42 #									     #
     43 #			DEFAULTED CONFIGURATIONS			     #
     44 #									     #
     45 ##############################################################################
     46 
     47 $LOGFILE="$TMPDIR" . "lostlog";
     48 
     49 
     50 # MAILJUNK is a pattern of ignorable alt_mail files which are either common
     51 # to most platforms or actually produced by this script.  You should customize
     52 # this REGEXP by hacking at $LOCALMAILJUNK above.
     53 $MAILJUNK='[a-z]\.[0-9]*|\.\.?|lost\+found';
     54 
     55 $LOCKEXT=".lostlock";		# our lock file extension. Should not need to
     56 				# modify
     57 
     58 $MESSAGE_DELIM="^From[^:]";	# /bin/mail message delimiter. Your milage
     59 				# may differ
     60 
     61 $HEADER_BODY_DELIM="\n";	# RFC 822 header-body delimiter.
     62 
     63 $RESENT_TO="Resent-To: ";	# 
     64 $RESENT_FROM="Resent-From: ";	# Resent headers (RFC 822).
     65 $RESENT_DATE="Resent-Date: ";	#  You probably don't want to muck with these.
     66 $RESENT_INFO="X-Resent-Info: ";	# (special one to alert folks about mail).
     67 
     68 
     69 ##############################################################################
     70 #									     #
     71 #			LOSTMAIL DEFINITIONS (DON'T TOUCH)		     #
     72 #									     #
     73 ##############################################################################
     74 
     75 $FALSE=0;
     76 $TRUE=(! $FALSE);
     77 
     78 $OK=$TRUE;
     79 $ABORT_RESEND=2;
     80 $LOCK_RETRIES=10;	# The number of seconds/retries lost mail
     81 				#  should wait before requeing or aborting a
     82 				# resend.
     83 
     84 TRUE;				# Ansures true return from include file.
     85