;;; -*-Emacs-Lisp-*- 
;;; filtre.gnus - NBC



(setq 
 nnmail-split-fancy
 '(|
   
   ;; Tous les spams vont être silencieusement effacés.
   
   ("^X" ".*Cyber-bomber"                      junk)
   ("^X" ".*cyber-broadcasting.com"            junk)
   ("^X" ".*cyberpromo"                        junk)
   ("^X" ".*readme.com"                        junk)
   ("^X-1" ".*CYBER-TIZE EMAIL"                junk)
   ("^X-2" ".*www.cybertize-email"             junk)
   ("^X-Mailer" ".*CGI-MAIL"                   junk)
   ("^X-Mailer" ".*Extractor"                  junk)
   ("^X-Mailer" ".*Floodgate"                  junk)
   ("^X-Mailer" ".*MassE-Mail"                 junk)
   ("^X-Mailer" ".*Ready Aim"                  junk)
   ("^X-Sender" ".*CGI-MAIL"                   junk)
   ("^X-Sender" ".*Extractor"                  junk)
   ("^X-Sender" ".*Floodgate"                  junk)
   ("^X-Sender" ".*MassE-Mail"                 junk)
   ("^X-Sender" ".*Ready Aim"                  junk)
   ("^X-advertisement" ".*www.iemmc.org"       junk)
   ("from" ".*Emerald@earthstar.com"           junk)
   ("from" ".*Mailorder2@century3d.com"        junk)
   ("from" ".*alan@senora.demon.co.uk"         junk)
   ("from" ".*awug@awug11.net"                 junk)
   ("from" ".*cyber-broadcasting.com"          junk)
   ("from" ".*cyberpromo.com"                  junk)
   ("from" ".*fread@tmnews.com"                junk)
   ("from" ".*mystic@eskimo.com"               junk)
   ("from" ".*ohtl@pc.jaring.my"               junk)
   ("from" ".*ots@infinet.net.au"              junk)
   ("from" ".*real-health@nevwest.com"         junk)
   ("from" ".*rocket77@one.net"                junk)
   ("from" ".*seacu@clarie.com"                junk)
   ("from" ".*telysis.com"                     junk)
   ("from" ".*vtech@power-agents.com"          junk)
   ("from" "15853209@compuserve.com"           junk)
   ("from" "Disgruntled Postal Worker"         junk)
   ("from" "Freedom@bigbucks.com"              junk)
   ("from" "ProtoView@btinternet.com"          junk)
   ("from" "RDenter@hotmail.com"               junk)
   ("from" "ballman@t-1net.com"                junk)
   ("from" "baltika@mail.arcus.lv"             junk)
   ("from" "cypcomm@rocketmail.com"            junk)
   ("from" "derek@samalama.com"                junk)
   ("from" "dlamie@expresslogic.com"           junk)
   ("from" "edward@infinex.com"                junk)
   ("from" "msf2@msf.com"                      junk)
   ("from" "myownemail.com"                    junk)
   ("from" "nobody@nowhere.com"                junk)
   ("from" "poy@netitalia.it"                  junk)
   ("from" "root@root-servers.net"             junk)
   ("from" "sales@number18.tierranet.com"      junk)
   ("from" "vension@jumpoint.com"              junk)
   ("from" "videogirl@force1.net"              junk)
   ("received" ".*CLOAKED"                     junk)
   ("received" ".*bulk_mailer"                 junk)
   ("received" ".*cybermirror"                 junk)
   ("reply-to" "*postmaster@[153.34.67.199]"   junk)
   ("reply-to" ".*vadim@ndim.com"              junk)
   ("subject" ".*call.*800"                    junk)
   ("to"   "john@444the.com"                   junk)
   ("to"   "nobody@nowhere.com"                junk)
   ("to" ".*Friends@onthe.net"                 junk)
   ("to" ".*List@italy.it.earthlink.net"       junk)
   ("to" ".*friend.com"                        junk)
   ("to" ".*fukers@italy.it.earthlink.net"     junk)
   ("to" ".*institut@physiologie.uni-kiel.de"  junk)
   ("to" ".*of@italy.it.earthlink.net"         junk)
   ("to" ".*public.com"                        junk)
   ("to" ".*somewhere.com"                     junk)
   ("to" ".*undisclosed-recipients"            junk)
   ("from" "lisa@hotmail.com"                  junk)
   ("from" "*mailexcite.com"                   junk)
   
   ;; les listes de discussion :
   ;; 'list' est défini dans le .gnus
   (list   "bb@bb4.com"                     "mail.bb")
   (list   ".*postfix.org"                  "mail.postfix")

   ;; mail venant d'une personne ayant sa mailbox
   
   ("from" ".*seignol"                      "mail.jeff")
   ("from" ".*flegras"                      "mail.fred")
   
   ;; mail partant pour une personne ayant sa mailbox
   ;; les from sont AVANT les to

   ("to" ".*seignol"                        "mail.jeff")
   ("to" ".*flegras"                        "mail.fred")

   ;; il faut qu'il y ait au moins un "to" ou un "cc" vers moi
   (dest ".*chuche"                         "mail.perso")

   ;; ---- Tout ce qui est en-dessous est certainement du spam ---- 
   ;; on doit pouvoir les envoyer dans junk comme ceux qu'il y a au début, 
   ;; mais je suis assez conservateur, donc je garde au cas ou.
   ;; cette partie va entre autre prendre les mails ou je ne suis qu'en bcc.
   ("^Comments" ".*Authenticated sender" (|
					  ("^X-Mailer" ".*Pegasus Mail" "mail.delete")
					  ("^Resent-To" ".*" "mail.delete")
					  "mail.delete" ; wrong Pegasus header!
					  ))

   ;; La, c'est vraiment du spam... sauf mailings listes récalcitrantes
   "mail.delete" )
)