iankelling.org Git - distro-setup/blob - subdir_files/sieve/liststest.sieve

   1 require [ "regex", "variables", "fileinto", "envelope", "mailbox", "imap4flags", "include" ];
   2
   3 if anyof (
   4   address :regex "to" "^testignore@"
   5   ) {
   6   fileinto :create "l/testignore";
   7   stop;
   8 }
   9
  10
  11 if anyof (
  12   header :contains "list-id" "<debian-security-announce.lists.debian.org>",
  13   header :contains "list-id" "<ubuntu-security-announce.lists.ubuntu.com>"
  14   ) {
  15   fileinto :create "sec";
  16   stop;
  17 }
  18 if anyof (
  19   header :regex "list-id" "forum.members.fsf.org>"
  20   ) {
  21   fileinto :create "fsfmembers";
  22   stop;
  23 }
  24
  25 if anyof (
  26   header :contains "list-id" "<mentors.lists.outreachy.org>"
  27   ) {
  28   fileinto :create "l/outreachy-mentors";
  29   stop;
  30 }
  31
  32
  33 if anyof (
  34   header :contains "list-id" "<users.spamassassin.apache.org>"
  35   ) {
  36   fileinto :create "l/spamassassin";
  37   stop;
  38 }
  39
  40
  41 if anyof (
  42   header :contains "list-id" "<bbdb-info.lists.sourceforge.net>",
  43   header :contains "list-id" "<bug-bash.gnu.org>",
  44   header :contains "list-id" "<h-source-users.nongnu.org>",
  45   header :contains "list-id" "<bug-gnu-emacs.gnu.org>",
  46   header :contains "list-id" "<debian-backports.lists.debian.org>",
  47   header :contains "list-id" "<debian-security-announce.lists.debian.org>",
  48   header :contains "list-id" "<debian-user.lists.debian.org>",
  49   header :contains "list-id" "<debian-devel.lists.debian.org>",
  50   header :contains "list-id" "<ding.gnus.org>",
  51   header :contains "list-id" "<emacs-devel.gnu.org>",
  52   header :contains "list-id" "<emacs-orgmode.gnu.org>",
  53   header :contains "list-id" "<git.vger.kernel.org>",
  54   header :contains "list-id" "<fail2ban-users.lists.sourceforge.net>",
  55   header :contains "list-id" "<help-bash.gnu.org>",
  56   header :contains "list-id" "<help-gnu-emacs.gnu.org>",
  57   header :contains "list-id" "<hyperkitty-devel.lists.fedorahosted.org>",
  58   header :contains "list-id" "<ipxe-devel.lists.ipxe.org>",
  59   header :contains "list-id" "<kplug-list.kernel-panic.org>",
  60   header :contains "list-id" "<kplug-newbie.kernel-panic.org>",
  61   header :contains "list-id" "<libreplanet-discuss.libreplanet.org>",
  62   header :contains "list-id" "<linux-btrfs.vger.kernel.org>",
  63   header :contains "list-id" "<linux-fai.uni-koeln.de>",
  64   header :contains "list-id" "<license-discuss.lists.opensource.org>",
  65   header :contains "list-id" "<seagl_organize.googlegroups.com>",
  66   header :contains "list-id" "<linux-fai-devel.uni-koeln.de>",
  67   header :contains "list-id" "<linux-libre.fsfla.org>",
  68   header :contains "list-id" "<maru-os-dev.googlegroups.com>",
  69   header :contains "list-id" "<mediawiki-l.lists.wikimedia.org>",
  70   header :contains "list-id" "<pywikibot.lists.wikimedia.org>",
  71   header :contains "list-id" "<pywikipedia-l.lists.wikimedia.org>",
  72   header :contains "list-id" "<unison-hackers.lists.seas.upenn.edu>",
  73   header :contains "list-id" "<unison-users.yahoogroups.com>",
  74   header :contains "list-id" "<whispersystems.lists.riseup.net>",
  75   header :contains "list-id" "<wikitech-l.lists.wikimedia.org>",
  76   header :contains "list-id" "<xapian-devel.lists.xapian.org>",
  77   header :contains "list-id" "<kdeconnect.kde.org>",
  78   header :contains "list-id" "<mu-discuss.googlegroups.com>",
  79   header :contains "list-id" "<devel.mediagoblin.org>",
  80   header :contains "list-id" "<maru-os.googlegroups.com>",
  81   header :contains "list-id" "<listhelper-moderate.nongnu.org>",
  82   header :contains "list-id" "<coreboot.coreboot.org>",
  83   header :contains "list-id" "<mailman-users.python.org>",
  84   header :contains "list-id" "<duplicity-talk.nongnu.org>",
  85   header :contains "list-id" "<qemu-devel.nongnu.org>",
  86   header :contains "list-id" "<exim-dev.exim.org>",
  87   header :contains "list-id" "<exim-users.exim.org>",
  88 # may 2023 exim list ids changed
  89   header :contains "list-id" "<exim-dev.lists.exim.org>",
  90   header :contains "list-id" "<exim-users.lists.exim.org>",
  91   header :contains "list-id" "<octave-maintainers.gnu.org>",
  92   header :contains "list-id" "<discuss-gnuradio.gnu.org>",
  93   header :contains "list-id" "<seabios.seabios.org>",
  94   header :contains "list-id" "<freetype-devel.nongnu.org>",
  95   header :contains "list-id" "<mailman-developers.python.org>",
  96   header :contains "list-id" "<emacs-erc.gnu.org>",
  97   header :contains "list-id" "<linux-raid.vger.kernel.org>",
  98   header :contains "list-id" "<mailop.mailop.org>",
  99   header :contains "list-id" "<gcc.gcc.gnu.org>",
 100   header :contains "list-id" "<lilypond-devel.gnu.org>",
 101   header :contains "list-id" "<xmonad.haskell.org>") {
 102   if header :regex "list-id" "<([a-z_0-9-]+)[.@]" {
 103     set :lower "listname" "${1}";
 104     fileinto :create "l/${listname}";
 105     stop;
 106   }
 107 }
 108 if anyof (
 109   header :contains "list-id" "<websites.lists.fedoraproject.org>",
 110   header :contains "list-id" "<docs.lists.fedoraproject.org>",
 111   header :contains "list-id" "<users.lists.fedoraproject.org>") {
 112   if header :regex "list-id" "<([a-z_0-9-]+)[.@]" {
 113     set :lower "listname" "${1}";
 114     fileinto :create "l/fedora.${listname}";
 115     stop;
 116   }
 117 }
 118
 119
 120 if anyof (
 121   header :contains "list-id" "<license-review.lists.opensource.org>"
 122   ) {
 123   fileinto :create "l/license-discuss";
 124   stop;
 125 }
 126
 127 if anyof (
 128   header :contains "list-id" "<site-comments.w3.org>"
 129   ) {
 130   fileinto :create "l/w3c-site-comments";
 131   stop;
 132 }
 133
 134
 135
 136 if anyof (
 137   header :contains "list-id" "<~sircmpwn/sr.ht-discuss.lists.sr.ht>"
 138   ) {
 139   fileinto :create "l/sr.ht-discuss";
 140   stop;
 141 }
 142 if anyof (
 143   header :contains "list-id" "<lt.lists.liberationtech.org>"
 144   ) {
 145   fileinto :create "l/liberationtech";
 146   stop;
 147 }
 148
 149
 150 if anyof (
 151   header :contains "list-id" "<ln.lists.fsfe.org>",
 152 #  header :contains "list-id" "<gnu-prog-discuss.gnu.org>",
 153 #  header :contains "list-id" "<gnu-prog.gnu.org>",
 154   header :contains "list-id" "<www-discuss.gnu.org>",
 155   header :contains "list-id" "<gnu-community-private.gnu.org>",
 156   header :contains "list-id" "<gvc.gnu.org>",
 157   header :contains "list-id" "<Spdx-tech.lists.spdx.org>",
 158   header :contains "list-id" "<gnu-misc-discuss.gnu.org>",
 159   header :contains "list-id" "<Spdx-legal.lists.spdx.org>",
 160   header :contains "list-id" "<info-gnu.gnu.org>",
 161   header :contains "list-id" "<gnu-system-discuss.gnu.org>",
 162   header :contains "list-id" "<discuss.lists.blu.org>",
 163   header :contains "list-id" "<announce.lists.blu.org>",
 164   header :contains "list-id" "<spdx.lists.spdx.org>"
 165   ) {
 166   fileinto :create "community";
 167   stop;
 168 }
 169
 170 if anyof (
 171   header :contains "list-id" "<gnhlug-discuss@mail.gnhlug.org>",
 172   header :contains "list-id" "<discussion.lists.fsfe.org>",
 173   header :contains "list-id" "<activists_masspirates.org.lists.mayfirst.org>",
 174   header :contains "list-id" "<discuss.blu.org>",
 175   header :contains "list-id" "<spdx.lists.spdx.org>"
 176   ) {
 177   fileinto :create "2community";
 178   stop;
 179 }
 180
 181
 182 if allof (
 183   address :is "from" "mailman-owner@zope.org",
 184   header :is "subject" "zope.org mailing list memberships reminder"
 185   ) {
 186   discard;
 187   stop;
 188 }