File Manager

Editing File: /usr/local/cpanel/3rdparty/mailman/Mailman/Cgi/admindb.py

# Copyright (C) 1998-2018 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.

"""Produce and process the pending-approval items for a list."""

import sys
import os
import cgi
import errno
import signal
import email
import time
from types import ListType
from urllib import quote_plus, unquote_plus

from Mailman import mm_cfg
from Mailman import Utils
from Mailman import MailList
from Mailman import Errors
from Mailman import Message
from Mailman import i18n
from Mailman.Handlers.Moderate import ModeratedMemberPost
from Mailman.ListAdmin import HELDMSG
from Mailman.ListAdmin import readMessage
from Mailman.Cgi import Auth
from Mailman.htmlformat import *
from Mailman.Logging.Syslog import syslog
from Mailman.CSRFcheck import csrf_check

EMPTYSTRING = ''
NL = '\n'

# Set up i18n.  Until we know which list is being requested, we use the
# server's default.
_ = i18n._
i18n.set_language(mm_cfg.DEFAULT_SERVER_LANGUAGE)

EXCERPT_HEIGHT = 10
EXCERPT_WIDTH = 76
SSENDER = mm_cfg.SSENDER
SSENDERTIME = mm_cfg.SSENDERTIME
STIME = mm_cfg.STIME
if mm_cfg.DISPLAY_HELD_SUMMARY_SORT_BUTTONS in (SSENDERTIME, STIME):
    ssort = mm_cfg.DISPLAY_HELD_SUMMARY_SORT_BUTTONS
else:
    ssort = SSENDER

AUTH_CONTEXTS = (mm_cfg.AuthListModerator, mm_cfg.AuthListAdmin,
                 mm_cfg.AuthSiteAdmin)

def helds_by_skey(mlist, ssort=SSENDER):
    heldmsgs = mlist.GetHeldMessageIds()
    byskey = {}
    for id in heldmsgs:
        ptime = mlist.GetRecord(id)[0]
        sender = mlist.GetRecord(id)[1]
        if ssort in (SSENDER, SSENDERTIME):
            skey = (0, sender)
        else:
            skey = (ptime, sender)
        byskey.setdefault(skey, []).append((ptime, id))
    # Sort groups by time
    for k, v in byskey.items():
        if len(v) > 1:
            v.sort()
            byskey[k] = v
        if ssort == SSENDERTIME:
            # Rekey with time
            newkey = (v[0][0], k[1])
            del byskey[k]
            byskey[newkey] = v
    return byskey

def hacky_radio_buttons(btnname, labels, values, defaults, spacing=3):
 # We can't use a RadioButtonArray here because horizontal placement can be
 # confusing to the user and vertical placement takes up too much
 # real-estate. This is a hack!
 space = '&nbsp;' * spacing
 btns = Table(cellspacing='5', cellpadding='0')
 btns.AddRow([space + text + space for text in labels])
 btns.AddRow([Center(RadioButton(btnname, value, default).Format()
 + '<div class=hidden>' + label + '</div>')
 for label, value, default in zip(labels, values, defaults)])
 return btns

def main():
    global ssort
    # Figure out which list is being requested
    parts = Utils.GetPathPieces()
    if not parts:
        handle_no_list()
        return

listname = parts[0].lower()
 try:
 mlist = MailList.MailList(listname, lock=0)
 except Errors.MMListError, e:
 # Avoid cross-site scripting attacks
 safelistname = Utils.websafe(listname)
 # Send this with a 404 status.
 print 'Status: 404 Not Found'
 handle_no_list(_('No such list %(safelistname)s'))
 syslog('error', 'admindb: No such list "%s": %s\n', listname, e)
 return

# Now that we know which list to use, set the system's language to it.
    i18n.set_language(mlist.preferred_language)

# Make sure the user is authorized to see this page.
    cgidata = cgi.FieldStorage(keep_blank_values=1)
    try:
        cgidata.getfirst('adminpw', '')
    except TypeError:
        # Someone crafted a POST with a bad Content-Type:.
        doc = Document()
        doc.set_language(mm_cfg.DEFAULT_SERVER_LANGUAGE)
        doc.AddItem(Header(2, _("Error")))
        doc.AddItem(Bold(_('Invalid options to CGI script.')))
        # Send this with a 400 status.
        print 'Status: 400 Bad Request'
        print doc.Format()
        return

# CSRF check
    safe_params = ['adminpw', 'admlogin', 'msgid', 'sender', 'details']
    params = cgidata.keys()
    if set(params) - set(safe_params):
        csrf_checked = csrf_check(mlist, cgidata.getfirst('csrf_token'),
                                  'admindb')
    else:
        csrf_checked = True
    # if password is present, void cookie to force password authentication.
    if cgidata.getfirst('adminpw'):
        os.environ['HTTP_COOKIE'] = ''
        csrf_checked = True

if not mlist.WebAuthenticate((mm_cfg.AuthListAdmin,
                                  mm_cfg.AuthListModerator,
                                  mm_cfg.AuthSiteAdmin),
                                 cgidata.getfirst('adminpw', '')):
        if cgidata.has_key('adminpw'):
            # This is a re-authorization attempt
            msg = Bold(FontSize('+1', _('Authorization failed.'))).Format()
            remote = os.environ.get('HTTP_FORWARDED_FOR',
                     os.environ.get('HTTP_X_FORWARDED_FOR',
                     os.environ.get('REMOTE_ADDR',
                                    'unidentified origin')))
            syslog('security',
                   'Authorization failed (admindb): list=%s: remote=%s',
                   listname, remote)
        else:
            msg = ''
        Auth.loginpage(mlist, 'admindb', msg=msg)
        return

# Add logout function. Note that admindb may be accessed with
    # site-wide admin, moderator and list admin privileges.
    # site admin may have site or admin cookie. (or both?)
    # See if this is a logout request
    if len(parts) >= 2 and parts[1] == 'logout':
        if mlist.AuthContextInfo(mm_cfg.AuthSiteAdmin)[0] == 'site':
            print mlist.ZapCookie(mm_cfg.AuthSiteAdmin)
        if mlist.AuthContextInfo(mm_cfg.AuthListModerator)[0]:
            print mlist.ZapCookie(mm_cfg.AuthListModerator)
        print mlist.ZapCookie(mm_cfg.AuthListAdmin)
        Auth.loginpage(mlist, 'admindb', frontpage=1)
        return

# Set up the results document
    doc = Document()
    doc.set_language(mlist.preferred_language)

# See if we're requesting all the messages for a particular sender, or if
    # we want a specific held message.
    sender = None
    msgid = None
    details = None
    envar = os.environ.get('QUERY_STRING')
    if envar:
        # POST methods, even if their actions have a query string, don't get
        # put into FieldStorage's keys :-(
        qs = cgi.parse_qs(envar).get('sender')
        if qs and type(qs) == ListType:
            sender = qs[0]
        qs = cgi.parse_qs(envar).get('msgid')
        if qs and type(qs) == ListType:
            msgid = qs[0]
        qs = cgi.parse_qs(envar).get('details')
        if qs and type(qs) == ListType:
            details = qs[0]

# We need a signal handler to catch the SIGTERM that can come from Apache
    # when the user hits the browser's STOP button.  See the comment in
    # admin.py for details.
    #
    # BAW: Strictly speaking, the list should not need to be locked just to
    # read the request database.  However the request database asserts that
    # the list is locked in order to load it and it's not worth complicating
    # that logic.
    def sigterm_handler(signum, frame, mlist=mlist):
        # Make sure the list gets unlocked...
        mlist.Unlock()
        # ...and ensure we exit, otherwise race conditions could cause us to
        # enter MailList.Save() while we're in the unlocked state, and that
        # could be bad!
        sys.exit(0)

mlist.Lock()
    try:
        # Install the emergency shutdown signal handler
        signal.signal(signal.SIGTERM, sigterm_handler)

realname = mlist.real_name
 if not cgidata.keys() or cgidata.has_key('admlogin'):
 # If this is not a form submission (i.e. there are no keys in the
 # form) or it's a login, then we don't need to do much special.
 doc.SetTitle(_('%(realname)s Administrative Database'))
 elif not details:
 # This is a form submission
 doc.SetTitle(_('%(realname)s Administrative Database Results'))
 if csrf_checked:
 process_form(mlist, doc, cgidata)
 else:
 doc.addError(
 _('The form lifetime has expired. (request forgery check)'))
 # Now print the results and we're done. Short circuit for when there
 # are no pending requests, but be sure to save the results!
 admindburl = mlist.GetScriptURL('admindb')
 if not mlist.NumRequestsPending():
 title = _('%(realname)s Administrative Database')
 doc.SetTitle(title)
 doc.AddItem(Header(2, title))
 doc.AddItem(_('There are no pending requests.'))
 doc.AddItem(' ')
 doc.AddItem(Link(admindburl,
 _('Click here to reload this page.')))
 # Put 'Logout' link before the footer
 doc.AddItem('\n<div align="right">')
 doc.AddItem(Link('%s/logout' % admindburl,
 '%s' % _('Logout')))
 doc.AddItem('</div>\n')
 doc.AddItem(mlist.GetMailmanFooter())
 print doc.Format()
 mlist.Save()
 return

form = Form(admindburl, mlist=mlist, contexts=AUTH_CONTEXTS)
 # Add the instructions template
 if details == 'instructions':
 doc.AddItem(Header(
 2, _('Detailed instructions for the administrative database')))
 else:
 doc.AddItem(Header(
 2,
 _('Administrative requests for mailing list:')
 + ' %s' % mlist.real_name))
 if details <> 'instructions':
 form.AddItem(Center(SubmitButton('submit', _('Submit All Data'))))
 nomessages = not mlist.GetHeldMessageIds()
 if not (details or sender or msgid or nomessages):
 form.AddItem(Center(
 '<label>' +
 CheckBox('discardalldefersp', 0).Format() +
 '&nbsp;' +
 _('Discard all messages marked Defer') +
 '</label>'
 ))
 # Add a link back to the overview, if we're not viewing the overview!
 adminurl = mlist.GetScriptURL('admin', absolute=1)
 d = {'listname' : mlist.real_name,
 'detailsurl': admindburl + '?details=instructions',
 'summaryurl': admindburl,
 'viewallurl': admindburl + '?details=all',
 'adminurl' : adminurl,
 'filterurl' : adminurl + '/privacy/sender',
 }
 addform = 1
 if sender:
 esender = Utils.websafe(sender)
 d['description'] = _("all of %(esender)s's held messages.")
 doc.AddItem(Utils.maketext('admindbpreamble.html', d,
 raw=1, mlist=mlist))
 show_sender_requests(mlist, form, sender)
 elif msgid:
 d['description'] = _('a single held message.')
 doc.AddItem(Utils.maketext('admindbpreamble.html', d,
 raw=1, mlist=mlist))
 show_message_requests(mlist, form, msgid)
 elif details == 'all':
 d['description'] = _('all held messages.')
 doc.AddItem(Utils.maketext('admindbpreamble.html', d,
 raw=1, mlist=mlist))
 show_detailed_requests(mlist, form)
 elif details == 'instructions':
 doc.AddItem(Utils.maketext('admindbdetails.html', d,
 raw=1, mlist=mlist))
 addform = 0
 else:
 # Show a summary of all requests
 doc.AddItem(Utils.maketext('admindbsummary.html', d,
 raw=1, mlist=mlist))
 num = show_pending_subs(mlist, form)
 num += show_pending_unsubs(mlist, form)
 num += show_helds_overview(mlist, form, ssort)
 addform = num > 0
 # Finish up the document, adding buttons to the form
 if addform:
 doc.AddItem(form)
 form.AddItem('<hr>')
 if not (details or sender or msgid or nomessages):
 form.AddItem(Center(
 '<label>' +
 CheckBox('discardalldefersp', 0).Format() +
 '&nbsp;' +
 _('Discard all messages marked Defer') +
 '</label>'
 ))
 form.AddItem(Center(SubmitButton('submit', _('Submit All Data'))))
 # Put 'Logout' link before the footer
 doc.AddItem('\n<div align="right">')
 doc.AddItem(Link('%s/logout' % admindburl,
 '%s' % _('Logout')))
 doc.AddItem('</div>\n')
 doc.AddItem(mlist.GetMailmanFooter())
 print doc.Format()
 # Commit all changes
 mlist.Save()
 finally:
 mlist.Unlock()

def handle_no_list(msg=''):
    # Print something useful if no list was given.
    doc = Document()
    doc.set_language(mm_cfg.DEFAULT_SERVER_LANGUAGE)

header = _('Mailman Administrative Database Error')
 doc.SetTitle(header)
 doc.AddItem(Header(2, header))
 doc.AddItem(msg)
 url = Utils.ScriptURL('admin', absolute=1)
 link = Link(url, _('list of available mailing lists.')).Format()
 doc.AddItem(_('You must specify a list name. Here is the %(link)s'))
 doc.AddItem('<hr>')
 doc.AddItem(MailmanLogo())
 print doc.Format()

def show_pending_subs(mlist, form):
 # Add the subscription request section
 pendingsubs = mlist.GetSubscriptionIds()
 if not pendingsubs:
 return 0
 form.AddItem('<hr>')
 form.AddItem(Center(Header(2, _('Subscription Requests'))))
 table = Table(border=2)
 table.AddRow([Center(Bold(_('Address/name/time'))),
 Center(Bold(_('Your decision'))),
 Center(Bold(_('Reason for refusal')))
 ])
 # Alphabetical order by email address
 byaddrs = {}
 for id in pendingsubs:
 addr = mlist.GetRecord(id)[1]
 byaddrs.setdefault(addr, []).append(id)
 addrs = byaddrs.items()
 addrs.sort()
 num = 0
 for addr, ids in addrs:
 # Eliminate duplicates.
 # The list ws returned sorted ascending. Keep the last.
 for id in ids[:-1]:
 mlist.HandleRequest(id, mm_cfg.DISCARD)
 id = ids[-1]
 stime, addr, fullname, passwd, digest, lang = mlist.GetRecord(id)
 fullname = Utils.uncanonstr(fullname, mlist.preferred_language)
 displaytime = time.ctime(stime)
 radio = RadioButtonArray(id, (_('Defer'),
 _('Approve'),
 _('Reject'),
 _('Discard')),
 values=(mm_cfg.DEFER,
 mm_cfg.SUBSCRIBE,
 mm_cfg.REJECT,
 mm_cfg.DISCARD),
 checked=0).Format()
 if addr not in mlist.ban_list:
 radio += (' ' + '<label>' +
 CheckBox('ban-%d' % id, 1).Format() +
 '&nbsp;' + _('Permanently ban from this list') +
 '</label>')
 # While the address may be a unicode, it must be ascii
 paddr = addr.encode('us-ascii', 'replace')
 table.AddRow(['%s %s %s' % (paddr,
 Utils.websafe(fullname),
 displaytime),
 radio,
 TextBox('comment-%d' % id, size=40)
 ])
 num += 1
 if num > 0:
 form.AddItem(table)
 return num

def show_pending_unsubs(mlist, form):
 # Add the pending unsubscription request section
 lang = mlist.preferred_language
 pendingunsubs = mlist.GetUnsubscriptionIds()
 if not pendingunsubs:
 return 0
 table = Table(border=2)
 table.AddRow([Center(Bold(_('User address/name'))),
 Center(Bold(_('Your decision'))),
 Center(Bold(_('Reason for refusal')))
 ])
 # Alphabetical order by email address
 byaddrs = {}
 for id in pendingunsubs:
 addr = mlist.GetRecord(id)
 byaddrs.setdefault(addr, []).append(id)
 addrs = byaddrs.items()
 addrs.sort()
 num = 0
 for addr, ids in addrs:
 # Eliminate duplicates
 # Here the order doesn't matter as the data is just the address.
 for id in ids[1:]:
 mlist.HandleRequest(id, mm_cfg.DISCARD)
 id = ids[0]
 addr = mlist.GetRecord(id)
 try:
 fullname = Utils.uncanonstr(mlist.getMemberName(addr), lang)
 except Errors.NotAMemberError:
 # They must have been unsubscribed elsewhere, so we can just
 # discard this record.
 mlist.HandleRequest(id, mm_cfg.DISCARD)
 continue
 num += 1
 table.AddRow(['%s %s' % (addr, Utils.websafe(fullname)),
 RadioButtonArray(id, (_('Defer'),
 _('Approve'),
 _('Reject'),
 _('Discard')),
 values=(mm_cfg.DEFER,
 mm_cfg.UNSUBSCRIBE,
 mm_cfg.REJECT,
 mm_cfg.DISCARD),
 checked=0),
 TextBox('comment-%d' % id, size=45)
 ])
 if num > 0:
 form.AddItem('<hr>')
 form.AddItem(Center(Header(2, _('Unsubscription Requests'))))
 form.AddItem(table)
 return num

def show_helds_overview(mlist, form, ssort=SSENDER):
 # Sort the held messages.
 byskey = helds_by_skey(mlist, ssort)
 if not byskey:
 return 0
 form.AddItem('<hr>')
 form.AddItem(Center(Header(2, _('Held Messages'))))
 # Add the sort sequence choices if wanted
 if mm_cfg.DISPLAY_HELD_SUMMARY_SORT_BUTTONS:
 form.AddItem(Center(_('Show this list grouped/sorted by')))
 form.AddItem(Center(hacky_radio_buttons(
 'summary_sort',
 (_('sender/sender'), _('sender/time'), _('ungrouped/time')),
 (SSENDER, SSENDERTIME, STIME),
 (ssort == SSENDER, ssort == SSENDERTIME, ssort == STIME))))
 # Add the by-sender overview tables
 admindburl = mlist.GetScriptURL('admindb', absolute=1)
 table = Table(border=0)
 form.AddItem(table)
 skeys = byskey.keys()
 skeys.sort()
 for skey in skeys:
 sender = skey[1]
 qsender = quote_plus(sender)
 esender = Utils.websafe(sender)
 senderurl = admindburl + '?sender=' + qsender
 # The encompassing sender table
 stable = Table(border=1)
 stable.AddRow([Center(Bold(_('From:')).Format() + esender)])
 stable.AddCellInfo(stable.GetCurrentRowIndex(), 0, colspan=2)
 left = Table(border=0)
 left.AddRow([_('Action to take on all these held messages:')])
 left.AddCellInfo(left.GetCurrentRowIndex(), 0, colspan=2)
 btns = hacky_radio_buttons(
 'senderaction-' + qsender,
 (_('Defer'), _('Accept'), _('Reject'), _('Discard')),
 (mm_cfg.DEFER, mm_cfg.APPROVE, mm_cfg.REJECT, mm_cfg.DISCARD),
 (1, 0, 0, 0))
 left.AddRow([btns])
 left.AddCellInfo(left.GetCurrentRowIndex(), 0, colspan=2)
 left.AddRow([
 '<label>' +
 CheckBox('senderpreserve-' + qsender, 1).Format() +
 '&nbsp;' +
 _('Preserve messages for the site administrator') +
 '</label>'
 ])
 left.AddCellInfo(left.GetCurrentRowIndex(), 0, colspan=2)
 left.AddRow([
 '<label>' +
 CheckBox('senderforward-' + qsender, 1).Format() +
 '&nbsp;' +
 _('Forward messages (individually) to:') +
 '</label>'
 ])
 left.AddCellInfo(left.GetCurrentRowIndex(), 0, colspan=2)
 left.AddRow([
 TextBox('senderforwardto-' + qsender,
 value=mlist.GetOwnerEmail())
 ])
 left.AddCellInfo(left.GetCurrentRowIndex(), 0, colspan=2)
 # If the sender is a member and the message is being held due to a
 # moderation bit, give the admin a chance to clear the member's mod
 # bit. If this sender is not a member and is not already on one of
 # the sender filters, then give the admin a chance to add this sender
 # to one of the filters.
 if mlist.isMember(sender):
 if mlist.getMemberOption(sender, mm_cfg.Moderate):
 left.AddRow([
 '<label>' +
 CheckBox('senderclearmodp-' + qsender, 1).Format() +
 '&nbsp;' +
 _("Clear this member's moderate flag") +
 '</label>'
 ])
 else:
 left.AddRow(
 [_('The sender is now a member of this list')])
 left.AddCellInfo(left.GetCurrentRowIndex(), 0, colspan=2)
 elif sender not in (mlist.accept_these_nonmembers +
 mlist.hold_these_nonmembers +
 mlist.reject_these_nonmembers +
 mlist.discard_these_nonmembers):
 left.AddRow([
 '<label>' +
 CheckBox('senderfilterp-' + qsender, 1).Format() +
 '&nbsp;' +
 _('Add %(esender)s to one of these sender filters:') +
 '</label>'
 ])
 left.AddCellInfo(left.GetCurrentRowIndex(), 0, colspan=2)
 btns = hacky_radio_buttons(
 'senderfilter-' + qsender,
 (_('Accepts'), _('Holds'), _('Rejects'), _('Discards')),
 (mm_cfg.ACCEPT, mm_cfg.HOLD, mm_cfg.REJECT, mm_cfg.DISCARD),
 (0, 0, 0, 1))
 left.AddRow([btns])
 left.AddCellInfo(left.GetCurrentRowIndex(), 0, colspan=2)
 if sender not in mlist.ban_list:
 left.AddRow([
 '<label>' +
 CheckBox('senderbanp-' + qsender, 1).Format() +
 '&nbsp;' +
 _("""Ban %(esender)s from ever subscribing to this
 mailing list""") + '</label>'])
 left.AddCellInfo(left.GetCurrentRowIndex(), 0, colspan=2)
 right = Table(border=0)
 right.AddRow([
 _("""Click on the message number to view the individual
 message, or you can """) +
 Link(senderurl, _('view all messages from %(esender)s')).Format()
 ])
 right.AddCellInfo(right.GetCurrentRowIndex(), 0, colspan=2)
 right.AddRow(['&nbsp;', '&nbsp;'])
 counter = 1
 for ptime, id in byskey[skey]:
 info = mlist.GetRecord(id)
 ptime, sender, subject, reason, filename, msgdata = info
 # BAW: This is really the size of the message pickle, which should
 # be close, but won't be exact. Sigh, good enough.
 try:
 size = os.path.getsize(os.path.join(mm_cfg.DATA_DIR, filename))
 except OSError, e:
 if e.errno <> errno.ENOENT: raise
 # This message must have gotten lost, i.e. it's already been
 # handled by the time we got here.
 mlist.HandleRequest(id, mm_cfg.DISCARD)
 continue
 dispsubj = Utils.oneline(
 subject, Utils.GetCharSet(mlist.preferred_language))
 t = Table(border=0)
 t.AddRow([Link(admindburl + '?msgid=%d' % id, '[%d]' % counter),
 Bold(_('Subject:')),
 Utils.websafe(dispsubj)
 ])
 t.AddRow(['&nbsp;', Bold(_('Size:')), str(size) + _(' bytes')])
 if reason:
 reason = _(reason)
 else:
 reason = _('not available')
 t.AddRow(['&nbsp;', Bold(_('Reason:')), reason])
 # Include the date we received the message, if available
 when = msgdata.get('received_time')
 if when:
 t.AddRow(['&nbsp;', Bold(_('Received:')),
 time.ctime(when)])
 t.AddRow([InputObj(qsender, 'hidden', str(id), False).Format()])
 counter += 1
 right.AddRow([t])
 stable.AddRow([left, right])
 table.AddRow([stable])
 return 1

def show_sender_requests(mlist, form, sender):
    byskey = helds_by_skey(mlist, SSENDER)
    if not byskey:
        return
    sender_ids = byskey.get((0, sender))
    if sender_ids is None:
        # BAW: should we print an error message?
        return
    sender_ids = [x[1] for x in sender_ids]
    total = len(sender_ids)
    count = 1
    for id in sender_ids:
        info = mlist.GetRecord(id)
        show_post_requests(mlist, id, info, total, count, form)
        count += 1

def show_message_requests(mlist, form, id):
    try:
        id = int(id)
        info = mlist.GetRecord(id)
    except (ValueError, KeyError):
        # BAW: print an error message?
        return
    show_post_requests(mlist, id, info, 1, 1, form)

def show_detailed_requests(mlist, form):
    all = mlist.GetHeldMessageIds()
    total = len(all)
    count = 1
    for id in mlist.GetHeldMessageIds():
        info = mlist.GetRecord(id)
        show_post_requests(mlist, id, info, total, count, form)
        count += 1

def show_post_requests(mlist, id, info, total, count, form):
 # Mailman.ListAdmin.__handlepost no longer tests for pre 2.0beta3
 ptime, sender, subject, reason, filename, msgdata = info
 form.AddItem('<hr>')
 # Header shown on each held posting (including count of total)
 msg = _('Posting Held for Approval')
 if total <> 1:
 msg += _(' (%(count)d of %(total)d)')
 form.AddItem(Center(Header(2, msg)))
 # We need to get the headers and part of the textual body of the message
 # being held. The best way to do this is to use the email Parser to get
 # an actual object, which will be easier to deal with. We probably could
 # just do raw reads on the file.
 try:
 msg = readMessage(os.path.join(mm_cfg.DATA_DIR, filename))
 except IOError, e:
 if e.errno <> errno.ENOENT:
 raise
 form.AddItem(_('Message with id #%(id)d was lost.'))
 form.AddItem('')
 # BAW: kludge to remove id from requests.db.
 try:
 mlist.HandleRequest(id, mm_cfg.DISCARD)
 except Errors.LostHeldMessage:
 pass
 return
 except email.Errors.MessageParseError:
 form.AddItem(_('Message with id #%(id)d is corrupted.'))
 # BAW: Should we really delete this, or shuttle it off for site admin
 # to look more closely at?
 form.AddItem('')
 # BAW: kludge to remove id from requests.db.
 try:
 mlist.HandleRequest(id, mm_cfg.DISCARD)
 except Errors.LostHeldMessage:
 pass
 return
 # Get the header text and the message body excerpt
 lines = []
 chars = 0
 # A negative value means, include the entire message regardless of size
 limit = mm_cfg.ADMINDB_PAGE_TEXT_LIMIT
 for line in email.Iterators.body_line_iterator(msg, decode=True):
 lines.append(line)
 chars += len(line)
 if chars >= limit > 0:
 break
 # We may have gone over the limit on the last line, but keep the full line
 # anyway to avoid losing part of a multibyte character.
 body = EMPTYSTRING.join(lines)
 # Get message charset and try encode in list charset
 # We get it from the first text part.
 # We need to replace invalid characters here or we can throw an uncaught
 # exception in doc.Format().
 for part in msg.walk():
 if part.get_content_maintype() == 'text':
 # Watchout for charset= with no value.
 mcset = part.get_content_charset() or 'us-ascii'
 break
 else:
 mcset = 'us-ascii'
 lcset = Utils.GetCharSet(mlist.preferred_language)
 if mcset <> lcset:
 try:
 body = unicode(body, mcset, 'replace').encode(lcset, 'replace')
 except (LookupError, UnicodeError, ValueError):
 pass
 hdrtxt = NL.join(['%s: %s' % (k, v) for k, v in msg.items()])
 hdrtxt = Utils.websafe(hdrtxt)
 # Okay, we've reconstituted the message just fine. Now for the fun part!
 t = Table(cellspacing=0, cellpadding=0, width='100%')
 t.AddRow([Bold(_('From:')), sender])
 row, col = t.GetCurrentRowIndex(), t.GetCurrentCellIndex()
 t.AddCellInfo(row, col-1, align='right')
 t.AddRow([Bold(_('Subject:')),
 Utils.websafe(Utils.oneline(subject, lcset))])
 t.AddCellInfo(row+1, col-1, align='right')
 t.AddRow([Bold(_('Reason:')), _(reason)])
 t.AddCellInfo(row+2, col-1, align='right')
 when = msgdata.get('received_time')
 if when:
 t.AddRow([Bold(_('Received:')), time.ctime(when)])
 t.AddCellInfo(row+3, col-1, align='right')
 buttons = hacky_radio_buttons(id,
 (_('Defer'), _('Approve'), _('Reject'), _('Discard')),
 (mm_cfg.DEFER, mm_cfg.APPROVE, mm_cfg.REJECT, mm_cfg.DISCARD),
 (1, 0, 0, 0),
 spacing=5)
 t.AddRow([Bold(_('Action:')), buttons])
 t.AddCellInfo(t.GetCurrentRowIndex(), col-1, align='right')
 t.AddRow(['&nbsp;',
 '<label>' +
 CheckBox('preserve-%d' % id, 'on', 0).Format() +
 '&nbsp;' + _('Preserve message for site administrator') +
 '</label>'
 ])
 t.AddRow(['&nbsp;',
 '<label>' +
 CheckBox('forward-%d' % id, 'on', 0).Format() +
 '&nbsp;' + _('Additionally, forward this message to: ') +
 '</label>' +
 TextBox('forward-addr-%d' % id, size=47,
 value=mlist.GetOwnerEmail()).Format()
 ])
 notice = msgdata.get('rejection_notice', _('[No explanation given]'))
 t.AddRow([
 Bold(_('If you reject this post, please explain (optional):')),
 TextArea('comment-%d' % id, rows=4, cols=EXCERPT_WIDTH,
 text = Utils.wrap(_(notice), column=80))
 ])
 row, col = t.GetCurrentRowIndex(), t.GetCurrentCellIndex()
 t.AddCellInfo(row, col-1, align='right')
 t.AddRow([Bold(_('Message Headers:')),
 TextArea('headers-%d' % id, hdrtxt,
 rows=EXCERPT_HEIGHT, cols=EXCERPT_WIDTH, readonly=1)])
 row, col = t.GetCurrentRowIndex(), t.GetCurrentCellIndex()
 t.AddCellInfo(row, col-1, align='right')
 t.AddRow([Bold(_('Message Excerpt:')),
 TextArea('fulltext-%d' % id, Utils.websafe(body),
 rows=EXCERPT_HEIGHT, cols=EXCERPT_WIDTH, readonly=1)])
 t.AddCellInfo(row+1, col-1, align='right')
 form.AddItem(t)
 form.AddItem('')

def process_form(mlist, doc, cgidata):
 global ssort
 senderactions = {}
 badaddrs = []
 # Sender-centric actions
 for k in cgidata.keys():
 for prefix in ('senderaction-', 'senderpreserve-', 'senderforward-',
 'senderforwardto-', 'senderfilterp-', 'senderfilter-',
 'senderclearmodp-', 'senderbanp-'):
 if k.startswith(prefix):
 action = k[:len(prefix)-1]
 qsender = k[len(prefix):]
 sender = unquote_plus(qsender)
 value = cgidata.getfirst(k)
 senderactions.setdefault(sender, {})[action] = value
 for id in cgidata.getlist(qsender):
 senderactions[sender].setdefault('message_ids',
 []).append(int(id))
 # discard-all-defers
 try:
 discardalldefersp = cgidata.getfirst('discardalldefersp', 0)
 except ValueError:
 discardalldefersp = 0
 # Get the summary sequence
 ssort = int(cgidata.getfirst('summary_sort', SSENDER))
 for sender in senderactions.keys():
 actions = senderactions[sender]
 # Handle what to do about all this sender's held messages
 try:
 action = int(actions.get('senderaction', mm_cfg.DEFER))
 except ValueError:
 action = mm_cfg.DEFER
 if action == mm_cfg.DEFER and discardalldefersp:
 action = mm_cfg.DISCARD
 if action in (mm_cfg.DEFER, mm_cfg.APPROVE,
 mm_cfg.REJECT, mm_cfg.DISCARD):
 preserve = actions.get('senderpreserve', 0)
 forward = actions.get('senderforward', 0)
 forwardaddr = actions.get('senderforwardto', '')
 byskey = helds_by_skey(mlist, SSENDER)
 for ptime, id in byskey.get((0, sender), []):
 if id not in senderactions[sender]['message_ids']:
 # It arrived after the page was displayed. Skip it.
 continue
 try:
 msgdata = mlist.GetRecord(id)[5]
 comment = msgdata.get('rejection_notice',
 _('[No explanation given]'))
 mlist.HandleRequest(id, action, comment, preserve,
 forward, forwardaddr)
 except (KeyError, Errors.LostHeldMessage):
 # That's okay, it just means someone else has already
 # updated the database while we were staring at the page,
 # so just ignore it
 continue
 # Now see if this sender should be added to one of the nonmember
 # sender filters.
 if actions.get('senderfilterp', 0):
 # Check for an invalid sender address.
 try:
 Utils.ValidateEmail(sender)
 except Errors.EmailAddressError:
 # Don't check for dups. Report it once for each checked box.
 badaddrs.append(sender)
 else:
 try:
 which = int(actions.get('senderfilter'))
 except ValueError:
 # Bogus form
 which = 'ignore'
 if which == mm_cfg.ACCEPT:
 mlist.accept_these_nonmembers.append(sender)
 elif which == mm_cfg.HOLD:
 mlist.hold_these_nonmembers.append(sender)
 elif which == mm_cfg.REJECT:
 mlist.reject_these_nonmembers.append(sender)
 elif which == mm_cfg.DISCARD:
 mlist.discard_these_nonmembers.append(sender)
 # Otherwise, it's a bogus form, so ignore it
 # And now see if we're to clear the member's moderation flag.
 if actions.get('senderclearmodp', 0):
 try:
 mlist.setMemberOption(sender, mm_cfg.Moderate, 0)
 except Errors.NotAMemberError:
 # This person's not a member any more. Oh well.
 pass
 # And should this address be banned?
 if actions.get('senderbanp', 0):
 # Check for an invalid sender address.
 try:
 Utils.ValidateEmail(sender)
 except Errors.EmailAddressError:
 # Don't check for dups. Report it once for each checked box.
 badaddrs.append(sender)
 else:
 if sender not in mlist.ban_list:
 mlist.ban_list.append(sender)
 # Now, do message specific actions
 banaddrs = []
 erroraddrs = []
 for k in cgidata.keys():
 formv = cgidata[k]
 if type(formv) == ListType:
 continue
 try:
 v = int(formv.value)
 request_id = int(k)
 except ValueError:
 continue
 if v not in (mm_cfg.DEFER, mm_cfg.APPROVE, mm_cfg.REJECT,
 mm_cfg.DISCARD, mm_cfg.SUBSCRIBE, mm_cfg.UNSUBSCRIBE,
 mm_cfg.ACCEPT, mm_cfg.HOLD):
 continue
 # Get the action comment and reasons if present.
 commentkey = 'comment-%d' % request_id
 preservekey = 'preserve-%d' % request_id
 forwardkey = 'forward-%d' % request_id
 forwardaddrkey = 'forward-addr-%d' % request_id
 bankey = 'ban-%d' % request_id
 # Defaults
 try:
 if mlist.GetRecordType(request_id) == HELDMSG:
 msgdata = mlist.GetRecord(request_id)[5]
 comment = msgdata.get('rejection_notice',
 _('[No explanation given]'))
 else:
 comment = _('[No explanation given]')
 except KeyError:
 # Someone else must have handled this one after we got the page.
 continue
 preserve = 0
 forward = 0
 forwardaddr = ''
 if cgidata.has_key(commentkey):
 comment = cgidata[commentkey].value
 if cgidata.has_key(preservekey):
 preserve = cgidata[preservekey].value
 if cgidata.has_key(forwardkey):
 forward = cgidata[forwardkey].value
 if cgidata.has_key(forwardaddrkey):
 forwardaddr = cgidata[forwardaddrkey].value
 # Should we ban this address? Do this check before handling the
 # request id because that will evict the record.
 if cgidata.getfirst(bankey):
 sender = mlist.GetRecord(request_id)[1]
 if sender not in mlist.ban_list:
 # We don't need to validate the sender. An invalid address
 # can't get here.
 mlist.ban_list.append(sender)
 # Handle the request id
 try:
 mlist.HandleRequest(request_id, v, comment,
 preserve, forward, forwardaddr)
 except (KeyError, Errors.LostHeldMessage):
 # That's okay, it just means someone else has already updated the
 # database while we were staring at the page, so just ignore it
 continue
 except Errors.MMAlreadyAMember, v:
 erroraddrs.append(v)
 except Errors.MembershipIsBanned, pattern:
 sender = mlist.GetRecord(request_id)[1]
 banaddrs.append((sender, pattern))
 # save the list and print the results
 doc.AddItem(Header(2, _('Database Updated...')))
 if erroraddrs:
 for addr in erroraddrs:
 addr = Utils.websafe(addr)
 doc.AddItem(`addr` + _(' is already a member') + ' ')
 if banaddrs:
 for addr, patt in banaddrs:
 addr = Utils.websafe(addr)
 doc.AddItem(_('%(addr)s is banned (matched: %(patt)s)') + ' ')
 if badaddrs:
 for addr in badaddrs:
 addr = Utils.websafe(addr)
 doc.AddItem(`addr` + ': ' + _('Bad/Invalid email address') +
 ' ')

Back to Directory File Manager