# junkfilter # a junk e-mail filter system for procmail # Copyright 1997-98, Gregory Sutter # # $Id: junkfilter.bodychk,v 2.4 1998/10/16 16:58:39 gsutter Exp $ # # Please read the file "junkfilter.readme" and the page # http://www.pobox.com/~gsutter/junkfilter/ before using # junkfilter. junkfilter is copyright 1997-98 Gregory # Sutter and is licensed under the terms of the GNU # General Public License, version 2. See the file # junkfilter.readme for details. # Is there a listed phrase in the body of the message? JFSEC="bodychk" JFBMAIL="(mail|e-? ?mail|message|messaging|e-? ?mailing|mailing|information|info)s?" JFBVIA="(against|through|to|using|with|via)" JFBPOSS="(a|all|any|future|my|our|the|this)" JFBADJ="(best|(bigg?|hott?|low|new)(est)?)" JFBAPOL="(please )?(pardon|excuse|app?ologize( for)?|sorry( for| about)?)" JFBCARD="(Visa|Mastercard|Mastercharge|M/C|MC|AMEX|American Express|Discover)" JFBRM="['\" ]*(remov(e|al|ed))['\" ]*" JFBRLIST="((global|universal) )?$JFBRM list" JFBREMV="((to|to be|for) $JFBRM" JFBYOU="you( have|ve|'ve)?" JFBNUM="((\+?1)?[-( ]?[0-9][0-9][0-9][-) ]?[0-9][0-9][0-9][- ]?[0-9][0-9][0-9][0-9])" JFBODYCHK=(`cat $JFDIR/jf-bodychk`) :0HB * $ ${JFBODYCHK:-$JFNOMATCH} * < 60000 { :0B * $ ()\/($JFBODYCHK) { JFMATCH="$JFSEC: $MATCH" INCLUDERC=$JFDIR/junkfilter.match } } :0 * $ $JF_BODYCHK_USER^0 { JFUSERBODYCHK=(`cat $JF_BODYCHK_USER_LOC`) :0HB * $ ${JFUSERBODYCHK:-$JFNOMATCH} * < 60000 { :0B * $ ()\/($JFUSERBODYCHK) { JFMATCH="${JFSEC}-User: $MATCH" INCLUDERC=$JFDIR/junkfilter.match } } JFUSERBODYCHK } JFBODYCHK JFSEC # EOF junkfilter.bodychk