1 files changed, 167 insertions, 0 deletions

diff --git a/mailman/pipeline/moderate.py b/mailman/pipeline/moderate.py
new file mode 100644
index 000000000..d6830df6c
--- /dev/null
+++ b/mailman/pipeline/moderate.py
@@ -0,0 +1,167 @@
+# Copyright (C) 2001-2008 by the Free Software Foundation, Inc.
+#
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License
+# as published by the Free Software Foundation; either version 2
+# of the License, or (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
+# USA.
+
+"""Posting moderation filter."""
+
+import re
+
+from email.MIMEMessage import MIMEMessage
+from email.MIMEText import MIMEText
+
+from mailman import Errors
+from mailman import Message
+from mailman import Utils
+from mailman.configuration import config
+from mailman.i18n import _
+
+
+
+## class ModeratedMemberPost(Hold.ModeratedPost):
+##     # BAW: I wanted to use the reason below to differentiate between this
+##     # situation and normal ModeratedPost reasons.  Greg Ward and Stonewall
+##     # Ballard thought the language was too harsh and mentioned offense taken
+##     # by some list members.  I'd still like this class's reason to be
+##     # different than the base class's reason, but we'll use this until someone
+##     # can come up with something more clever but inoffensive.
+##     #
+##     # reason = _('Posts by member are currently quarantined for moderation')
+##     pass
+
+
+
+def process(mlist, msg, msgdata):
+    if msgdata.get('approved') or msgdata.get('fromusenet'):
+        return
+    # First of all, is the poster a member or not?
+    for sender in msg.get_senders():
+        if mlist.isMember(sender):
+            break
+    else:
+        sender = None
+    if sender:
+        # If the member's moderation flag is on, then perform the moderation
+        # action.
+        if mlist.getMemberOption(sender, config.Moderate):
+            # Note that for member_moderation_action, 0==Hold, 1=Reject,
+            # 2==Discard
+            if mlist.member_moderation_action == 0:
+                # Hold.  BAW: WIBNI we could add the member_moderation_notice
+                # to the notice sent back to the sender?
+                msgdata['sender'] = sender
+                Hold.hold_for_approval(mlist, msg, msgdata,
+                                       ModeratedMemberPost)
+            elif mlist.member_moderation_action == 1:
+                # Reject
+                text = mlist.member_moderation_notice
+                if text:
+                    text = Utils.wrap(text)
+                else:
+                    # Use the default RejectMessage notice string
+                    text = None
+                raise Errors.RejectMessage, text
+            elif mlist.member_moderation_action == 2:
+                # Discard.  BAW: Again, it would be nice if we could send a
+                # discard notice to the sender
+                raise Errors.DiscardMessage
+            else:
+                assert 0, 'bad member_moderation_action'
+        # Should we do anything explict to mark this message as getting past
+        # this point?  No, because further pipeline handlers will need to do
+        # their own thing.
+        return
+    else:
+        sender = msg.get_sender()
+    # From here on out, we're dealing with non-members.
+    if matches_p(sender, mlist.accept_these_nonmembers):
+        return
+    if matches_p(sender, mlist.hold_these_nonmembers):
+        Hold.hold_for_approval(mlist, msg, msgdata, Hold.NonMemberPost)
+        # No return
+    if matches_p(sender, mlist.reject_these_nonmembers):
+        do_reject(mlist)
+        # No return
+    if matches_p(sender, mlist.discard_these_nonmembers):
+        do_discard(mlist, msg)
+        # No return
+    # Okay, so the sender wasn't specified explicitly by any of the non-member
+    # moderation configuration variables.  Handle by way of generic non-member
+    # action.
+    assert 0 <= mlist.generic_nonmember_action <= 4
+    if mlist.generic_nonmember_action == 0:
+        # Accept
+        return
+    elif mlist.generic_nonmember_action == 1:
+        Hold.hold_for_approval(mlist, msg, msgdata, Hold.NonMemberPost)
+    elif mlist.generic_nonmember_action == 2:
+        do_reject(mlist)
+    elif mlist.generic_nonmember_action == 3:
+        do_discard(mlist, msg)
+
+
+
+def matches_p(sender, nonmembers):
+    # First strip out all the regular expressions
+    plainaddrs = [addr for addr in nonmembers if not addr.startswith('^')]
+    addrdict = Utils.List2Dict(plainaddrs, foldcase=1)
+    if addrdict.has_key(sender):
+        return 1
+    # Now do the regular expression matches
+    for are in nonmembers:
+        if are.startswith('^'):
+            try:
+                cre = re.compile(are, re.IGNORECASE)
+            except re.error:
+                continue
+            if cre.search(sender):
+                return 1
+    return 0
+
+
+
+def do_reject(mlist):
+    listowner = mlist.GetOwnerEmail()
+    if mlist.nonmember_rejection_notice:
+        raise Errors.RejectMessage, \
+              Utils.wrap(_(mlist.nonmember_rejection_notice))
+    else:
+        raise Errors.RejectMessage, Utils.wrap(_("""\
+You are not allowed to post to this mailing list, and your message has been
+automatically rejected.  If you think that your messages are being rejected in
+error, contact the mailing list owner at %(listowner)s."""))
+
+
+
+def do_discard(mlist, msg):
+    sender = msg.get_sender()
+    # Do we forward auto-discards to the list owners?
+    if mlist.forward_auto_discards:
+        lang = mlist.preferred_language
+        varhelp = '%s/?VARHELP=privacy/sender/discard_these_nonmembers' % \
+                  mlist.GetScriptURL('admin', absolute=1)
+        nmsg = Message.UserNotification(mlist.GetOwnerEmail(),
+                                        mlist.GetBouncesEmail(),
+                                        _('Auto-discard notification'),
+                                        lang=lang)
+        nmsg.set_type('multipart/mixed')
+        text = MIMEText(Utils.wrap(_(
+            'The attached message has been automatically discarded.')),
+                        _charset=Utils.GetCharSet(lang))
+        nmsg.attach(text)
+        nmsg.attach(MIMEMessage(msg))
+        nmsg.send(mlist)
+    # Discard this sucker
+    raise Errors.DiscardMessage