#
# This file configures how procmail handles my mail.  I want to have
# mail to certain lists set aside for later perusal, and also want
# certain operations done on particular messages.
#
# .procmailrc,v 1.57 2002/05/20
#


# Initialize some variables to make my life a little easier

PATH=$HOME/bin:/local/bin:/usr/bin
SHELL=/bin/sh
MAILDIR=$HOME/Mail/.incoming

# Try to catch some spam
:0fw
| /pkgs/perl/bin/spamassassin -P

:0:
* ^X-Spam-Status: Yes
junk-mail.spool

# Sometimes I get multiple copies of the same message (since I'm on a
# couple of different mailing lists that cover the same topic).  This
# should filter out message so that I only get one copy of each unique
# message ID.  Thanks go to the various security lists I'm on for
# forcing me to do this.

:0 Wh: msgid.lock
| formail -D 8192 msgid.cache


# Put mail to mailing lists into a file so that Gnus knows what to do
# with them.  I leave the details of extracting and removing them to
# Gnus.  For high volume, somewhat low content, lists this seems to
# work well.
#
# There really should be a better way to do this, as I seem to be
# doing the same thing for n different lists.  Maybe I'll someday find
# a way to ``loop-ify'' this.

:0
* ^Sender: xemacs.*admin@xemacs\.org
{
	:0:
	* ^TO(xemacs-(beta|announce|design))|(xemacs.org)
	xemacs-beta.spool

	:0fhw
	| formail -A"X-Diagnostic: spam via xemacs-beta list bcc"

	:0:
	junk-mail.spool
}

:0:
* ^TOrt-users
rt-users.spool

:0:
* ^TOrt-devel
rt-devel.spool

:0
* ^TOpurdue-sports
{
	# annoying in general
	:0:
	* ^From.*ccmwsw@evansville\.net
	/dev/null

	# posting GBI web stuff and removing copyright and use notice
#	:0:
#	* ^From.*shenry@TCON\.NET
#	/dev/null

	:0:
	purdue-sports.spool
}

:0
* ^Resent-Sender: procmail-request@informatik\.rwth-aachen\.de
{
	:0:
	* ^TOprocmail@informatik\.rwth-aachen\.de
	procmail.spool

	:0fhw
	| formail -A"X-Diagnostic: spam via procmail list bcc"

	:0:
	junk-mail.spool
}

:0
* ^Sender: sunmanagers-admin@sunmanagers\.org
{
	:0:
	* ^TOsunmanagers
	sun-managers.spool

	:0fhw
	| formail -A"X-Diagnostic: spam via sunmanagers list bcc"

	:0:
	junk-mail.spool
}

:0
* ^Sender: owner-amanda-hackers@amanda\.org
{
	:0:
	* ^TOamanda-hackers@(amanda\.org|cs\.umd\.edu)
	amanda-hackers.spool

	:0fhw
	| formail -A"X-Diagnostic: spam via amanda-hackers list bcc"

	:0:
	junk-mail.spool
}

:0
* ^Sender: owner-amanda-users@amanda\.org
{
	:0:
	* ^TOamanda-(users|user)@(amanda\.org|cs\.umd\.edu)
	amanda-users.spool

	:0fhw
	| formail -A"X-Diagnostic: spam via amanda-users list bcc"

	:0:
	junk-mail.spool
}

:0
* ^Sender: owner-ding@hpc\.uh\.edu
{
	:0:
	* ^TOding@(gnus\.org|ifi\.uio\.no)
	ding.spool

	:0fhw
	| formail -A"X-Diagnostic: spam via ding list bcc"

	:0:
	junk-mail.spool
}

:0
* ^Sender: gs-devel-admin@ghostscript\.com
{
	:0:
	* ^TOgs-devel
	gs-devel.spool

	:0fhw
	| formail -A"X-Diagnostic: spam via gs-devel list bcc"

	:0:
	junk-mail.spool
}

:0:
* ^TObugtraq
bugtraq.spool

:0:
* ^Sender: (owner-amd-workers|amd-dev-owner|amd-dev-admin)
amd-dev.spool

:0:
* ^TOreqng-developers
reqng-devel.spool


# Beginnings of a spam filter.  Currently, most of my spam mail comes
# via the procmail mailing list.  If they weren't sent to my procmail
# folder then the To: line is bogus and I don't want this.
:0
* ^Resent-From: procmail@informatik.rwth-aachen.de
/dev/null

:0 B						# I hate Bull's Eye Gold
* ^EMAIL MARKETING WORKS!!
/dev/null

# Everything else gets saved into an archive, in case I need something
# I delete.

:0 c:
${HOME}/Mail/Archive/`date +%Y-%m`


# Uncomment this when I'm on vacation.

# :0 Whc: vacation.lock
# * $^To:.*\<$\LOGNAME\>
# * !^FROM_DAEMON
# * !^X-Loop: $LOGNAME@math.purdue.edu
# * !^X-RT-Loop-Prevention: PURDUE_MATH
# | formail -rD 8192 ${HOME}/.vacation.cache

#  :0 ehc:
#  | (formail -rA"Precedence: junk" \
#       -A"X-Loop: ${LOGNAME}@math.purdue.edu" ; \
#     cat ${HOME}/.vacation.msg ; \
#    ) | $SENDMAIL -oi -t


# Anything that doesn't match the above gets delivered into the
# inbox folder for Gnus to find.

:0:
inbox.spool


# Junk to make Emacs handle the file in a prettier way.  Font-lock
# keywords are from a package by Jari Aalto <jari.aalto@poboxes.com>.
#
# Local Variables:
# mode: text
# comment-start: "# "
# eval: (setq font-lock-keywords (list '("#.*" . font-lock-comment-face) '("^[\t ]*\\(:.*\\)#?" 1 font-lock-type-face) '("\\([A-Z_]+\\)[\t ]*=" 1 font-lock-keyword-face) '("\\$\\([A-Z_]+\\)}?[\t ]*$" 1 font-lock-keyword-face) '("^\\*.*" . font-lock-doc-string-face) '("\\(test\\|formail\\|sendmail\\)\\>" 1 font-lock-reference-face)))
# End: