Merge lp:~mmlmtp/mailman/mm3lmtp into lp:mailman

[Ian Eiloart]

Gives LMTP server the ability to reject mail to non-existent lists at LMTP time, and to reject mail from people who don't have permission to post to a list.

[Barry Warsaw (barry)]

Yeah, there's something really wrong with this branch - it's trying to merge way too much. It was probably branched off of the wrong thing, or hasn't be updated in a long time. Since this branch is pretty old (my fault I'm sure) it may not be possible for William to reconcile it with current lp:mailman trunk. I'll see if I can pick out the relevant bits.

review: Needs Fixing

[Barry Warsaw (barry)]

I'm going to close this as rejected since there are so many conflicts. Please do consider resubmitting against our gitlab project: https://gitlab.com/mailman/mailman

review: Disapprove

Unmerged revisions

11. By iane <email address hidden> on 2009-01-05

Removed extraneous log files

10. By William Mead <email address hidden> on 2008-07-24

rev10: Added a method to Utils, Added some tests to the lmtp Doctest

9. By William Mead <email address hidden> on 2008-07-22

rev9: Added PIPELINING supported message at LHLO

8. By William Mead <email address hidden> on 2008-07-18

rev8:fixed Doctest, code respects rfcs

7. By William Mead <email address hidden> on 2008-07-17

rev7: Complete LMTP channel, Fully uses enhanced error codes, LHLO command is required before MAIL command

6. By William Mead <email address hidden> on 2008-07-16

rev6: Fixed Doctest

5. By William Mead <email address hidden> on 2008-07-15

rev5: Added two new enhanced error codes

4. By William Mead <email address hidden> on 2008-07-15

rev4: Created three new methods for getting and parsing listnames, accept_these_nonmembers will be checked

3. By William Mead <email address hidden> on 2008-07-11

rev3 : Added enhanced error codes, Sender address can be rejected at RCPT TO

2. By William Mead <email address hidden> on 2008-07-10

rev2

=== added file 'PKG-INFO'
--- PKG-INFO	1970-01-01 00:00:00 +0000
+++ PKG-INFO	2010-10-14 12:15:59 +0000
@@ -0,0 +1,14 @@
+Metadata-Version: 1.0
+Name: mailman
+Version: 3.0.0a1
+Summary: Mailman -- the GNU mailing list manager
+Home-page: http://www.list.org
+Author: The Mailman Developers
+Author-email: [e-mail]
+License: GPL
+Description: This is GNU Mailman, a mailing list management system distributed under the
+        terms of the GNU General Public License (GPL).  The name of this software is
+        spelled 'Mailman' with a leading capital 'M' but with a lower case second `m'.
+        Any other spelling is incorrect.
+Keywords: email
+Platform: UNKNOWN

=== added file 'README.txt'
--- README.txt	1970-01-01 00:00:00 +0000
+++ README.txt	2010-10-14 12:15:59 +0000
@@ -0,0 +1,197 @@
+Mailman - The GNU Mailing List Management System
+Copyright (C) 1998-2008 by the Free Software Foundation, Inc.
+51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
+
+INTRODUCTION
+
+    This is GNU Mailman, a mailing list management system distributed under
+    the terms of the GNU General Public License (GPL).  The name of this
+    software is spelled "Mailman" with a leading capital `M' but with a lower
+    case second `m'.  Any other spelling is incorrect.
+
+    Mailman is written in Python, a free object-oriented scripting language.
+    Python is available for all platforms that Mailman is supported on, which
+    includes GNU/Linux and most other Unix-like operating systems
+    (e.g. Solaris, *BSD, MacOSX, etc.).  It does not run on Windows, although
+    web and mail clients on any platform should be able to interact with
+    Mailman just fine.
+
+    Mailman was originally developed by John Viega.  Subsequent development
+    (through version 1.0b3) was by Ken Manheimer.  Further work towards the
+    1.0 final release was a group effort, with the core contributors being:
+    Barry Warsaw, Ken Manheimer, Scott Cotton, Harald Meland, and John Viega.
+    Version 1.0 and beyond have been primarily maintained by Barry Warsaw with
+    contributions from many; see the ACKNOWLEDGMENTS file for details.  Jeremy
+    Hylton helped considerably with the Pipermail code in Mailman 2.0.
+    Mailman 2.1 is now being primarily maintained by Mark Sapiro and Tokio
+    Kikuchi.  Barry Warsaw is the lead developer on Mailman 3.
+
+    The Mailman home page is:
+
+        http://www.list.org
+
+    with mirrors at:
+
+        http://www.gnu.org/software/mailman
+        http://mailman.sf.net
+
+    You might also be interested in the Mailman wiki at:
+
+        http://wiki.list.org
+
+    Mailman 3.0 requires Python 2.5 or greater, which can be downloaded from:
+
+        http://www.python.org
+
+    It is recommended that you use at least Python 2.5.2, the latest release
+    as of this writing (31-Mar-2008).
+
+
+FEATURES
+
+    **Mailman 3.0 is alpha software and some of this information may be out of
+      date or not currently working.  This will improve as the alpha releases
+      are developed.**
+
+    Mailman has most of the standard features you'd expect in a mailing list
+    manager, and more:
+
+    - Web based list administration for nearly all tasks.  Web based
+      subscriptions and user configuration management.  A customizable "home
+      page" for each mailing list.
+
+    - Privacy features such as moderation, open and closed list subscription
+      policies, private membership rosters, and sender-based filters.
+
+    - Automatic web based archiving built-in with support for private and
+      public archives, and hooks for external archivers.
+
+    - Per-user configuration optional digest delivery for either
+      MIME-compliant or RFC 1153 style "plain text" digests.
+
+    - Integrated mail/Usenet gateways.
+
+    - Integrated auto-replies.
+
+    - Email commands.
+
+    - Integrated bounce detection within an extensible framework.
+
+    - Integrated spam detection, and MIME-based content filtering.
+
+    - An extensible mail delivery pipeline.
+
+    - Support for virtual domains.
+
+
+REQUIREMENTS
+
+    The default mail delivery mechanism uses a direct SMTP connection to
+    whatever mail transport agent you have running on port 25.  You can thus
+    use Mailman with any such MTA, however with certain MTAs (e.g. Exim and
+    Postfix), Mailman will support thru-the-web creation and removal of
+    mailing lists.
+
+    Mailman works with any web server that supports CGI/1.1.  The HTML it
+    generates should be friendly to most web browsers and network connections.
+
+    You will need root access on the machine hosting your Mailman installation
+    in order to complete some of the configuration steps.  See the INSTALL.txt
+    file for details.
+
+    Mailman's web and email user interface should be compatible with just
+    about any mail reader or web browser, although a mail reader that is MIME
+    aware will be a big help.  You do not need Java, JavaScript, or any other
+    fancy plugins.
+
+
+FOR MORE INFORMATION
+
+    For information on this alpha release, see docs/ALPHA.txt
+
+    More documentation is available in the docs directory, and on-line (see
+    below).  Installation instructions are contained in the
+    docs/readmes/INSTALL.txt file.  Upgrading information is available in the
+    docs/readmes/UPGRADING.txt file.  See the docs/NEWS.txt file for a list of
+    changes since version 0.9.
+
+    The online documentation can be found in
+
+        file:admin/www/index.html
+
+    in the directory in which you unpacked Mailman.
+
+    There is an online FAQ maintained by the Mailman community, which contains
+    a vast amount of information:
+
+        http://www.python.org/cgi-bin/faqw-mm.py
+
+    There is also a wiki for more community-driven information:
+
+        http://wiki.list.org
+
+    Chris Kolar has made a list owner-oriented manual available from
+    the following URL
+
+        http://www.imsa.edu/~ckolar/mailman/
+
+    There are also several mailing lists that can be used as resources
+    to help you get going with Mailman.
+
+    Mailman-Users
+        An list for users of Mailman, for posting questions or problems
+        related to installation, use, etc.  We'll try to keep the deep
+        technical discussions off this list.
+
+        http://mail.python.org/mailman/listinfo/mailman-users
+
+    Listowners
+        This mailing list with a non-technical focus, specifically for
+        discussions from the perspective of listowners and moderators who do
+        not have "shell access" to the mailing list server where the Mailman
+        software runs.
+
+        http://listowner.org
+
+    Mailman-Announce
+        A read-only list for release announcements an other important news.
+
+        http://mail.python.org/mailman/listinfo/mailman-announce
+
+    Mailman-Developers
+        A list for those of you interested in helping develop Mailman 2's
+        future direction.  This list will contain in-depth technical
+        discussions.
+
+        http://mail.python.org/mailman/listinfo/mailman-developers
+
+    Mailman3-Dev
+        Get involved now in the development of Mailman 3!
+
+        http://mail.python.org/mailman/listinfo/mailman3-dev
+
+    Mailman-I18N
+        A list for the discussion of the Mailman internationalization
+        effort.  Mailman 2.1 is fully multi-lingual.
+
+        http://mail.python.org/mailman/listinfo/mailman-i18n
+
+    Mailman-Checkins
+        A read-only list which is an adjunct to the public anonymous CVS
+        repository.  You can stay on the bleeding edge of Mailman development
+        by subscribing to this list.
+
+        http://mail.python.org/mailman/listinfo/mailman-checkins
+
+    The Mailman project is coordinated on SourceForge at
+
+        http://sf.net/projects/mailman
+
+    You should use SourceForge to report bugs and to upload patches.
+
+
+

+Local Variables:
+mode: indented-text
+indent-tabs-mode: nil
+End:

=== renamed file 'README.txt' => 'README.txt.moved'
=== added file 'TODO.txt'
--- TODO.txt	1970-01-01 00:00:00 +0000
+++ TODO.txt	2010-10-14 12:15:59 +0000
@@ -0,0 +1,15 @@
+This list is by no means complete.  I'm just using it to track short term
+things that I need to do.
+
+Get rid of PickleTypes
+Get rid of MailList class! (done for test suite!)
+Add tests for bin/newlist and bin/rmlist
+Add tests for plugins
+Rework MTA plugins and add tests
+Address XXX and FIXME
+Fix the roster creation cruft for mailing lists
+Suss out the IDomain stuff
+Remove Date: header from messagestore requirements (see list thread)
+Handle moderation flag (see Mailman.app.membership)
+Eradicate MailList.Lock() and friends.
+Eradicate MemberAdapter and friends.

=== added directory 'bin'
=== added file 'bin/clone_member'
--- bin/clone_member	1970-01-01 00:00:00 +0000
+++ bin/clone_member	2010-10-14 12:15:59 +0000
@@ -0,0 +1,219 @@
+#! @PYTHON@
+#
+# Copyright (C) 1998,1999,2000,2001,2002 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.
+
+"""Clone a member address.
+
+Cloning a member address means that a new member will be added who has all the
+same options and passwords as the original member address.  Note that this
+operation is fairly trusting of the user who runs it -- it does no
+verification to the new address, it does not send out a welcome message, etc.
+
+The existing member's subscription is usually not modified in any way.  If you
+want to remove the old address, use the -r flag.  If you also want to change
+any list admin addresses, use the -a flag.
+
+Usage:
+    clone_member [options] fromoldaddr tonewaddr
+
+Where:
+
+    --listname=listname
+    -l listname
+        Check and modify only the named mailing lists.  If -l is not given,
+        then all mailing lists are scanned from the address.  Multiple -l
+        options can be supplied.
+
+    --remove
+    -r
+        Remove the old address from the mailing list after it's been cloned.
+
+    --admin
+    -a
+        Scan the list admin addresses for the old address, and clone or change
+        them too.
+
+    --quiet
+    -q
+        Do the modifications quietly.
+
+    --nomodify
+    -n
+        Print what would be done, but don't actually do it.  Inhibits the
+        --quiet flag.
+
+    --help
+    -h
+        Print this help message and exit.
+
+ fromoldaddr (`from old address') is the old address of the user.  tonewaddr
+ (`to new address') is the new address of the user.
+
+"""
+
+import sys
+import getopt
+
+import paths
+from Mailman import MailList
+from Mailman import Utils
+from Mailman import Errors
+from Mailman.i18n import _
+
+
+

+def usage(code, msg=''):
+    if code:
+        fd = sys.stderr
+    else:
+        fd = sys.stdout
+    print >> fd, _(__doc__)
+    if msg:
+        print >> fd, msg
+    sys.exit(code)
+
+
+

+def dolist(mlist, options):
+    SPACE = ' '
+    if not options.quiet:
+        print _('processing mailing list:'), mlist.internal_name()
+
+    # scan the list owners.  TBD: mlist.owner keys should be lowercase?
+    oldowners = mlist.owner[:]
+    oldowners.sort()
+    if options.admintoo:
+        if not options.quiet:
+            print _('    scanning list owners:'), SPACE.join(oldowners)
+        newowners = {}
+        foundp = 0
+        for owner in mlist.owner:
+            if options.lfromaddr == owner.lower():
+                foundp = 1
+                if options.remove:
+                    continue
+            newowners[owner] = 1
+        if foundp:
+            newowners[options.toaddr] = 1 
+        newowners = newowners.keys()
+        newowners.sort()
+        if options.modify:
+            mlist.owner = newowners
+        if not options.quiet:
+            if newowners <> oldowners:
+                print
+                print _('    new list owners:'), SPACE.join(newowners)
+            else:
+                print _('(no change)')
+
+    # see if the fromaddr is a digest member or regular member
+    if options.lfromaddr in mlist.getDigestMemberKeys():
+        digest = 1
+    elif options.lfromaddr in mlist.getRegularMemberKeys():
+        digest = 0
+    else:
+        if not options.quiet:
+            print _('    address not found:'), options.fromaddr
+        return
+
+    # Now change the membership address
+    try:
+        if options.modify:
+            mlist.changeMemberAddress(options.fromaddr, options.toaddr,
+                                      not options.remove)
+        if not options.quiet:
+            print _('    clone address added:'), options.toaddr
+    except Errors.MMAlreadyAMember:
+        if not options.quiet:
+            print _('    clone address is already a member:'), options.toaddr
+
+    if options.remove:
+        print _('    original address removed:'), options.fromaddr
+
+
+

+def main():
+    # default options
+    class Options:
+        listnames = None
+        remove = 0
+        admintoo = 0
+        quiet = 0
+        modify = 1
+
+    # scan sysargs
+    try:
+        opts, args = getopt.getopt(
+            sys.argv[1:], 'arl:qnh',
+            ['admin', 'remove', 'listname=', 'quiet', 'nomodify', 'help'])
+    except getopt.error, msg:
+        usage(1, msg)
+
+    options = Options()
+    for opt, arg in opts:
+        if opt in ('-h', '--help'):
+            usage(0)
+        elif opt in ('-q', '--quiet'):
+            options.quiet = 1
+        elif opt in ('-n', '--nomodify'):
+            options.modify = 0
+        elif opt in ('-a', '--admin'):
+            options.admintoo = 1
+        elif opt in ('-r', '--remove'):
+            options.remove = 1
+        elif opt in ('-l', '--listname'):
+            if options.listnames is None:
+                options.listnames = []
+            options.listnames.append(arg.lower())
+
+    # further options and argument processing
+    if not options.modify:
+        options.quiet = 0
+
+    if len(args) <> 2:
+        usage(1)
+    fromaddr = args[0]
+    toaddr = args[1]
+        
+    # validate and normalize the target address
+    try:
+        Utils.ValidateEmail(toaddr)
+    except Errors.EmailAddressError:
+        usage(1, _('Not a valid email address: %(toaddr)s'))
+    lfromaddr = fromaddr.lower()
+    options.toaddr = toaddr
+    options.fromaddr = fromaddr
+    options.lfromaddr = lfromaddr
+
+    if options.listnames is None:
+        options.listnames = Utils.list_names()
+
+    for listname in options.listnames:
+        try:
+            mlist = MailList.MailList(listname)
+        except Errors.MMListError, e:
+            print _('Error opening list "%(listname)s", skipping.\n%(e)s')
+            continue
+        try:
+            dolist(mlist, options)
+        finally:
+            mlist.Save()
+            mlist.Unlock()
+
+

+if __name__ == '__main__':
+    main()

=== added file 'bin/discard'
--- bin/discard	1970-01-01 00:00:00 +0000
+++ bin/discard	2010-10-14 12:15:59 +0000
@@ -0,0 +1,120 @@
+#! @PYTHON@
+#
+# Copyright (C) 2003 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.
+
+"""Discard held messages.
+
+Usage:
+    discard [options] file ...
+
+Options:
+    --help / -h
+        Print this help message and exit.
+
+    --quiet / -q
+        Don't print status messages.
+"""
+
+# TODO: add command line arguments for specifying other actions than DISCARD,
+# and also for specifying other __handlepost() arguments, i.e. comment,
+# preserve, forward, addr
+
+import os
+import re
+import sys
+import getopt
+
+import paths
+from Mailman import mm_cfg
+from Mailman.MailList import MailList
+from Mailman.i18n import _
+
+try:
+    True, False
+except NameError:
+    True = 1
+    False = 0
+
+cre = re.compile(r'heldmsg-(?P<listname>.*)-(?P<id>[0-9]+)\.(pck|txt)$')
+
+
+

+def usage(code, msg=''):
+    if code:
+        fd = sys.stderr
+    else:
+        fd = sys.stdout
+    print >> fd, _(__doc__)
+    if msg:
+        print >> fd, msg
+    sys.exit(code)
+
+
+

+def main():
+    try:
+        opts, args = getopt.getopt(sys.argv[1:], 'hq', ['help', 'quiet'])
+    except getopt.error, msg:
+        usage(1, msg)
+
+    quiet = False
+    for opt, arg in opts:
+        if opt in ('-h', '--help'):
+            usage(0)
+        elif opt in ('-q', '--quiet'):
+            quiet = True
+
+    files = args
+    if not files:
+        print _('Nothing to do.')
+
+    # Mapping from listnames to sequence of request ids
+    discards = {}
+
+    # Cruise through all the named files, collating by mailing list.  We'll
+    # lock the list once, process all holds for that list and move on.
+    for f in files:
+        basename = os.path.basename(f)
+        mo = cre.match(basename)
+        if not mo:
+            print >> sys.stderr, _('Ignoring non-held message: %(f)s')
+            continue
+        listname, id = mo.group('listname', 'id')
+        try:
+            id = int(id)
+        except (ValueError, TypeError):
+            print >> sys.stderr, _('Ignoring held msg w/bad id: %(f)s')
+            continue
+        discards.setdefault(listname, []).append(id)
+
+    # Now do the discards
+    for listname, ids in discards.items():
+        mlist = MailList(listname)
+        try:
+            for id in ids:
+                # No comment, no preserve, no forward, no forwarding address
+                mlist.HandleRequest(id, mm_cfg.DISCARD, '', False, False, '')
+                if not quiet:
+                    print _('Discarded held msg #%(id)s for list %(listname)s')
+            mlist.Save()
+        finally:
+            mlist.Unlock()
+
+
+

+if __name__ == '__main__':
+    main()

=== added file 'bin/fix_url.py'
--- bin/fix_url.py	1970-01-01 00:00:00 +0000
+++ bin/fix_url.py	2010-10-14 12:15:59 +0000
@@ -0,0 +1,93 @@
+#! @PYTHON@
+#
+# Copyright (C) 2001-2007 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.
+
+"""Reset a list's web_page_url attribute to the default setting.
+
+This script is intended to be run as a bin/withlist script, i.e.
+
+% bin/withlist -l -r fix_url listname [options]
+
+Options:
+    -u urlhost
+    --urlhost=urlhost
+        Look up urlhost in the virtual host table and set the web_page_url and
+        host_name attributes of the list to the values found.  This
+        essentially moves the list from one virtual domain to another.
+
+        Without this option, the default web_page_url and host_name values are
+        used.
+
+    -v / --verbose
+        Print what the script is doing.
+
+If run standalone, it prints this help text and exits.
+"""
+
+import sys
+import getopt
+
+import paths
+from Mailman.configuration import config
+from Mailman.i18n import _
+
+
+

+def usage(code, msg=''):
+    print _(__doc__.replace('%', '%%'))
+    if msg:
+        print msg
+    sys.exit(code)
+
+
+

+def fix_url(mlist, *args):
+    try:
+        opts, args = getopt.getopt(args, 'u:v', ['urlhost=', 'verbose'])
+    except getopt.error, msg:
+        usage(1, msg)
+
+    verbose = 0
+    urlhost = mailhost = None
+    for opt, arg in opts:
+        if opt in ('-u', '--urlhost'):
+            urlhost = arg
+        elif opt in ('-v', '--verbose'):
+            verbose = 1
+
+    if urlhost:
+        web_page_url = config.DEFAULT_URL_PATTERN % urlhost
+        mailhost = config.VIRTUAL_HOSTS.get(urlhost.lower(), urlhost)
+    else:
+        web_page_url = config.DEFAULT_URL_PATTERN % config.DEFAULT_URL_HOST
+        mailhost = config.DEFAULT_EMAIL_HOST
+
+    if verbose:
+        print _('Setting web_page_url to: %(web_page_url)s')
+    mlist.web_page_url = web_page_url
+    if verbose:
+        print _('Setting host_name to: %(mailhost)s')
+    mlist.host_name = mailhost
+    print _('Saving list')
+    mlist.Save()
+    mlist.Unlock()
+
+
+

+if __name__ == '__main__':
+    usage(0)

=== added file 'bin/list_admins'
--- bin/list_admins	1970-01-01 00:00:00 +0000
+++ bin/list_admins	2010-10-14 12:15:59 +0000
@@ -0,0 +1,101 @@
+#! @PYTHON@
+#
+# Copyright (C) 2001,2002 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.
+
+"""List all the owners of a mailing list.
+
+Usage: %(program)s [options] listname ...
+
+Where:
+
+    --all-vhost=vhost
+    -v=vhost
+        List the owners of all the mailing lists for the given virtual host.
+
+    --all
+    -a
+        List the owners of all the mailing lists on this system.
+
+    --help
+    -h
+        Print this help message and exit.
+
+`listname' is the name of the mailing list to print the owners of.  You can
+have more than one named list on the command line.
+"""
+
+import sys
+import getopt
+
+import paths
+from Mailman import MailList, Utils
+from Mailman import Errors
+from Mailman.i18n import _
+
+COMMASPACE = ', '
+
+program = sys.argv[0]
+
+
+

+def usage(code, msg=''):
+    if code:
+        fd = sys.stderr
+    else:
+        fd = sys.stdout
+    print >> fd, _(__doc__)
+    if msg:
+        print >> fd, msg
+    sys.exit(code)
+
+
+

+def main():
+    try:
+        opts, args = getopt.getopt(sys.argv[1:], 'hv:a',
+                                   ['help', 'all-vhost=', 'all'])
+    except getopt.error, msg:
+        usage(1, msg)
+
+    listnames = args
+    vhost = None
+    for opt, arg in opts:
+        if opt in ('-h', '--help'):
+            usage(0)
+        elif opt in ('-a', '--all'):
+            listnames = Utils.list_names()
+        elif opt in ('-v', '--all-vhost'):
+            listnames = Utils.list_names()
+            vhost = arg
+
+    for listname in listnames:
+       try:
+           mlist = MailList.MailList(listname, lock=0)
+       except Errors.MMListError, e:
+           print _('No such list: %(listname)s')
+           continue
+
+       if vhost and vhost <> mlist.host_name:
+           continue
+
+       owners = COMMASPACE.join(mlist.owner)
+       print _('List: %(listname)s, \tOwners: %(owners)s')
+
+
+

+if __name__ == '__main__':
+    main()

=== added file 'bin/msgfmt.py'
--- bin/msgfmt.py	1970-01-01 00:00:00 +0000
+++ bin/msgfmt.py	2010-10-14 12:15:59 +0000
@@ -0,0 +1,203 @@
+#! /usr/bin/env python
+# -*- coding: iso-8859-1 -*-
+# Written by Martin v. Löwis <[e-mail]>
+
+"""Generate binary message catalog from textual translation description.
+
+This program converts a textual Uniforum-style message catalog (.po file) into
+a binary GNU catalog (.mo file).  This is essentially the same function as the
+GNU msgfmt program, however, it is a simpler implementation.
+
+Usage: msgfmt.py [OPTIONS] filename.po
+
+Options:
+    -o file
+    --output-file=file
+        Specify the output file to write to.  If omitted, output will go to a
+        file named filename.mo (based off the input file name).
+
+    -h
+    --help
+        Print this message and exit.
+
+    -V
+    --version
+        Display version information and exit.
+"""
+
+import sys
+import os
+import getopt
+import struct
+import array
+
+__version__ = "1.1"
+
+MESSAGES = {}
+
+
+

+def usage(code, msg=''):
+    print >> sys.stderr, __doc__
+    if msg:
+        print >> sys.stderr, msg
+    sys.exit(code)
+
+
+

+def add(id, str, fuzzy):
+    "Add a non-fuzzy translation to the dictionary."
+    global MESSAGES
+    if not fuzzy and str:
+        MESSAGES[id] = str
+
+
+

+def generate():
+    "Return the generated output."
+    global MESSAGES
+    keys = MESSAGES.keys()
+    # the keys are sorted in the .mo file
+    keys.sort()
+    offsets = []
+    ids = strs = ''
+    for id in keys:
+        # For each string, we need size and file offset.  Each string is NUL
+        # terminated; the NUL does not count into the size.
+        offsets.append((len(ids), len(id), len(strs), len(MESSAGES[id])))
+        ids += id + '\0'
+        strs += MESSAGES[id] + '\0'
+    output = ''
+    # The header is 7 32-bit unsigned integers.  We don't use hash tables, so
+    # the keys start right after the index tables.
+    # translated string.
+    keystart = 7*4+16*len(keys)
+    # and the values start after the keys
+    valuestart = keystart + len(ids)
+    koffsets = []
+    voffsets = []
+    # The string table first has the list of keys, then the list of values.
+    # Each entry has first the size of the string, then the file offset.
+    for o1, l1, o2, l2 in offsets:
+        koffsets += [l1, o1+keystart]
+        voffsets += [l2, o2+valuestart]
+    offsets = koffsets + voffsets
+    output = struct.pack("Iiiiiii",
+                         0x950412deL,       # Magic
+                         0,                 # Version
+                         len(keys),         # # of entries
+                         7*4,               # start of key index
+                         7*4+len(keys)*8,   # start of value index
+                         0, 0)              # size and offset of hash table
+    output += array.array("i", offsets).tostring()
+    output += ids
+    output += strs
+    return output
+
+
+

+def make(filename, outfile):
+    ID = 1
+    STR = 2
+
+    # Compute .mo name from .po name and arguments
+    if filename.endswith('.po'):
+        infile = filename
+    else:
+        infile = filename + '.po'
+    if outfile is None:
+        outfile = os.path.splitext(infile)[0] + '.mo'
+
+    try:
+        lines = open(infile).readlines()
+    except IOError, msg:
+        print >> sys.stderr, msg
+        sys.exit(1)
+    
+    section = None
+    fuzzy = 0
+
+    # Parse the catalog
+    lno = 0
+    for l in lines:
+        lno += 1
+        # If we get a comment line after a msgstr, this is a new entry
+        if l[0] == '#' and section == STR:
+            add(msgid, msgstr, fuzzy)
+            section = None
+            fuzzy = 0
+        # Record a fuzzy mark
+        if l[:2] == '#,' and l.find('fuzzy'):
+            fuzzy = 1
+        # Skip comments
+        if l[0] == '#':
+            continue
+        # Now we are in a msgid section, output previous section
+        if l.startswith('msgid'):
+            if section == STR:
+                add(msgid, msgstr, fuzzy)
+            section = ID
+            l = l[5:]
+            msgid = msgstr = ''
+        # Now we are in a msgstr section
+        elif l.startswith('msgstr'):
+            section = STR
+            l = l[6:]
+        # Skip empty lines
+        l = l.strip()
+        if not l:
+            continue
+        # XXX: Does this always follow Python escape semantics?
+        l = eval(l)
+        if section == ID:
+            msgid += l
+        elif section == STR:
+            msgstr += l
+        else:
+            print >> sys.stderr, 'Syntax error on %s:%d' % (infile, lno), \
+                  'before:'
+            print >> sys.stderr, l
+            sys.exit(1)
+    # Add last entry
+    if section == STR:
+        add(msgid, msgstr, fuzzy)
+
+    # Compute output
+    output = generate()
+
+    try:
+        open(outfile,"wb").write(output)
+    except IOError,msg:
+        print >> sys.stderr, msg
+                      
+
+

+def main():
+    try:
+        opts, args = getopt.getopt(sys.argv[1:], 'hVo:',
+                                   ['help', 'version', 'output-file='])
+    except getopt.error, msg:
+        usage(1, msg)
+
+    outfile = None
+    # parse options
+    for opt, arg in opts:
+        if opt in ('-h', '--help'):
+            usage(0)
+        elif opt in ('-V', '--version'):
+            print >> sys.stderr, "msgfmt.py", __version__
+            sys.exit(0)
+        elif opt in ('-o', '--output-file'):
+            outfile = arg
+    # do it
+    if not args:
+        print >> sys.stderr, 'No input file given'
+        print >> sys.stderr, "Try `msgfmt --help' for more information."
+        return
+
+    for filename in args:
+        make(filename, outfile)
+
+
+if __name__ == '__main__':
+    main()

=== added file 'bin/po2templ.py'
--- bin/po2templ.py	1970-01-01 00:00:00 +0000
+++ bin/po2templ.py	2010-10-14 12:15:59 +0000
@@ -0,0 +1,90 @@
+#! @PYTHON@
+#
+# Copyright (C) 2005-2007 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.
+
+# Author: Tokio Kikuchi <[e-mail]>
+
+
+"""po2templ.py
+
+Extract templates from language po file.
+
+Usage: po2templ.py languages
+"""
+
+import re
+import sys
+
+cre = re.compile('^#:\s*templates/en/(?P<filename>.*?):1')
+
+
+

+def do_lang(lang):
+    in_template = False
+    in_msg = False
+    msgstr = ''
+    fp = file('messages/%s/LC_MESSAGES/mailman.po' % lang)
+    try:
+        for line in fp:
+            m = cre.search(line)
+            if m:
+                in_template = True
+                in_msg = False
+                filename = m.group('filename')
+                outfilename = 'templates/%s/%s' % (lang, filename)
+                continue
+            if in_template and line.startswith('#,'):
+                if line.strip() == '#, fuzzy':
+                    in_template = False
+                continue
+            if in_template and line.startswith('msgstr'):
+                line = line[7:]
+                in_msg = True
+            if in_msg:
+                if not line.strip():
+                    in_template = False
+                    in_msg = False
+                    if len(msgstr) > 1 and outfilename:
+                        # exclude no translation ... 1 is for LF only
+                        outfile = file(outfilename, 'w')
+                        try:
+                            outfile.write(msgstr)
+                            outfile.write('\n')
+                        finally:
+                            outfile.close()
+                    outfilename = ''
+                    msgstr = ''
+                    continue
+                msgstr += eval(line)
+    finally:
+        fp.close()
+    if len(msgstr) > 1 and outfilename:
+        # flush remaining msgstr (last template file)
+        outfile = file(outfilename, 'w')
+        try:
+            outfile.write(msgstr)
+            outfile.write('\n')
+        finally:
+            outfile.close()
+
+
+

+if __name__ == '__main__':
+    langs = sys.argv[1:]
+    for lang in langs:
+        do_lang(lang)

=== added file 'bin/pygettext.py'
--- bin/pygettext.py	1970-01-01 00:00:00 +0000
+++ bin/pygettext.py	2010-10-14 12:15:59 +0000
@@ -0,0 +1,545 @@
+#! @PYTHON@
+# Originally written by Barry Warsaw <[e-mail]>
+#
+# Minimally patched to make it even more xgettext compatible 
+# by Peter Funk <[e-mail]>
+
+"""pygettext -- Python equivalent of xgettext(1)
+
+Many systems (Solaris, Linux, Gnu) provide extensive tools that ease the
+internationalization of C programs.  Most of these tools are independent of
+the programming language and can be used from within Python programs.  Martin
+von Loewis' work[1] helps considerably in this regard.
+
+There's one problem though; xgettext is the program that scans source code
+looking for message strings, but it groks only C (or C++).  Python introduces
+a few wrinkles, such as dual quoting characters, triple quoted strings, and
+raw strings.  xgettext understands none of this.
+
+Enter pygettext, which uses Python's standard tokenize module to scan Python
+source code, generating .pot files identical to what GNU xgettext[2] generates
+for C and C++ code.  From there, the standard GNU tools can be used.
+
+A word about marking Python strings as candidates for translation.  GNU
+xgettext recognizes the following keywords: gettext, dgettext, dcgettext, and
+gettext_noop.  But those can be a lot of text to include all over your code.
+C and C++ have a trick: they use the C preprocessor.  Most internationalized C
+source includes a #define for gettext() to _() so that what has to be written
+in the source is much less.  Thus these are both translatable strings:
+
+    gettext("Translatable String")
+    _("Translatable String")
+
+Python of course has no preprocessor so this doesn't work so well.  Thus,
+pygettext searches only for _() by default, but see the -k/--keyword flag
+below for how to augment this.
+
+ [1] http://www.python.org/workshops/1997-10/proceedings/loewis.html
+ [2] http://www.gnu.org/software/gettext/gettext.html
+
+NOTE: pygettext attempts to be option and feature compatible with GNU xgettext
+where ever possible.  However some options are still missing or are not fully
+implemented.  Also, xgettext's use of command line switches with option
+arguments is broken, and in these cases, pygettext just defines additional
+switches.
+
+Usage: pygettext [options] inputfile ...
+
+Options:
+
+    -a
+    --extract-all
+        Extract all strings.
+
+    -d name
+    --default-domain=name
+        Rename the default output file from messages.pot to name.pot.
+
+    -E
+    --escape
+        Replace non-ASCII characters with octal escape sequences.
+
+    -D
+    --docstrings
+        Extract module, class, method, and function docstrings.  These do not
+        need to be wrapped in _() markers, and in fact cannot be for Python to
+        consider them docstrings. (See also the -X option).
+
+    -h
+    --help
+        Print this help message and exit.
+
+    -k word
+    --keyword=word
+        Keywords to look for in addition to the default set, which are:
+        %(DEFAULTKEYWORDS)s
+
+        You can have multiple -k flags on the command line.
+
+    -K
+    --no-default-keywords
+        Disable the default set of keywords (see above).  Any keywords
+        explicitly added with the -k/--keyword option are still recognized.
+
+    --no-location
+        Do not write filename/lineno location comments.
+
+    -n
+    --add-location
+        Write filename/lineno location comments indicating where each
+        extracted string is found in the source.  These lines appear before
+        each msgid.  The style of comments is controlled by the -S/--style
+        option.  This is the default.
+
+    -o filename
+    --output=filename
+        Rename the default output file from messages.pot to filename.  If
+        filename is `-' then the output is sent to standard out.
+
+    -p dir
+    --output-dir=dir
+        Output files will be placed in directory dir.
+
+    -S stylename
+    --style stylename
+        Specify which style to use for location comments.  Two styles are
+        supported:
+
+        Solaris  # File: filename, line: line-number
+        GNU      #: filename:line
+
+        The style name is case insensitive.  GNU style is the default.
+
+    -v
+    --verbose
+        Print the names of the files being processed.
+
+    -V
+    --version
+        Print the version of pygettext and exit.
+
+    -w columns
+    --width=columns
+        Set width of output to columns.
+
+    -x filename
+    --exclude-file=filename
+        Specify a file that contains a list of strings that are not be
+        extracted from the input files.  Each string to be excluded must
+        appear on a line by itself in the file.
+
+    -X filename
+    --no-docstrings=filename
+        Specify a file that contains a list of files (one per line) that
+        should not have their docstrings extracted.  This is only useful in
+        conjunction with the -D option above.
+
+If `inputfile' is -, standard input is read.
+"""
+
+import os
+import sys
+import time
+import getopt
+import tokenize
+import operator
+
+# for selftesting
+try:
+    import fintl
+    _ = fintl.gettext
+except ImportError:
+    def _(s): return s
+
+__version__ = '1.4'
+
+default_keywords = ['_']
+DEFAULTKEYWORDS = ', '.join(default_keywords)
+
+EMPTYSTRING = ''
+
+
+

+# The normal pot-file header. msgmerge and Emacs's po-mode work better if it's
+# there.
+pot_header = _('''\
+# SOME DESCRIPTIVE TITLE.
+# Copyright (C) YEAR ORGANIZATION
+# FIRST AUTHOR <EMAIL@ADDRESS>, YEAR.
+#
+msgid ""
+msgstr ""
+"Project-Id-Version: PACKAGE VERSION\\n"
+"POT-Creation-Date: %(time)s\\n"
+"PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\\n"
+"Last-Translator: FULL NAME <EMAIL@ADDRESS>\\n"
+"Language-Team: LANGUAGE <[e-mail]>\\n"
+"MIME-Version: 1.0\\n"
+"Content-Type: text/plain; charset=CHARSET\\n"
+"Content-Transfer-Encoding: ENCODING\\n"
+"Generated-By: pygettext.py %(version)s\\n"
+
+''')
+
+

+def usage(code, msg=''):
+    if code:
+        fd = sys.stderr
+    else:
+        fd = sys.stdout
+    print >> fd, _(__doc__) % globals()
+    if msg:
+        print >> fd, msg
+    sys.exit(code)
+
+
+

+escapes = []
+
+def make_escapes(pass_iso8859):
+    global escapes
+    if pass_iso8859:
+        # Allow iso-8859 characters to pass through so that e.g. 'msgid
+        # "H[o-umlaut]he"' would result not result in 'msgid "H\366he"'.
+        # Otherwise we escape any character outside the 32..126 range.
+        mod = 128
+    else:
+        mod = 256
+    for i in range(256):
+        if 32 <= (i % mod) <= 126:
+            escapes.append(chr(i))
+        else:
+            escapes.append("\\%03o" % i)
+    escapes[ord('\\')] = '\\\\'
+    escapes[ord('\t')] = '\\t'
+    escapes[ord('\r')] = '\\r'
+    escapes[ord('\n')] = '\\n'
+    escapes[ord('\"')] = '\\"'
+
+
+def escape(s):
+    global escapes
+    s = list(s)
+    for i in range(len(s)):
+        s[i] = escapes[ord(s[i])]
+    return EMPTYSTRING.join(s)
+
+
+def safe_eval(s):
+    # unwrap quotes, safely
+    return eval(s, {'__builtins__':{}}, {})
+
+
+def normalize(s):
+    # This converts the various Python string types into a format that is
+    # appropriate for .po files, namely much closer to C style.
+    lines = s.split('\n')
+    if len(lines) == 1:
+        s = '"' + escape(s) + '"'
+    else:
+        if not lines[-1]:
+            del lines[-1]
+            lines[-1] = lines[-1] + '\n'
+        for i in range(len(lines)):
+            lines[i] = escape(lines[i])
+        lineterm = '\\n"\n"'
+        s = '""\n"' + lineterm.join(lines) + '"'
+    return s
+
+
+

+class TokenEater:
+    def __init__(self, options):
+        self.__options = options
+        self.__messages = {}
+        self.__state = self.__waiting
+        self.__data = []
+        self.__lineno = -1
+        self.__freshmodule = 1
+        self.__curfile = None
+
+    def __call__(self, ttype, tstring, stup, etup, line):
+        # dispatch
+##        import token
+##        print >> sys.stderr, 'ttype:', token.tok_name[ttype], \
+##              'tstring:', tstring
+        self.__state(ttype, tstring, stup[0])
+
+    def __waiting(self, ttype, tstring, lineno):
+        opts = self.__options
+        # Do docstring extractions, if enabled
+        if opts.docstrings and not opts.nodocstrings.get(self.__curfile):
+            # module docstring?
+            if self.__freshmodule:
+                if ttype == tokenize.STRING:
+                    self.__addentry(safe_eval(tstring), lineno, isdocstring=1)
+                    self.__freshmodule = 0
+                elif ttype not in (tokenize.COMMENT, tokenize.NL):
+                    self.__freshmodule = 0
+                return
+            # class docstring?
+            if ttype == tokenize.NAME and tstring in ('class', 'def'):
+                self.__state = self.__suiteseen
+                return
+        if ttype == tokenize.NAME and tstring in opts.keywords:
+            self.__state = self.__keywordseen
+
+    def __suiteseen(self, ttype, tstring, lineno):
+        # ignore anything until we see the colon
+        if ttype == tokenize.OP and tstring == ':':
+            self.__state = self.__suitedocstring
+
+    def __suitedocstring(self, ttype, tstring, lineno):
+        # ignore any intervening noise
+        if ttype == tokenize.STRING:
+            self.__addentry(safe_eval(tstring), lineno, isdocstring=1)
+            self.__state = self.__waiting
+        elif ttype not in (tokenize.NEWLINE, tokenize.INDENT,
+                           tokenize.COMMENT):
+            # there was no class docstring
+            self.__state = self.__waiting
+
+    def __keywordseen(self, ttype, tstring, lineno):
+        if ttype == tokenize.OP and tstring == '(':
+            self.__data = []
+            self.__lineno = lineno
+            self.__state = self.__openseen
+        else:
+            self.__state = self.__waiting
+
+    def __openseen(self, ttype, tstring, lineno):
+        if ttype == tokenize.OP and tstring == ')':
+            # We've seen the last of the translatable strings.  Record the
+            # line number of the first line of the strings and update the list 
+            # of messages seen.  Reset state for the next batch.  If there
+            # were no strings inside _(), then just ignore this entry.
+            if self.__data:
+                self.__addentry(EMPTYSTRING.join(self.__data))
+            self.__state = self.__waiting
+        elif ttype == tokenize.STRING:
+            self.__data.append(safe_eval(tstring))
+        # TBD: should we warn if we seen anything else?
+
+    def __addentry(self, msg, lineno=None, isdocstring=0):
+        if lineno is None:
+            lineno = self.__lineno
+        if not msg in self.__options.toexclude:
+            entry = (self.__curfile, lineno)
+            self.__messages.setdefault(msg, {})[entry] = isdocstring
+
+    def set_filename(self, filename):
+        self.__curfile = filename
+        self.__freshmodule = 1
+
+    def write(self, fp):
+        options = self.__options
+        timestamp = time.ctime(time.time())
+        # The time stamp in the header doesn't have the same format as that
+        # generated by xgettext...
+        print >> fp, pot_header % {'time': timestamp, 'version': __version__}
+        # Sort the entries.  First sort each particular entry's keys, then
+        # sort all the entries by their first item.
+        reverse = {}
+        for k, v in self.__messages.items():
+            keys = v.keys()
+            keys.sort()
+            reverse.setdefault(tuple(keys), []).append((k, v))
+        rkeys = reverse.keys()
+        rkeys.sort()
+        for rkey in rkeys:
+            rentries = reverse[rkey]
+            rentries.sort()
+            for k, v in rentries:
+                isdocstring = 0
+                # If the entry was gleaned out of a docstring, then add a
+                # comment stating so.  This is to aid translators who may wish
+                # to skip translating some unimportant docstrings.
+                if reduce(operator.__add__, v.values()):
+                    isdocstring = 1
+                # k is the message string, v is a dictionary-set of (filename,
+                # lineno) tuples.  We want to sort the entries in v first by
+                # file name and then by line number.
+                v = v.keys()
+                v.sort()
+                if not options.writelocations:
+                    pass
+                # location comments are different b/w Solaris and GNU:
+                elif options.locationstyle == options.SOLARIS:
+                    for filename, lineno in v:
+                        d = {'filename': filename, 'lineno': lineno}
+                        print >>fp, _(
+                            '# File: %(filename)s, line: %(lineno)d') % d
+                elif options.locationstyle == options.GNU:
+                    # fit as many locations on one line, as long as the
+                    # resulting line length doesn't exceeds 'options.width'
+                    locline = '#:'
+                    for filename, lineno in v:
+                        d = {'filename': filename, 'lineno': lineno}
+                        s = _(' %(filename)s:%(lineno)d') % d
+                        if len(locline) + len(s) <= options.width:
+                            locline = locline + s
+                        else:
+                            print >> fp, locline
+                            locline = "#:" + s
+                    if len(locline) > 2:
+                        print >> fp, locline
+                if isdocstring:
+                    print >> fp, '#, docstring'
+                print >> fp, 'msgid', normalize(k)
+                print >> fp, 'msgstr ""\n'
+
+
+

+def main():
+    global default_keywords
+    try:
+        opts, args = getopt.getopt(
+            sys.argv[1:],
+            'ad:DEhk:Kno:p:S:Vvw:x:X:',
+            ['extract-all', 'default-domain=', 'escape', 'help',
+             'keyword=', 'no-default-keywords',
+             'add-location', 'no-location', 'output=', 'output-dir=',
+             'style=', 'verbose', 'version', 'width=', 'exclude-file=',
+             'docstrings', 'no-docstrings',
+             ])
+    except getopt.error, msg:
+        usage(1, msg)
+
+    # for holding option values
+    class Options:
+        # constants
+        GNU = 1
+        SOLARIS = 2
+        # defaults
+        extractall = 0 # FIXME: currently this option has no effect at all.
+        escape = 0
+        keywords = []
+        outpath = ''
+        outfile = 'messages.pot'
+        writelocations = 1
+        locationstyle = GNU
+        verbose = 0
+        width = 78
+        excludefilename = ''
+        docstrings = 0
+        nodocstrings = {}
+
+    options = Options()
+    locations = {'gnu' : options.GNU,
+                 'solaris' : options.SOLARIS,
+                 }
+
+    # parse options
+    for opt, arg in opts:
+        if opt in ('-h', '--help'):
+            usage(0)
+        elif opt in ('-a', '--extract-all'):
+            options.extractall = 1
+        elif opt in ('-d', '--default-domain'):
+            options.outfile = arg + '.pot'
+        elif opt in ('-E', '--escape'):
+            options.escape = 1
+        elif opt in ('-D', '--docstrings'):
+            options.docstrings = 1
+        elif opt in ('-k', '--keyword'):
+            options.keywords.append(arg)
+        elif opt in ('-K', '--no-default-keywords'):
+            default_keywords = []
+        elif opt in ('-n', '--add-location'):
+            options.writelocations = 1
+        elif opt in ('--no-location',):
+            options.writelocations = 0
+        elif opt in ('-S', '--style'):
+            options.locationstyle = locations.get(arg.lower())
+            if options.locationstyle is None:
+                usage(1, _('Invalid value for --style: %s') % arg)
+        elif opt in ('-o', '--output'):
+            options.outfile = arg
+        elif opt in ('-p', '--output-dir'):
+            options.outpath = arg
+        elif opt in ('-v', '--verbose'):
+            options.verbose = 1
+        elif opt in ('-V', '--version'):
+            print _('pygettext.py (xgettext for Python) %s') % __version__
+            sys.exit(0)
+        elif opt in ('-w', '--width'):
+            try:
+                options.width = int(arg)
+            except ValueError:
+                usage(1, _('--width argument must be an integer: %s') % arg)
+        elif opt in ('-x', '--exclude-file'):
+            options.excludefilename = arg
+        elif opt in ('-X', '--no-docstrings'):
+            fp = open(arg)
+            try:
+                while 1:
+                    line = fp.readline()
+                    if not line:
+                        break
+                    options.nodocstrings[line[:-1]] = 1
+            finally:
+                fp.close()
+
+    # calculate escapes
+    make_escapes(options.escape)
+
+    # calculate all keywords
+    options.keywords.extend(default_keywords)
+
+    # initialize list of strings to exclude
+    if options.excludefilename:
+        try:
+            fp = open(options.excludefilename)
+            options.toexclude = fp.readlines()
+            fp.close()
+        except IOError:
+            print >> sys.stderr, _(
+                "Can't read --exclude-file: %s") % options.excludefilename
+            sys.exit(1)
+    else:
+        options.toexclude = []
+
+    # slurp through all the files
+    eater = TokenEater(options)
+    for filename in args:
+        if filename == '-':
+            if options.verbose:
+                print _('Reading standard input')
+            fp = sys.stdin
+            closep = 0
+        else:
+            if options.verbose:
+                print _('Working on %s') % filename
+            fp = open(filename)
+            closep = 1
+        try:
+            eater.set_filename(filename)
+            try:
+                tokenize.tokenize(fp.readline, eater)
+            except tokenize.TokenError, e:
+                print >> sys.stderr, '%s: %s, line %d, column %d' % (
+                    e[0], filename, e[1][0], e[1][1])
+        finally:
+            if closep:
+                fp.close()
+
+    # write the output
+    if options.outfile == '-':
+        fp = sys.stdout
+        closep = 0
+    else:
+        if options.outpath:
+            options.outfile = os.path.join(options.outpath, options.outfile)
+        fp = open(options.outfile, 'w')
+        closep = 1
+    try:
+        eater.write(fp)
+    finally:
+        if closep:
+            fp.close()
+
+

+if __name__ == '__main__':
+    main()
+    # some more test strings
+    _(u'a unicode string')

=== added file 'bin/remove_members'
--- bin/remove_members	1970-01-01 00:00:00 +0000
+++ bin/remove_members	2010-10-14 12:15:59 +0000
@@ -0,0 +1,186 @@
+#! @PYTHON@
+#
+# Copyright (C) 1998-2005 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.
+
+"""Remove members from a list.
+
+Usage:
+    remove_members [options] [listname] [addr1 ...]
+
+Options:
+
+    --file=file
+    -f file
+        Remove member addresses found in the given file.  If file is
+        `-', read stdin.
+
+    --all
+    -a
+        Remove all members of the mailing list.
+        (mutually exclusive with --fromall)
+
+    --fromall
+        Removes the given addresses from all the lists on this system
+        regardless of virtual domains if you have any.  This option cannot be
+        used -a/--all.  Also, you should not specify a listname when using
+        this option.
+
+    --nouserack
+    -n
+        Don't send the user acknowledgements.  If not specified, the list
+        default value is used.
+
+    --noadminack
+    -N
+        Don't send the admin acknowledgements.  If not specified, the list
+        default value is used.
+
+    --help
+    -h
+        Print this help message and exit.
+
+    listname is the name of the mailing list to use.
+
+    addr1 ... are additional addresses to remove.
+"""
+
+import sys
+import getopt
+
+import paths
+from Mailman import MailList
+from Mailman import Utils
+from Mailman import Errors
+from Mailman.i18n import _
+
+try:
+    True, False
+except NameError:
+    True = 1
+    False = 0
+
+
+

+def usage(code, msg=''):
+    if code:
+        fd = sys.stderr
+    else:
+        fd = sys.stdout
+    print >> fd, _(__doc__)
+    if msg:
+        print >> fd, msg
+    sys.exit(code)
+
+
+def ReadFile(filename):
+    lines = []
+    if filename == "-":
+        fp = sys.stdin
+        closep = False
+    else:
+        fp = open(filename)
+        closep = True
+    lines = filter(None, [line.strip() for line in fp.readlines()])
+    if closep:
+        fp.close()
+    return lines
+
+
+

+def main():
+    try:
+        opts, args = getopt.getopt(
+            sys.argv[1:], 'naf:hN',
+            ['all', 'fromall', 'file=', 'help', 'nouserack', 'noadminack'])
+    except getopt.error, msg:
+        usage(1, msg)
+
+    filename = None
+    all = False
+    alllists = False
+    # None means use list default
+    userack = None
+    admin_notif = None
+
+    for opt, arg in opts:
+        if opt in ('-h', '--help'):
+            usage(0)
+        elif opt in ('-f', '--file'):
+            filename = arg
+        elif opt in ('-a', '--all'):
+            all = True
+        elif opt == '--fromall':
+            alllists = True
+        elif opt in ('-n', '--nouserack'):
+            userack = False
+        elif opt in ('-N', '--noadminack'):
+            admin_notif = False
+
+    if len(args) < 1 and not (filename and alllists):
+        usage(1)
+
+    # You probably don't want to delete all the users of all the lists -- Marc
+    if all and alllists:
+       usage(1)
+
+    if alllists:
+       addresses = args
+    else:
+       listname = args[0].lower().strip()
+       addresses = args[1:]
+
+    if alllists:
+        listnames = Utils.list_names()
+    else:
+        listnames = [listname]
+
+    if filename:
+        try:
+            addresses = addresses + ReadFile(filename)
+        except IOError:
+            print _('Could not open file for reading: %(filename)s.')
+
+    for listname in listnames:
+       try:
+           # open locked
+           mlist = MailList.MailList(listname)
+       except Errors.MMListError:
+           print _('Error opening list %(listname)s... skipping.')
+           continue
+
+       if all:
+           addresses = mlist.getMembers()
+
+       try:
+           for addr in addresses:
+               if not mlist.isMember(addr):
+                   if not alllists:
+                       print _('No such member: %(addr)s')
+                   continue
+               mlist.ApprovedDeleteMember(addr, 'bin/remove_members',
+                                          admin_notif, userack)
+               if alllists:
+                   print _("User `%(addr)s' removed from list: %(listname)s.")
+           mlist.Save()
+       finally:
+           mlist.Unlock()
+
+
+

+if __name__ == '__main__':
+    main()

=== added file 'bin/reset_pw.py'
--- bin/reset_pw.py	1970-01-01 00:00:00 +0000
+++ bin/reset_pw.py	2010-10-14 12:15:59 +0000
@@ -0,0 +1,83 @@
+#! @PYTHON@
+#
+# Copyright (C) 2004-2007 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.
+
+# Inspired by Florian Weimer.
+
+"""Reset the passwords for members of a mailing list.
+
+This script resets all the passwords of a mailing list's members.  It can also
+be used to reset the lists of all members of all mailing lists, but it is your
+responsibility to let the users know that their passwords have been changed.
+
+This script is intended to be run as a bin/withlist script, i.e.
+
+% bin/withlist -l -r reset_pw listname [options]
+
+Options:
+    -v / --verbose
+        Print what the script is doing.
+"""
+
+import sys
+import getopt
+
+import paths
+from Mailman import Utils
+from Mailman.i18n import _
+
+
+

+def usage(code, msg=''):
+    if code:
+        fd = sys.stderr
+    else:
+        fd = sys.stdout
+    print >> fd, _(__doc__.replace('%', '%%'))
+    if msg:
+        print >> fd, msg
+    sys.exit(code)
+
+
+

+def reset_pw(mlist, *args):
+    try:
+        opts, args = getopt.getopt(args, 'v', ['verbose'])
+    except getopt.error, msg:
+        usage(1, msg)
+
+    verbose = False
+    for opt, args in opts:
+        if opt in ('-v', '--verbose'):
+            verbose = True
+
+    listname = mlist.internal_name()
+    if verbose:
+        print _('Changing passwords for list: %(listname)s')
+
+    for member in mlist.getMembers():
+        randompw = Utils.MakeRandomPassword()
+        mlist.setMemberPassword(member, randompw)
+        if verbose:
+            print _('New password for member %(member)40s: %(randompw)s')
+
+    mlist.Save()
+
+
+

+if __name__ == '__main__':
+    usage(0)

=== added file 'bin/sync_members'
--- bin/sync_members	1970-01-01 00:00:00 +0000
+++ bin/sync_members	2010-10-14 12:15:59 +0000
@@ -0,0 +1,286 @@
+#! @PYTHON@
+#
+# Copyright (C) 1998-2003 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.
+
+"""Synchronize a mailing list's membership with a flat file.
+
+This script is useful if you have a Mailman mailing list and a sendmail
+:include: style list of addresses (also as is used in Majordomo).  For every
+address in the file that does not appear in the mailing list, the address is
+added.  For every address in the mailing list that does not appear in the
+file, the address is removed.  Other options control what happens when an
+address is added or removed.
+
+Usage: %(PROGRAM)s [options] -f file listname
+
+Where `options' are:
+
+    --no-change
+    -n
+        Don't actually make the changes.  Instead, print out what would be
+        done to the list.
+
+    --welcome-msg[=<yes|no>]
+    -w[=<yes|no>]
+        Sets whether or not to send the newly added members a welcome
+        message, overriding whatever the list's `send_welcome_msg' setting
+        is.  With -w=yes or -w, the welcome message is sent.  With -w=no, no
+        message is sent.
+
+    --goodbye-msg[=<yes|no>]
+    -g[=<yes|no>]
+        Sets whether or not to send the goodbye message to removed members,
+        overriding whatever the list's `send_goodbye_msg' setting is.  With
+        -g=yes or -g, the goodbye message is sent.  With -g=no, no message is
+        sent.
+
+    --digest[=<yes|no>]
+    -d[=<yes|no>]
+        Selects whether to make newly added members receive messages in
+        digests.  With -d=yes or -d, they become digest members.  With -d=no
+        (or if no -d option given) they are added as regular members.
+
+    --notifyadmin[=<yes|no>]
+    -a[=<yes|no>]
+        Specifies whether the admin should be notified for each subscription
+        or unsubscription.  If you're adding a lot of addresses, you
+        definitely want to turn this off!  With -a=yes or -a, the admin is
+        notified.  With -a=no, the admin is not notified.  With no -a option,
+        the default for the list is used.
+
+    --file <filename | ->
+    -f <filename | ->
+        This option is required.  It specifies the flat file to synchronize
+        against.  Email addresses must appear one per line.  If filename is
+        `-' then stdin is used.
+
+    --help
+    -h
+        Print this message.
+
+    listname
+        Required.  This specifies the list to synchronize.
+"""
+
+import sys
+
+import paths
+# Import this /after/ paths so that the sys.path is properly hacked
+import email.Utils
+
+from Mailman import MailList
+from Mailman import Errors
+from Mailman import Utils
+from Mailman.UserDesc import UserDesc
+from Mailman.i18n import _
+
+
+

+PROGRAM = sys.argv[0]
+
+def usage(code, msg=''):
+    if code:
+        fd = sys.stderr
+    else:
+        fd = sys.stdout
+    print >> fd, _(__doc__)
+    if msg:
+        print >> fd, msg
+    sys.exit(code)
+
+
+

+def yesno(opt):
+    i = opt.find('=')
+    yesno = opt[i+1:].lower()
+    if yesno in ('y', 'yes'):
+        return 1
+    elif yesno in ('n', 'no'):
+        return 0
+    else:
+        usage(1, _('Bad choice: %(yesno)s'))
+        # no return
+
+
+def main():
+    dryrun = 0
+    digest = 0
+    welcome = None
+    goodbye = None
+    filename = None
+    listname = None
+    notifyadmin = None
+
+    # TBD: can't use getopt with this command line syntax, which is broken and
+    # should be changed to be getopt compatible.
+    i = 1
+    while i < len(sys.argv):
+        opt = sys.argv[i]
+        if opt in ('-h', '--help'):
+            usage(0)
+        elif opt in ('-n', '--no-change'):
+            dryrun = 1
+            i += 1
+            print _('Dry run mode')
+        elif opt in ('-d', '--digest'):
+            digest = 1
+            i += 1
+        elif opt.startswith('-d=') or opt.startswith('--digest='):
+            digest = yesno(opt)
+            i += 1
+        elif opt in ('-w', '--welcome-msg'):
+            welcome = 1
+            i += 1
+        elif opt.startswith('-w=') or opt.startswith('--welcome-msg='):
+            welcome = yesno(opt)
+            i += 1
+        elif opt in ('-g', '--goodbye-msg'):
+            goodbye = 1
+            i += 1
+        elif opt.startswith('-g=') or opt.startswith('--goodbye-msg='):
+            goodbye = yesno(opt)
+            i += 1
+        elif opt in ('-f', '--file'):
+            if filename is not None:
+                usage(1, _('Only one -f switch allowed'))
+            try:
+                filename = sys.argv[i+1]
+            except IndexError:
+                usage(1, _('No argument to -f given'))
+            i += 2
+        elif opt in ('-a', '--notifyadmin'):
+            notifyadmin = 1
+            i += 1
+        elif opt.startswith('-a=') or opt.startswith('--notifyadmin='):
+            notifyadmin = yesno(opt)
+            i += 1
+        elif opt[0] == '-':
+            usage(1, _('Illegal option: %(opt)s'))
+        else:
+            try:
+                listname = sys.argv[i].lower()
+                i += 1
+            except IndexError:
+                usage(1, _('No listname given'))
+            break
+
+    if listname is None or filename is None:
+        usage(1, _('Must have a listname and a filename'))
+
+    # read the list of addresses to sync to from the file
+    if filename == '-':
+        filemembers = sys.stdin.readlines()
+    else:
+        try:
+            fp = open(filename)
+        except IOError, (code, msg):
+            usage(1, _('Cannot read address file: %(filename)s: %(msg)s'))
+        try:
+            filemembers = fp.readlines()
+        finally:
+            fp.close()
+
+    # strip out lines we don't care about, they are comments (# in first
+    # non-whitespace) or are blank
+    for i in range(len(filemembers)-1, -1, -1):
+        addr = filemembers[i].strip()
+        if addr == '' or addr[:1] == '#':
+            del filemembers[i]
+            print _('Ignore  :  %(addr)30s')
+
+    # first filter out any invalid addresses
+    filemembers = email.Utils.getaddresses(filemembers)
+    invalid = 0
+    for name, addr in filemembers:
+        try:
+            Utils.ValidateEmail(addr)
+        except Errors.EmailAddressError:
+            print _('Invalid :  %(addr)30s')
+            invalid = 1
+    if invalid:
+        print _('You must fix the preceding invalid addresses first.')
+        sys.exit(1)
+
+    # get the locked list object
+    try:
+        mlist = MailList.MailList(listname)
+    except Errors.MMListError, e:
+        print _('No such list: %(listname)s')
+        sys.exit(1)
+
+    try:
+        # Get the list of addresses currently subscribed
+        addrs = {}
+        needsadding = {}
+        matches = {}
+        for addr in mlist.getMemberCPAddresses(mlist.getMembers()):
+            addrs[addr.lower()] = addr
+
+        for name, addr in filemembers:
+            # Any address found in the file that is also in the list can be
+            # ignored.  If not found in the list, it must be added later.
+            laddr = addr.lower()
+            if addrs.has_key(laddr):
+                del addrs[laddr]
+                matches[laddr] = 1
+            elif not matches.has_key(laddr):
+                needsadding[laddr] = (name, addr)
+
+        if not needsadding and not addrs:
+            print _('Nothing to do.')
+            sys.exit(0)
+
+        enc = sys.getdefaultencoding()
+        # addrs contains now all the addresses that need removing
+        for laddr, (name, addr) in needsadding.items():
+            pw = Utils.MakeRandomPassword()
+            # should not already be subscribed, otherwise our test above is
+            # broken.  Bogosity is if the address is listed in the file more
+            # than once.  Second and subsequent ones trigger an
+            # MMAlreadyAMember error.  Just catch it and go on.
+            userdesc = UserDesc(addr, name, pw, digest)
+            try:
+                if not dryrun:
+                    mlist.ApprovedAddMember(userdesc, welcome, notifyadmin)
+                s = email.Utils.formataddr((name, addr)).encode(enc, 'replace')
+                print _('Added  : %(s)s')
+            except Errors.MMAlreadyAMember:
+                pass
+
+        for laddr, addr in addrs.items():
+            # Should be a member, otherwise our test above is broken
+            name = mlist.getMemberName(laddr) or ''
+            if not dryrun:
+                try:
+                    mlist.ApprovedDeleteMember(addr, admin_notif=notifyadmin,
+                                               userack=goodbye)
+                except Errors.NotAMemberError:
+                    # This can happen if the address is illegal (i.e. can't be
+                    # parsed by email.Utils.parseaddr()) but for legacy
+                    # reasons is in the database.  Use a lower level remove to
+                    # get rid of this member's entry
+                    mlist.removeMember(addr)
+            s = email.Utils.formataddr((name, addr)).encode(enc, 'replace')
+            print _('Removed: %(s)s')
+
+        mlist.Save()
+    finally:
+        mlist.Unlock()
+
+
+if __name__ == '__main__':
+    main()

=== added file 'bin/templ2pot.py'
--- bin/templ2pot.py	1970-01-01 00:00:00 +0000
+++ bin/templ2pot.py	2010-10-14 12:15:59 +0000
@@ -0,0 +1,120 @@
+#! @PYTHON@
+# Code stolen from pygettext.py
+# by Tokio Kikuchi <[e-mail]>
+
+"""templ2pot.py -- convert mailman template (en) to pot format.
+
+Usage: templ2pot.py inputfile ...
+
+Options:
+
+    -h, --help
+
+Inputfiles are english templates.  Outputs are written to stdout.
+"""
+
+import sys
+import getopt
+
+
+

+try:
+    import paths
+    from Mailman.i18n import _
+except ImportError:
+    def _(s): return s
+
+EMPTYSTRING = ''
+
+
+

+def usage(code, msg=''):
+    if code:
+        fd = sys.stderr
+    else:
+        fd = sys.stdout
+    print >> fd, _(__doc__) % globals()
+    if msg:
+        print >> fd, msg
+    sys.exit(code)
+
+
+

+escapes = []
+
+def make_escapes(pass_iso8859):
+    global escapes
+    if pass_iso8859:
+        # Allow iso-8859 characters to pass through so that e.g. 'msgid
+        # "H[o-umlaut]he"' would result not result in 'msgid "H\366he"'.
+        # Otherwise we escape any character outside the 32..126 range.
+        mod = 128
+    else:
+        mod = 256
+    for i in range(256):
+        if 32 <= (i % mod) <= 126:
+            escapes.append(chr(i))
+        else:
+            escapes.append("\\%03o" % i)
+    escapes[ord('\\')] = '\\\\'
+    escapes[ord('\t')] = '\\t'
+    escapes[ord('\r')] = '\\r'
+    escapes[ord('\n')] = '\\n'
+    escapes[ord('\"')] = '\\"'
+
+
+def escape(s):
+    global escapes
+    s = list(s)
+    for i in range(len(s)):
+        s[i] = escapes[ord(s[i])]
+    return EMPTYSTRING.join(s)
+
+
+def normalize(s):
+    # This converts the various Python string types into a format that is
+    # appropriate for .po files, namely much closer to C style.
+    lines = s.splitlines()
+    if len(lines) == 1:
+        s = '"' + escape(s) + '"'
+    else:
+        if not lines[-1]:
+            del lines[-1]
+            lines[-1] = lines[-1] + '\n'
+        for i in range(len(lines)):
+            lines[i] = escape(lines[i])
+        lineterm = '\\n"\n"'
+        s = '""\n"' + lineterm.join(lines) + '"'
+    return s
+
+
+

+def main():
+    try:
+        opts, args = getopt.getopt(
+            sys.argv[1:],
+            'h',
+            ['help',]
+             )
+    except getopt.error, msg:
+        usage(1, msg)
+
+    # parse options
+    for opt, arg in opts:
+        if opt in ('-h', '--help'):
+            usage(0)
+
+    # calculate escapes
+    make_escapes(0)
+
+    for filename in args:
+        print '#: %s:1' % filename
+        s = file(filename).read()
+        print '#, template'
+        print 'msgid', normalize(s)
+        print 'msgstr ""\n'
+
+
+

+if __name__ == '__main__':
+    main()

=== added file 'bin/transcheck'
--- bin/transcheck	1970-01-01 00:00:00 +0000
+++ bin/transcheck	2010-10-14 12:15:59 +0000
@@ -0,0 +1,412 @@
+#! @PYTHON@
+#
+# transcheck - (c) 2002 by Simone Piunno <[e-mail]>
+#
+# This program is free software; you can redistribute it and/or modify it
+# under the terms of the version 2.0 of the GNU General Public License as
+# published by the Free Software Foundation.
+#
+# 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.
+
+"""
+Check a given Mailman translation, making sure that variables and
+tags referenced in translation are the same variables and tags in
+the original templates and catalog.
+
+Usage:
+
+cd $MAILMAN_DIR
+%(program)s [-q] <lang>
+
+Where <lang> is your country code (e.g. 'it' for Italy) and -q is
+to ask for a brief summary.
+"""
+
+import sys
+import re
+import os
+import getopt
+
+import paths
+from Mailman.i18n import _
+
+program = sys.argv[0]
+
+
+

+def usage(code, msg=''):
+    if code:
+        fd = sys.stderr
+    else:
+        fd = sys.stdout
+    print >> fd, _(__doc__)
+    if msg:
+        print >> fd, msg
+    sys.exit(code)
+
+
+

+class TransChecker:
+    "check a translation comparing with the original string"
+    def __init__(self, regexp, escaped=None):
+        self.dict = {}
+        self.errs = []
+        self.regexp = re.compile(regexp)
+        self.escaped = None
+        if escaped:
+            self.escaped = re.compile(escaped)
+
+    def checkin(self, string):
+        "scan a string from the original file"
+        for key in self.regexp.findall(string):
+            if self.escaped and self.escaped.match(key):
+                continue
+            if self.dict.has_key(key):
+                self.dict[key] += 1
+            else:
+                self.dict[key] = 1
+
+    def checkout(self, string):
+        "scan a translated string"
+        for key in self.regexp.findall(string):
+            if self.escaped and self.escaped.match(key):
+                continue
+            if self.dict.has_key(key):
+                self.dict[key] -= 1
+            else:
+                self.errs.append(
+                    "%(key)s was not found" %
+                    { 'key' : key }
+                )
+
+    def computeErrors(self):
+        "check for differences between checked in and checked out"
+        for key in self.dict.keys():
+            if self.dict[key] < 0:
+                self.errs.append(
+                    "Too much %(key)s" %
+                    { 'key'  : key }
+                )
+            if self.dict[key] > 0:
+                self.errs.append(
+                    "Too few %(key)s" %
+                    { 'key'  : key }
+                )
+        return self.errs
+
+    def status(self):
+        if self.errs:
+            return "FAILED"
+        else:
+            return "OK"
+
+    def errorsAsString(self):
+        msg = ""
+        for err in self.errs:
+            msg += " - %(err)s" % { 'err': err }
+        return msg
+
+    def reset(self):
+        self.dict = {}
+        self.errs = []
+
+
+

+class POParser:
+    "parse a .po file extracting msgids and msgstrs"
+    def __init__(self, filename=""):
+        self.status = 0
+        self.files = []
+        self.msgid = ""
+        self.msgstr = ""
+        self.line = 1
+        self.f = None
+        self.esc = { "n": "\n", "r": "\r", "t": "\t" }
+        if filename:
+            self.f = open(filename)
+
+    def open(self, filename):
+        self.f = open(filename)
+
+    def close(self):
+        self.f.close()
+
+    def parse(self):
+        """States table for the finite-states-machine parser:
+            0  idle
+            1  filename-or-comment
+            2  msgid
+            3  msgstr
+            4  end
+        """
+        # each time we can safely re-initialize those vars
+        self.files = []
+        self.msgid = ""
+        self.msgstr = ""
+
+
+        # can't continue if status == 4, this is a dead status
+        if self.status == 4:
+            return 0
+
+        while 1:
+            # continue scanning, char-by-char
+            c = self.f.read(1)
+            if not c:
+                # EOF -> maybe we have a msgstr to save?
+                self.status = 4
+                if self.msgstr:
+                    return 1
+                else:
+                    return 0
+
+            # keep the line count up-to-date
+            if c == "\n":
+                self.line += 1
+
+            # a pound was detected the previous char...
+            if self.status == 1:
+                if c == ":":
+                    # was a line of filenames
+                    row = self.f.readline()
+                    self.files += row.split()
+                    self.line += 1
+                elif c == "\n":
+                    # was a single pount on the line
+                    pass
+                else:
+                    # was a comment... discard
+                    self.f.readline()
+                    self.line += 1
+                # in every case, we switch to idle status
+                self.status = 0;
+                continue
+
+            # in idle status we search for a '#' or for a 'm'
+            if self.status == 0:
+                if   c == "#":
+                    # this could be a comment or a filename
+                    self.status = 1;
+                    continue
+                elif c == "m":
+                    # this should be a msgid start...
+                    s = self.f.read(4)
+                    assert s == "sgid"
+                    # so now we search for a '"'
+                    self.status = 2
+                    continue
+                # in idle only those other chars are possibile
+                assert c in [ "\n", " ", "\t" ]
+
+            # searching for the msgid string
+            if self.status == 2:
+                if c == "\n":
+                    # a double LF is not possible here
+                    c = self.f.read(1)
+                    assert c != "\n"
+                if c == "\"":
+                    # ok, this is the start of the string,
+                    # now search for the end
+                    while 1:
+                        c = self.f.read(1)
+                        if not c:
+                            # EOF, bailout
+                            self.status = 4
+                            return 0
+                        if c == "\\":
+                            # a quoted char...
+                            c = self.f.read(1)
+                            if self.esc.has_key(c):
+                                self.msgid += self.esc[c]
+                            else:
+                                self.msgid += c
+                            continue
+                        if c == "\"":
+                            # end of string found
+                            break
+                        # a normal char, add it
+                        self.msgid += c
+                if c == "m":
+                    # this should be a msgstr identifier
+                    s = self.f.read(5)
+                    assert s == "sgstr"
+                    # ok, now search for the msgstr string
+                    self.status = 3
+
+            # searching for the msgstr string
+            if self.status == 3:
+                if c == "\n":
+                    # a double LF is the end of the msgstr!
+                    c = self.f.read(1)
+                    if c == "\n":
+                        # ok, time to go idle and return
+                        self.status = 0
+                        self.line += 1
+                        return 1
+                if c == "\"":
+                    # start of string found
+                    while 1:
+                        c = self.f.read(1)
+                        if not c:
+                            # EOF, bail out
+                            self.status = 4
+                            return 1
+                        if c == "\\":
+                            # a quoted char...
+                            c = self.f.read(1)
+                            if self.esc.has_key(c):
+                                self.msgid += self.esc[c]
+                            else:
+                                self.msgid += c
+                            continue
+                        if c == "\"":
+                            # end of string
+                            break
+                        # a normal char, add it
+                        self.msgstr += c
+
+
+
+

+def check_file(translatedFile, originalFile, html=0, quiet=0):
+    """check a translated template against the original one
+       search also <MM-*> tags if html is not zero"""
+
+    if html:
+        c = TransChecker("(%%|%\([^)]+\)[0-9]*[sd]|</?MM-[^>]+>)", "^%%$")
+    else:
+        c = TransChecker("(%%|%\([^)]+\)[0-9]*[sd])", "^%%$")
+
+    try:
+        f = open(originalFile)
+    except IOError:
+        if not quiet:
+            print " - Can'open original file " + originalFile
+        return 1
+
+    while 1:
+        line = f.readline()
+        if not line: break
+        c.checkin(line)
+
+    f.close()
+
+    try:
+        f = open(translatedFile)
+    except IOError:
+        if not quiet:
+            print " - Can'open translated file " + translatedFile
+        return 1
+
+    while 1:
+        line = f.readline()
+        if not line: break
+        c.checkout(line)
+
+    f.close()
+
+    n = 0
+    msg = ""
+    for desc in c.computeErrors():
+        n +=1
+        if not quiet:
+            print " - %(desc)s" % { 'desc': desc }
+    return n
+
+
+

+def check_po(file, quiet=0):
+    "scan the po file comparing msgids with msgstrs"
+    n = 0
+    p = POParser(file)
+    c = TransChecker("(%%|%\([^)]+\)[0-9]*[sdu]|%[0-9]*[sdu])", "^%%$")
+    while p.parse():
+        if p.msgstr:
+            c.reset()
+            c.checkin(p.msgid)
+            c.checkout(p.msgstr)
+            for desc in c.computeErrors():
+                n += 1
+                if not quiet:
+                    print " - near line %(line)d %(file)s: %(desc)s" % {
+                        'line': p.line,
+                        'file': p.files,
+                        'desc': desc
+                    }
+    p.close()
+    return n
+
+

+def main():
+    try:
+        opts, args = getopt.getopt(sys.argv[1:], 'qh', ['quiet', 'help'])
+    except getopt.error, msg:
+        usage(1, msg)
+
+    quiet = 0
+    for opt, arg in opts:
+        if opt in ('-h', '--help'):
+            usage(0)
+        elif opt in ('-q', '--quiet'):
+            quiet = 1
+
+    if len(args) <> 1:
+        usage(1)
+
+    lang = args[0]
+
+    isHtml = re.compile("\.html$");
+    isTxt = re.compile("\.txt$");
+
+    numerrors = 0
+    numfiles = 0
+    try:
+        files = os.listdir("templates/" + lang + "/")
+    except:
+        print "can't open templates/%s/" % lang
+    for file in files:
+        fileEN = "templates/en/" + file
+        fileIT = "templates/" + lang + "/" + file
+        errlist = []
+        if isHtml.search(file):
+            if not quiet:
+                print "HTML checking " + fileIT + "... "
+            n = check_file(fileIT, fileEN, html=1, quiet=quiet)
+            if n:
+                numerrors += n
+                numfiles += 1
+        elif isTxt.search(file):
+            if not quiet:
+                print "TXT  checking " + fileIT + "... "
+            n = check_file(fileIT, fileEN, html=0, quiet=quiet)
+            if n:
+                numerrors += n
+                numfiles += 1
+
+        else:
+            continue
+
+    file = "messages/" + lang + "/LC_MESSAGES/mailman.po"
+    if not quiet:
+        print "PO   checking " + file + "... "
+    n = check_po(file, quiet=quiet)
+    if n:
+        numerrors += n
+        numfiles += 1
+
+    if quiet:
+        print "%(errs)u warnings in %(files)u files" % {
+            'errs':  numerrors,
+            'files': numfiles
+        }
+
+

+if __name__ == '__main__':
+    main()

=== added directory 'contrib'
=== renamed directory 'contrib' => 'contrib.moved'
=== added file 'contrib/README'
--- contrib/README	1970-01-01 00:00:00 +0000
+++ contrib/README	2010-10-14 12:15:59 +0000
@@ -0,0 +1,4 @@
+This directory contains unofficial contributed scripts and extensions
+to Mailman.  They are unsupported by the Mailman developers.  If you
+have questions or problems with them, please contact the contribution
+author directly.

=== added file 'contrib/README.check_perms_grsecurity'
--- contrib/README.check_perms_grsecurity	1970-01-01 00:00:00 +0000
+++ contrib/README.check_perms_grsecurity	2010-10-14 12:15:59 +0000
@@ -0,0 +1,14 @@
+The check_perms_grsecurity.py script, if copied in your installed
+~mailman/bin/ directory and run from there will modify permissions of
+files so that Mailman with extra restrictions imposed by linux kernel security
+patches like securelinux/openwall in 2.2.x or grsecurity in 2.4.x
+
+The way it works is that it makes sure that the UID of any script that
+touches config.pck is `mailman'. What this means however is that
+scripts in ~mailman/bin will now only work if run as user mailman or
+root (the script then changes its UID and GID to mailman).
+To make grsecurity happy, we remove the group writeable bit on a directories
+that contain binaries.
+
+Enjoy
+Marc MERLIN <[e-mail]>/<[e-mail]> - 2001/12/10

=== added file 'contrib/README.mm-handler'
--- contrib/README.mm-handler	1970-01-01 00:00:00 +0000
+++ contrib/README.mm-handler	2010-10-14 12:15:59 +0000
@@ -0,0 +1,215 @@
+Contributed by David Champion <[e-mail]>
+See also ../README.SENDMAIL
+
+What?
+-----
+Mm-handler is a mail delivery agent (MDA) -- a "mailer", in Sendmail
+lingo. Its function is to assume authority for messages destined to
+Mailman lists, so that they're off sendmail's hands, and you (the site
+administrator) don't need to maintain databases of aliases and such. It
+takes a small bit of work to set up, but once that's done, you'll never
+need to mess with aliases for Mailman's sake again.
+
+When?
+-----
+The only further catch is that mm-handler is only really useful when
+it mostly "owns" its mail domain (the hostname part after an e-mail
+address's "@" symbol) -- when you can dedicate the mail domain to
+Mailman. If you have a limited set of exceptions -- a few users, for
+example -- you can still use it, but for sites with a dynamic or even
+mix of users (or forwarders) and lists, it might not gain you much.
+
+How do you know whether mm-handler is appropriate for you? Let's look
+at some examples. If you're running lists off your primary DNS domain
+name, you probably have a mix of lists and users in your namespace. Take
+python.org, for example: it hosts Mailman lists, and it hosts users'
+personal accounts. There aren't a whole bunch of either, but the ratio
+is probably fairly near 1:1. Mm-handler is not very useful here, because
+there's no simple way to separate user addresses from list addresses --
+not to mention that mm-handler is written in perl, so that's just bad
+form.
+
+This begs two different, complementary situations. A hypothetical
+domain, incidents.int, is used mostly for mailing lists. It's a
+front-end site, and not a general user mail service. There might be
+a couple of user addresses -- system administrators and such -- but
+these are few in number and easily adjusted manually by the site
+administrator. The 250 mailing lists at the site are much more dynamic,
+and a much bigger pain to keep track of by editing an alias file. This
+site can easily benefit from mm-handler.
+
+Inversely, mail.aero, another hypothetical domain, provides POP mail
+service to employees of the aerospace industry. Its addresses are
+almost entirely users, although it maintains a few mailing lists for
+convenience. This site has nothing to gain from mm-handler. It's much
+easier to maintain an alias file of 10 lists than to dedicate the domain
+to Mailman, and put all 10,000 aerospace workers in a user table.
+
+Those are the trickier cases. The case where mm-handler really works
+best is when you can dedicate a single hostname under your DNS domain
+to mailing lists, and host no user accounts there. At the University of
+Chicago, we do this with listhost.uchicago.edu. SourceForge does this,
+too, although I don't believe they use Sendmail.
+
+If your site is like that, you should read on.
+
+How?
+----
+Set-up isn't all that complicated. I've included a file here called
+"mailman.mc". This is the m4 file that I use on my list server, and you
+can likely use it with few changes at your site. It's well-annotated;
+the rationale for each parameter (or set of parameters) is provided in
+m4 (ahem) comments.
+
+So, the simple steps are as follows:
+
+1. Copy mailman.mc, and make any changes you need at your site. You
+   DEFINITELY need some changes. There are hostnames in there that you
+   need to adjust, and chances are that you'll need to change some other
+   parameters (like the host OS), too. [1]
+
+2. Install mm-handler. Because my server's sendmail-related files live
+   in /etc/mail, I keep mm-handler there, too. YMMV.
+
+3. Edit mm-handler, and make any changes you need at your site. You
+   probably want to change $MMWRAPPER and $MMLISTDIR at line 14, and you
+   *might* want to take a look at the helpful boilerplate text beginning
+   at line 64. (This text is sent whenever someone tries to send mail to
+   a nonexistent list address on your mail domain.)
+
+4. You should set up a virtusertable. (See mailman.mc for an
+   explanation.) There's an example of a good, minimal virtusertable
+   in this distribution. The virtusertable begins as a text file named
+   "virtusertable", stored in the same directory as all the other
+   Sendmail files, but it's converted to a map file for Sendmail's use.
+   Install the virtusertable, and (re)make the map file. [2]
+
+5. You absolutely must have a mailertable, or all of this goes nowhere.
+   Like virtusertable, the mailertable is a map that begins as text and
+   gets converted. It's named "mailertable", and it's probably pretty
+   simple. Mine looks like this:
+
+	listtest.uchicago.edu	mailman:listtest.uchicago.edu
+
+   This says: assign all incoming mail (that was not intercepted by the
+   virtusertable) and that is in the listtest.uchicago.edu domain to the
+   "mailman" mailer, and tell the "mailman" mailer that the hostname
+   we're using is "listtest.uchicago.edu". You can support multiple
+   virtual hosts using mm-handler just by placing corresponding lines in
+   mailertable.
+
+   Be sure to make this map, too!
+
+6. The mailer definition (see the end of mailman.mc, or your own .mc
+   file) for mm-handler sets the user/group that mm-handler will run
+   under. (I use mailman:other.) Be sure that mm-handler is executable
+   by this user or group. You almost certainly need the user to be the
+   same as the Mailman user, and this user is almost always called
+   "mailman", so you probably shouldn't change the defaults.
+
+7. Generate your new sendmail.cf file. See the sendmail documentation if
+   you're not familiar with this procedure. [1]
+
+8. Stop sendmail on your list server, if you haven't already. Install
+   the new sendmail.cf file wherever your sendmail.cf file belongs.
+   (This depends on how sendmail was compiled, but most systems support
+   using /etc/sendmail.cf.)
+
+9. Cross your fingers and restart sendmail.
+
+A. Barry warns that Mailman now needs you to modify your
+   Mailman/mm_cfg.py file, adding this line:
+
+	MTA = None
+
+   This tells Mailman that it doesn't need to do anything special when
+   it creates or deletes mailing lists through the web.  For more
+   information, take a look at the comments for this variable in your
+   Defaults.py file (but never edit this file -- always edit mm_cfg.py
+   instead!).
+
+That's it! With any luck, you're fully functional.
+
+--
+[1] The .mc file is the standard, supported way of configuring sendmail.
+    I'm not going to get into this here, and I'm not going to tell
+    you how to write raw sendmail.cf stuff, because if you need to do
+    it this way then you need something more comprehensive than I can
+    provide. If you need help with the .mc -> .cf process, I recommend
+    these links:
+
+	http://www.sendmail.org/~ca/email/setup1.html
+	http://www.sendmail.org/~ca/email/doc8.9/README.cf.html
+	http://www.hserus.net/sendmail.html
+
+[2] This is often done with something like "makemap hash
+    /etc/virtusertable </etc/virtusertable", but it could be different
+    on your server. Consult the sendmail documentation if you do not
+    know.
+
+
+The following note is provided by Kevin McNamee <kevin.mcnamee(at)symsoft.se>
+regarding solving a problem with mail to list addresses being rejected for
+"user unknown".  Reference:
+<http://mail.python.org/pipermail/mailman-users/2006-February/049235.html>
+
+
+"User unknown" analysis
+=======================
+If the "user unknown" problem arises, then sendmail is not 
+recognising your domain as a "mailman" domain. 
+The problem could be that your mailman.mydomain.com is defined as a 
+CNAME not a real DNS record. 
+
+A hint from a tutorial about Masquerading:
+http://www.feep.net/sendmail/tutorial/config/masquerading.html
+"This address must be an address record in DNS, not simply
+a CNAME, or the remote end will canonicalize the address back 
+to the original name."
+
+First confirm the problem
+# sendmail -bv testlist<at>mailman.mydomain.com
+testlist<at>mailman.mydomain.com... User unknown
+
+Then confirm that mailertable is operational
+# sendmail -d -bv jbloggs<at>hotmail.com | egrep "map_rewrite|mailertable"
+map_lookup(host, hotmail.com) => host_map_lookup(hotmail.com) =>
+map_rewrite(hotmail.com), av =
+map_rewrite => hotmail.com.
+map_lookup(mailertable, hotmail.com) => NOT FOUND (0)
+map_lookup(mailertable, .com) => NOT FOUND (0)
+map_lookup(mailertable, .) => NOT FOUND (0)
+
+Then confirm that your domain (CNAME) is being canonicalised:
+# sendmail -d -bv testlist<at>mailman.mydomain.com | egrep
+"map_rewrite|mailertable"
+map_lookup(host, mailman.mydomain.com) =>
+host_map_lookup(mailman.mydomain.com) => map_rewrite(aserver.mydomain.com),
+av =
+map_rewrite => aserver.mydomain.com.
+
+Sendmail has done an nslookup and found the real name of your domain which
+would not match your settings in mailertable (if sendmail got that far).
+
+If you remove the CNAME and create a real subdomain, then the problem will
+go away:
+# sendmail -bv testlist<at>mailman.mydomain.com
+testlist<at>mailman.mydomain.com... deliverable: mailer mailman, host
+testlist<at>mailman.mydomain.com, user testlist
+
+You will still need to create a new CNAME in your sub-domain for Apache to
+work.
+
+Conclusion:
+It is very important to make clear in the Mailman installation instructions
+that a REAL subdomain is needed. Those of us not familiar with DNS (or
+sendmail for that matter) can succeed in getting the whole Mailman
+installation working including the (Apache) web-interface and subscription
+management using just a CNAME and then wonder why we cannot send mail to our
+list. Hope this is of use.
+
+Ed. note: the above "conclusion" applies in this mm-handler case, but it
+normally does not apply if list mail is delivered via aliases.
+
+--
+$Id: README.mm-handler 7780 2006-02-20 03:33:19Z msapiro $

=== added file 'contrib/README.mmdsr'
--- contrib/README.mmdsr	1970-01-01 00:00:00 +0000
+++ contrib/README.mmdsr	2010-10-14 12:15:59 +0000
@@ -0,0 +1,45 @@
+Daily Status Report script...
+
+The mmdsr script was created by Brad Knowles to produce a daily status report
+for mailman.  It was initially posted at
+<http://sourceforge.net/tracker/index.php?func=detail&aid=1123383&group_id=103&atid=300103>
+which see for possible patches and other enhancements.
+
+Here goes the original mmdsr.readme by Brad ...
+
+========================================================================
+This is a basic Bourne shell script that I quickly hacked together for
+my own purposes, designed to be fired off at 23:59 every night, going
+through a variety of Mailman log files looking for entries specific
+to that date, summarizing the activities, and indicating problems or
+certain types of activity that might be of interest to someone trying
+to administer the server.
+
+It also does an "ls -la" of /usr/local/mailman/qfiles/*, so that you
+can see what is in the queue at the time of the execution of the script.
+
+This daily report will get e-mailed to the admin, or posted to a "reports"
+mailing list, where they can be archived and kept for future reference.
+If you don't define an address where the output e-mail should be sent,
+it will instead be printed to the standard output (thus allowing you to
+do something else with it).
+
+
+Once I'd gone through a few revisions of my own on this tool, I
+thought that I would release the code to the public and get comments
+and suggestions from others in the Mailman community.  This program is
+currently being used actively on the mail servers for python.org (where
+the mailman-users and other Mailman-related mailing lists are hosted),
+as well as many others.
+
+Note that this script needs to be configured once to know where standard
+commands are located, where log files are kept, etc... (see the top
+500 lines or so of the script), but after that you don't need to feed
+it any input, or capture the output to be sent anywhere.  This script
+takes care of all of that.  All you should need to do is to call this
+script from a cron job at 23:59 (local time) every night.
+
+
+When looking at this script, perhaps during configuration, please keep
+in mind that it is heavily commented at the top, and everything should
+hopefully be self-evident.

=== added file 'contrib/auto'
--- contrib/auto	1970-01-01 00:00:00 +0000
+++ contrib/auto	2010-10-14 12:15:59 +0000
@@ -0,0 +1,116 @@
+# -*- python -*-
+#
+# Copyright (C) 2000,2001,2002 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.
+
+"""Automatically send a message to a mailing list.
+"""
+
+# To use with Postfix, set the following in your main.cf file:
+#
+# recipient_delimiter = +
+# luser_relay = mm+$[e-mail]
+# owner_request_special = no
+
+import sys
+import os
+import time
+
+import paths
+from Mailman import mm_cfg
+from Mailman import Utils
+from Mailman import MailList
+from Mailman import Errors
+from Mailman.Queue.sbcache import get_switchboard
+from Mailman.Logging.Utils import LogStdErr
+
+# Error code if it's really not a Mailman list addr destination
+EX_NOUSER = 67
+
+LogStdErr('auto', 'auto')
+
+DISPOSE_MAP = {None     : 'tolist',
+               'request': 'torequest',
+               'admin'  : 'toadmin',
+               'owner'  : 'toadmin',
+               }
+
+
+

+def fqdn_listname(listname, hostname):
+    return ('%s@%s' % (listname, hostname)).lower()
+
+
+

+def main():
+    # Postfix sets some environment variables based on information gleaned
+    # from the original message.  This is the most direct way to figure out
+    # which list the message was intended for.
+    extension = os.environ.get('EXTENSION', '').lower()
+    i = extension.rfind('-')
+    if i < 0:
+        listname = extension
+        subdest = 'tolist'
+    else:
+        missing = []
+        listname = extension[:i]
+        subdest = DISPOSE_MAP.get(extension[i+1:], missing)
+        if not Utils.list_exists(listname) or subdest is missing:
+            # must be a list that has a `-' in it's name
+            listname = extension
+            subdest = 'tolist'
+    if not listname:
+        print >> sys.stderr, 'Empty list name (someone being subversive?)'
+        return EX_NOUSER
+    try:
+        mlist = MailList.MailList(listname, lock=0)
+    except Errors.MMListError:
+        print >> sys.stderr, 'List not found:', listname
+        return EX_NOUSER
+
+    # Make sure that the domain part of the incoming address matches the
+    # domain of the mailing list.  Actually, it's possible that one or the
+    # other is more fully qualified, and thus longer.  So we split the domains
+    # by dots, reverse them and make sure that whatever parts /are/ defined
+    # for both are equivalent.
+    domain = os.environ.get('DOMAIN', '').lower()
+    domainp = domain.split('.')
+    hostname = mlist.host_name.split('.')
+    domainp.reverse()
+    hostname.reverse()
+    for ca, cb in zip(domainp, hostname):
+        if ca <> cb:
+            print >> sys.stderr, 'Domain mismatch: %s@%s (expected @%s)' \
+                  % (listname, domain, mlist.host_name)
+            return EX_NOUSER
+
+    if subdest is None:
+        print >> sys.stderr, 'Bad sub-destination:', extension
+        return EX_NOUSER
+
+    inq = get_switchboard(mm_cfg.INQUEUE_DIR)
+    inq.enqueue(sys.stdin.read(),
+                listname=listname,
+                received_time=time.time(),
+                _plaintext=1,
+                **{subdest: 1})
+    return 0
+
+
+

+if __name__ == '__main__':
+    code = main()
+    sys.exit(code)

=== added file 'contrib/check_perms_grsecurity.py'
--- contrib/check_perms_grsecurity.py	1970-01-01 00:00:00 +0000
+++ contrib/check_perms_grsecurity.py	2010-10-14 12:15:59 +0000
@@ -0,0 +1,182 @@
+#! @PYTHON@
+#
+# Copyright (C) 1998-2007 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.
+
+"""Fixes for running Mailman under the `secure-linux' patch or grsecurity.
+
+Run check_perms -f and only then check_perms_grsecurity.py -f
+Note that you  will have to re-run  this script after a  mailman upgrade and
+that check_perms will undo part of what this script does
+
+If you use  Solar Designer's secure-linux patch, it prevents  a process from
+linking (hard link) to a file it doesn't own.
+Grsecurity (http://grsecurity.net/) can have  the same restriction depending
+on how it was built, including other restrictions like preventing you to run
+a program if it is located in a directory writable by a non root user.
+
+As a  result Mailman has to  be changed so that  the whole tree is  owned by
+Mailman, and  the CGIs and some  of the programs  in the bin tree  (the ones
+that lock config.pck  files) are SUID Mailman.  The idea  is that config.pck
+files have to be owned by the  mailman UID and only touched by programs that
+are UID mailman.
+At the  same time, We have  to make sure  that at least 3  directories under
+~mailman aren't writable by mailman: mail, cgi-bin, and bin
+
+Binary commands that are changed to be SUID mailman are also made unreadable
+and unrunnable  by people who aren't  in the mailman group.   This shouldn't
+affect much since most of those commands would fail work if you weren't part
+of the mailman group anyway.
+Scripts in ~mailman/bin/ are  not made suid or sgid, they need  to be run by
+user mailman or root to work.
+
+Marc <[e-mail]>/<[e-mail]>
+2000/10/27 - Initial version for secure_linux/openwall and mailman 2.0
+2001/12/09 - Updated version for grsecurity and mailman 2.1
+"""
+
+import sys
+import os
+import paths
+import re
+import glob
+import pwd
+import grp
+from Mailman import mm_cfg
+from Mailman.mm_cfg import MAILMAN_USER, MAILMAN_GROUP
+from stat import *
+
+# Directories that we don't want writable by mailman.
+dirstochownroot= ( 'mail', 'cgi-bin', 'bin' )
+
+# Those are the programs that we patch so that they insist being run under the
+# mailman uid or as root.
+binfilestopatch= ( 'add_members', 'change_pw', 'check_db', 'clone_member',
+        'config_list', 'newlist', 'qrunner', 'remove_members',
+        'rmlist', 'sync_members', 'update', 'withlist' )
+
+def main(argv):
+    binpath = paths.prefix + '/bin/'
+    droplib = binpath + 'CheckFixUid.py'
+
+    if len(argv) < 2 or argv[1] != "-f":
+        print __doc__
+        sys.exit(1)
+
+    print "Making select directories owned and writable by root only"
+    gid = grp.getgrnam(MAILMAN_GROUP)[2]
+    for dir in dirstochownroot:
+        dirpath = paths.prefix + '/' + dir
+        os.chown(dirpath, 0, gid)
+        os.chmod(dirpath, 02755)
+        print dirpath
+
+    print
+
+    file = paths.prefix + '/data/last_mailman_version'
+    print "Making" + file + "owned by mailman (not root)"
+    uid = pwd.getpwnam(MAILMAN_USER)[2]
+    gid = grp.getgrnam(MAILMAN_GROUP)[2]
+    os.chown(file, uid, gid)
+    print
+
+    if not os.path.exists(droplib):
+        print "Creating " + droplib
+        fp = open(droplib, 'w', 0644)
+        fp.write("""import sys
+import os
+import grp, pwd
+from Mailman.mm_cfg import MAILMAN_USER, MAILMAN_GROUP
+
+class CheckFixUid:
+    uid = pwd.getpwnam(MAILMAN_USER)[2]
+    gid = grp.getgrnam(MAILMAN_GROUP)[2]
+    if os.geteuid() == 0:
+        os.setgid(gid)
+        os.setuid(uid)
+    if os.geteuid() != uid:
+        print "You need to run this script as root or mailman because it was configured to run"
+        print "on a linux system with a security patch which restricts hard links"
+        sys.exit()
+""")
+        fp.close()
+    else:
+        print "Skipping creation of " + droplib
+
+
+    print "\nMaking cgis setuid mailman"
+    cgis = glob.glob(paths.prefix + '/cgi-bin/*')
+
+    for file in cgis:
+        print file
+        os.chown(file, uid, gid)
+        os.chmod(file, 06755)
+
+    print "\nMaking mail wrapper setuid mailman"
+    file= paths.prefix + '/mail/mailman'
+    os.chown(file, uid, gid)
+    os.chmod(file, 06755)
+    print file
+
+    print "\nEnsuring that all config.db/pck files are owned by Mailman"
+    cdbs = glob.glob(paths.prefix + '/lists/*/config.db*')
+    cpcks = glob.glob(paths.prefix + '/lists/*/config.pck*')
+
+    for file in cdbs + cpcks:
+        stat = os.stat(file)
+        if (stat[ST_UID] != uid or stat[ST_GID] != gid):
+            print file
+            os.chown(file, uid, gid)
+
+    print "\nPatching mailman scripts to change the uid to mailman"
+
+    for script in binfilestopatch:
+        filefd = open(script, "r")
+        file = filefd.readlines()
+        filefd.close()
+
+        patched = 0
+        try:
+            file.index("import CheckFixUid\n")
+            print "Not patching " + script + ", already patched"
+        except ValueError:
+            file.insert(file.index("import paths\n")+1, "import CheckFixUid\n")
+            for i in range(len(file)-1, 0, -1):
+                object=re.compile("^([   ]*)main\(").search(file[i])
+                # Special hack to support patching of update
+                object2=re.compile("^([     ]*).*=[      ]*main\(").search(file[i])
+                if object:
+                    print "Patching " + script
+                    file.insert(i,
+                        object.group(1) + "CheckFixUid.CheckFixUid()\n")
+                    patched=1
+                    break
+                if object2:
+                    print "Patching " + script
+                    file.insert(i,
+                        object2.group(1) + "CheckFixUid.CheckFixUid()\n")
+                    patched=1
+                    break
+
+            if patched==0:
+                print "Warning, file "+script+" couldn't be patched."
+                print "If you use it, mailman may not function properly"
+            else:
+                filefd=open(script, "w")
+                filefd.writelines(file)
+
+main(sys.argv)

=== added file 'contrib/mailman.mc'
--- contrib/mailman.mc	1970-01-01 00:00:00 +0000
+++ contrib/mailman.mc	2010-10-14 12:15:59 +0000
@@ -0,0 +1,143 @@
+dnl
+dnl *** EXAMPLE *** sendmail.mc file for a Mailman list server using
+dnl mm-handler to deal with list operations (in place of aliases).
+dnl This is what I actually use on my site.
+dnl
+dnl $Id: mailman.mc 4287 2001-10-27 02:30:51Z bwarsaw $
+dnl
+
+
+dnl
+dnl First you need to define your general characteristics.  You
+dnl should know what these settings should be at your site -- I
+dnl only know what they should be at mine.
+dnl
+OSTYPE(solaris2)dnl
+DOMAIN(generic)dnl
+
+dnl
+dnl You can keep the old alias files for back-compatibility, but it's
+dnl probably better not to as this can become a point of confusion
+dnl later.
+dnl
+define(`ALIAS_FILE', `/etc/mail/aliases,/etc/mail/lists')
+
+dnl
+dnl I use procmail for local delivery, because it's smart to have a
+dnl local delivery mailer, even if you don't (ordinarily) do any local
+dnl delivery. The Solaris local delivery mailer is part of its sendmail
+dnl package. I pkgrmed the sendmail packages so that system upgrades
+dnl don't kill my sendmail.com sendmail, so mail.local is unavailable,
+dnl so I throw procmail in here even though it never gets used.
+dnl
+define(`PROCMAIL_MAILER_PATH', `/opt/bin/procmail')
+FEATURE(`local_procmail')
+MAILER(`local')
+
+dnl
+dnl Miscellaneous tuning.  Not relevant to Mailman.
+dnl
+define(`confCONNECTION_RATE_THROTTLE', 5)
+define(`confMAX_MESSAGE_SIZE', `5000000')
+define(`confNO_RCPT_ACTION', `add-to-undisclosed')
+define(`confME_TOO', `True')
+define(`confDOUBLE_BOUNCE_ADDRESS', `mailer-daemon')
+
+dnl
+dnl Privacy options.  Also not relevant.
+dnl
+define(`confPRIVACY_FLAGS', `authwarnings,needvrfyhelo,noexpn,noreceipts,restrictmailq')
+
+
+dnl
+dnl Mm-handler works by mailertabling all addresses on your list
+dnl server hostname(s) through the mm-handler mailer. Mailertable
+dnl maps mail domains to mailer types. I want a mailertable to map
+dnl listtest.uchicago.edu to the mm-handler mailer, but we need to
+dnl specifically request this functionality in the .mc file.
+dnl
+FEATURE(`mailertable', `hash -o /etc/mail/mailertable')
+
+dnl
+dnl This leads to an immediate and important side-effect: "local"
+dnl addresses, and notably RFC-specified addresses such as postmaster,
+dnl are assumed by sendmail to be lists! Since aliases are not processed
+dnl for domaintabled domains, we must use a virtusertable to reroute
+dnl such addresses.
+dnl
+FEATURE(`virtusertable', `hash -o /etc/mail/virtusertable')
+
+dnl
+dnl By default, sendmail applies virtusertable mapping, if at all, for
+dnl all interfaces for which it accepts mail -- i.e., all domains in
+dnl $=w. Mm-handler relies on your having a single domain (hostname)
+dnl that serves only lists, with no users. To avoid potential namespace
+dnl conflicts, you need not to have this list domain included in $=w.
+dnl As a result, virtuser mapping does not apply for the Mailman
+dnl list domain. However, you can pre-empt this rule by defining
+dnl $={VirtHost}: if there are domains in this class, they will be
+dnl mapped before $=w is mapped.
+dnl
+dnl VIRTUSER_DOMAIN() defines this class.
+dnl
+VIRTUSER_DOMAIN(`nospam.uchicago.edu listtest.uchicago.edu listhost.uchicago.edu')
+
+dnl
+dnl On a related point: by default, Sendmail probes for open IP
+dnl interfaces, and adds their hostnames to $=w. Although Sendmail does
+dnl virtusertable mapping for members of $=w, it doesn't do mailertable
+dnl mapping for them, because they're considered "local". This tells
+dnl Sendmail not to probe interfaces for local hosts, and it's critical
+dnl if your Mailman domain is actually an IP address (with an A record,
+dnl not just CNAME or MX) on your server.
+dnl
+define(`confDONT_PROBE_INTERFACES', `True')
+
+
+dnl
+dnl Even though my actual hostname is foobar, tell the world that I'm
+dnl listtest.uchicago.edu.
+dnl
+FEATURE(`limited_masquerade')
+MASQUERADE_AS(`listtest.uchicago.edu')
+
+
+dnl
+dnl Access control is a useful feature for blocking abusers and relays
+dnl and such.
+dnl
+FEATURE(`access_db')
+
+
+dnl
+dnl This allows you to block access for individual recipents through
+dnl the same access database as is used for blocking sender hosts and
+dnl addresses.
+dnl
+FEATURE(`blacklist_recipients')
+
+
+dnl
+dnl Other local mailers...
+dnl
+MAILER(`smtp')
+MAILER(`procmail')
+
+
+dnl
+dnl Our Mailman-specific local mailer.
+dnl
+MAILER_DEFINITIONS
+####################################
+###   New Mailer specifications  ###
+####################################
+
+## Special flags! See
+##	http://www.sendmail.org/~ca/email/doc8.10/op-sh-5.html#sh-5.4
+## Note especially the absence of the "m" and "n" flags. THIS IS
+## IMPORTANT: mm-handler assumes this behavior to avoid having to know
+## too much about address parsing and other RFC-2822 mail details.
+
+Mmailman,	P=/etc/mail/mm-handler, F=rDFMhlqSu, U=mailman:other,
+		S=EnvFromL, R=EnvToL/HdrToL,
+		A=mm-handler $h $u

=== added file 'contrib/majordomo2mailman.pl'
--- contrib/majordomo2mailman.pl	1970-01-01 00:00:00 +0000
+++ contrib/majordomo2mailman.pl	2010-10-14 12:15:59 +0000
@@ -0,0 +1,691 @@
+#!/usr/bin/perl -w
+
+# majordomo2mailman.pl - Migrate Majordomo mailing lists to Mailman 2.0
+#          Copyright (C) 2002 Heiko Rommel ([e-mail])
+
+# BAW: Note this probably needs to be upgraded to work with MM2.1
+
+#
+# License:
+#
+# 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 1, or (at your option)
+# any later version.
+
+#
+# Warranty:
+#
+# There's absolutely no warranty.
+#
+
+# comments on possible debug messages during the conversion:
+#
+# "not an valid email address" : those addresses are rejected, i.e. not imported into the Mailman list
+# "not a numeric value" : such a value will be converted to 0 (z.B. maxlength)
+# "already subscribed" : will only once be subscribed on the Mailman list
+# "...umbrella..." or "...taboo..." -> Mailman-Admin-Guide
+
+use strict;
+use Getopt::Long;
+use Fcntl;
+use POSIX qw (tmpnam);
+
+use vars qw (
+	     $majordomo $mydomain $myurl
+	     $aliasin $listdir
+	     $aliasout $mailmanbin
+	     $umbrella_member_suffix $private 
+	     $newsserver $newsprefix
+	     $susehack $susearchuser
+	     $help $debug $update $all $usagemsg
+	     *FH
+	     %mlaliases %mlowners %mlapprovers
+	     %defaultmlconf %mlconf
+	     %defaultmmconf %mmconf
+);
+
+#
+# adjust your site-specific settings here
+#
+
+$mydomain               = "my.domain";
+$majordomo              = "majordomo"; # the master Majordomo address for your site
+$aliasin                = "/var/lib/majordomo/aliases";
+$listdir                = "/var/lib/majordomo/lists";
+$aliasout               = "/tmp/aliases";
+$myurl                  = "http://my.domain/mailman/";
+$mailmanbin             = "/usr/lib/mailman/bin";
+$umbrella_member_suffix = "-owner";
+$private                = "yes"; # is this a private/Intranet site ?
+$newsserver             = "news.my.domain";
+$newsprefix             = "intern.";
+
+$susehack = "no";
+$susearchuser = "archdummy";
+
+#
+# 0)
+# parse the command line arguments
+#
+
+$usagemsg = "usage: majordomo2mailman [-h|--help] [-d|--debug] [-u|--update] < (-a|--all) | list-of-mailinglists >";
+
+GetOptions(
+           "h|help" => \$help,
+	   "d|debug" => \$debug,
+	   "a|all" => \$all,
+	   "u|update" => \$update
+) or die "$usagemsg\n";
+
+if (defined($help)) { die "$usagemsg\n"; }
+
+if ((not defined($all)) and (@ARGV<1)) { die "$usagemsg\n"; }
+
+if ($<) { die "this script must be run as root!\n"; }
+
+#
+# 1)
+# build a list of all aliases and extract the name of mailing lists plus their owners
+#
+
+%mlaliases = %mlowners = %mlapprovers = ();
+
+open (FH, "< $aliasin") or die "can't open $aliasin\n";
+
+while (<FH>) {
+  # first, build a list of all active aliases and their resolution
+  if (/^([^\#:]+)\s*:\s*(.*)$/) {
+    $mlaliases{$1} = $2;
+  }
+}
+
+my $mlalias;
+for $mlalias (keys %mlaliases) {
+  # if we encounter an alias with :include: as expansion
+  # it is save to assume that the alias has the form
+  # <mailinglist>-outgoing -
+  # that way we find the names of all active mailing lists
+  if ($mlaliases{$mlalias} =~ /\:include\:/) {
+    my $ml;
+    ($ml = $mlalias) =~ s/-outgoing//g;
+    $mlowners{$ml} = $mlaliases{"owner-$ml"};
+    $mlapprovers{$ml} = $mlaliases{"$ml-approval"};
+  }
+}
+
+close (FH);
+
+#
+# 2)
+# for each list read the Majordomo configuration params
+# and create a Mailman clone
+#
+
+my $ml;
+for $ml ((defined ($all)) ? sort keys %mlowners : @ARGV) {
+
+  init_defaultmlconf($ml);
+  %mlconf = %defaultmlconf;
+
+  init_defaultmmconf($ml);
+  %mmconf = %defaultmmconf;
+
+  my @privileged; # addresses that are mentioned in restrict_post
+  my @members;
+  my ($primaryowner, @secondaryowner);
+  my ($primaryapprover, @secondaryapprover);
+
+  my ($skey, $terminator);
+  my $filename;
+  my @args;
+
+  #
+  # a)
+  # parse the configuration file
+  #
+
+  open (FH, "< $listdir/$ml.config") or die "can't open $listdir/$ml.config\n";
+
+  while (<FH>) {
+    # key = value ?
+    if (/^\s*([^=\#\s]+)\s*=\s*(.*)\s*$/) {
+      $mlconf{$1} = $2;
+    }
+    # key << EOF
+    # value
+    # EOF ?
+    elsif (/^\s*([^<\#\s]+)\s*<<\s*(.*)\s*$/) {
+      ($skey, $terminator) = ($1, $2);
+      while (<FH>) {
+	last if (/^$terminator\s*$/);
+	$mlconf{$skey} .= $_;
+      }
+      chomp $mlconf{$skey};
+    }
+  }
+
+  close (FH);
+
+  #
+  # b)
+  # test if there are so-called flag files (clue that this is an old-style Majordomo lists)
+  # and overwrite previously parsed values
+  # (stolen from majordomo::config_parse.pl: handle_flag_files())
+  #
+
+  if ( -e "$listdir/$ml.private") {
+    $mlconf{"get_access"} = "closed";
+    $mlconf{"index_access"} = "closed";
+    $mlconf{"who_access"} = "closed";
+    $mlconf{"which_access"} = "closed";
+  }
+
+  $mlconf{"subscribe_policy"} = "closed" if ( -e "$listdir/$ml.closed");
+  $mlconf{"unsubscribe_policy"} = "closed" if ( -e "$listdir/$ml.closed");
+
+  if ( -e "$listdir/$ml.auto" && -e "$listdir/$ml.closed") {
+    print STDERR "sowohl $ml.auto als auch $ml.closed existieren. Wähle $ml.closed\n"; 
+  }
+  else {
+    $mlconf{"subscribe_policy"} = "auto" if ( -e"$listdir/$ml.auto"); 
+    $mlconf{"unsubscribe_policy"} = "auto" if ( -e"$listdir/$ml.auto"); 
+  }
+
+  $mlconf{"strip"} = 1 if ( -e "$listdir/$ml.strip");
+  $mlconf{"noadvertise"} = "/.*/" if ( -e "$listdir/$ml.hidden");
+
+  # admin_passwd:
+  $filename = "$listdir/" . $mlconf{"admin_passwd"};
+  if ( -e "$listdir/$ml.passwd" ) {
+    $mlconf{"admin_passwd"} = read_from_file("$listdir/$ml.passwd");
+  }
+  elsif ( -e "$filename" ) {
+    $mlconf{"admin_passwd"} = read_from_file("$filename");
+  }
+  # else take it verbatim
+
+  # approve_passwd:
+  $filename = "$listdir/" . $mlconf{"approve_passwd"};
+  if ( -e "$listdir/$ml.passwd" ) {
+    $mlconf{"approve_passwd"} = read_from_file("$listdir/$ml.passwd");
+  }
+  elsif ( -e "$filename" ) {
+    $mlconf{"approve_passwd"} = read_from_file("$filename");
+  }
+  # else take it verbatim
+
+  #
+  # c)
+  # add some information from additional configuration files
+  #
+
+  # restrict_post
+  if (defined ($mlconf{"restrict_post"})) {
+    @privileged = ();
+    for $filename (split /\s+/, $mlconf{"restrict_post"}) {
+      open (FH, "< $listdir/$filename") or die "can't open $listdir/$filename\n";
+      push (@privileged, <FH>);
+      chomp @privileged;
+      close (FH);
+    }
+  }
+
+  if ($susehack =~ m/yes/i) {
+    @privileged = grep(!/$susearchuser\@$mydomain/i, @privileged);
+  }
+
+  $mlconf{"privileged"} = \@privileged;
+
+  # members
+  @members = ();
+  open (FH, "< $listdir/$ml") or die "can't open $listdir/$ml\n";
+  push (@members, <FH>);
+  chomp @members;
+  close (FH);
+
+  $mlconf{"gated"} = "no";
+
+  if ($susehack =~ m/yes/i) {
+    if (grep(/$susearchuser\@$mydomain/i, @members)) {
+      $mlconf{"gated"} = "yes";
+    }
+    @members = grep(!/$susearchuser\@$mydomain/i, @members);
+  }
+
+  $mlconf{"members"} = \@members;
+
+  # intro message
+  if (open (FH, "< $listdir/$ml.intro")) {
+    { local $/; $mlconf{"intro"} = <FH>; }
+  }
+  else { $mlconf{"intro"} = ""; }
+
+  # info message
+  if (open (FH, "< $listdir/$ml.info")) {
+    { local $/; $mlconf{"info"} = <FH>; }
+  }
+  else { $mlconf{"info"} = ""; }
+  
+  #
+  # d)
+  # take over some other params into the configuration table
+  #
+
+  $mlconf{"name"} = "$ml";
+
+  ($primaryowner, @secondaryowner) = 
+    expand_alias (split (/\s*,\s*/, aliassub($mlowners{$ml})));
+
+  ($primaryapprover, @secondaryapprover) =
+    expand_alias (split (/\s*,\s*/, aliassub($mlapprovers{$ml})));
+
+  $mlconf{"primaryowner"} = $primaryowner;
+  $mlconf{"secondaryowner"} = \@secondaryowner;
+
+  $mlconf{"primaryapprover"} = $primaryapprover;
+  $mlconf{"secondaryapprover"} = \@secondaryapprover;
+
+  #
+  # debugging output
+  #
+
+  if (defined ($debug)) {
+    print "##################### $ml ####################\n";
+    for $skey (sort keys %mlconf) {
+      if (defined ($mlconf{$skey})) { print "$skey = $mlconf{$skey}\n"; }
+      else { print "$skey = (?)\n"; }
+    }
+    my $priv;
+    for $priv (@privileged) {
+      print "\t$ml: $priv\n";
+    }
+  }
+
+  #
+  # e)
+  # with the help of Mailman commands - create a new list and subscribe the old staff
+  #
+
+  if (defined($update)) {
+    print "updating configuration of \"$ml\"\n";
+  }
+  else {
+    # Mailman lists can initially be only created with one owner
+    @args = ("$mailmanbin/newlist", "-q", "-o", "$aliasout", "$ml", $mlconf{"primaryowner"}, $mlconf{"admin_passwd"});
+    system (@args) == 0 or die "system @args failed: $?";
+  }
+   
+  # Mailman accepts only subscriber lists > 0
+  if (@members > 0) {
+    $filename = tmpnam();
+    open (FH, "> $filename") or die "can't open $filename\n";
+    for $skey (@members) {
+      print FH "$skey" . "\n";
+    }
+    close (FH);
+    @args = ("$mailmanbin/add_members", "-n", "$filename", "--welcome-msg=n", "$ml");
+    system (@args) == 0 or die "system @args failed: $?";
+  }
+
+  #
+  # f)
+  # "translate" the Majordomo list configuration
+  #
+
+  m2m();
+
+  # write the Mailman config
+
+  $filename = tmpnam();
+
+  open (FH, "> $filename") or die "can't open $filename\n";
+  for $skey (sort keys %mmconf) {
+    print FH "$skey = " . $mmconf{$skey} . "\n";
+  }
+  close (FH);
+
+  @args = ("$mailmanbin/config_list", "-i", "$filename", "$ml");
+  system (@args) == 0 or die "system @args failed: $?";
+
+  unlink($filename) or print STDERR "unable to unlink \"$filename\"!\n";
+
+}
+
+exit 0;
+
+#############
+# subs
+#############
+
+#
+# I don't know how to write Perl code
+# therefor I need this stupid procedure to cleanly read a value from file
+#
+
+sub read_from_file {
+  my $value;
+  local *FH;
+
+  open (FH, "< $_[0]") or die "can't open $_[0]\n";
+  $value = <FH>;
+  chomp $value;
+  close (FH);
+
+  return $value;
+}
+
+
+#
+# add "@$mydomain" to each element that does not contain a "@"
+#
+
+sub expand_alias {
+  return map  { (not $_ =~ /@/) ? $_ .= "\@$mydomain" : $_ } @_;
+}
+
+#
+# replace the typical owner-majordomo aliases
+#
+
+sub aliassub {
+  my $string = $_[0];
+
+  $string =~ s/(owner-$majordomo|$majordomo-owner)/mailman-owner/gi;
+
+  return $string;
+}
+
+#
+# default values of Majordomo mailing lists
+# (stolen from majordomo::config_parse.pl: %known_keys)
+#
+
+sub init_defaultmlconf {
+  my $ml = $_[0];
+
+  %defaultmlconf=(  
+		     'welcome',	"yes",
+		     'announcements',	"yes",
+		     'get_access',	"open",
+		     'index_access',	"open",
+		     'who_access',	"open",
+		     'which_access',	"open",
+		     'info_access',	"open",
+		     'intro_access',	"open",
+		     'advertise',	"",
+		     'noadvertise',	"",
+		     'description',	"",
+		     'subscribe_policy',	"open",
+		     'unsubscribe_policy',	"open",
+		     'mungedomain',	"no",
+		     'admin_passwd',	"$ml.admin",
+		     'strip',		"yes",
+		     'date_info',	"yes",
+		     'date_intro',	"yes",
+		     'archive_dir',	"",
+		     'moderate',	"no",
+		     'moderator',	"",
+		     'approve_passwd', "$ml.pass",
+		     'sender', 	"owner-$ml",
+		     'maxlength', 	"40000",
+		     'precedence', 	"bulk",
+		     'reply_to', 	"",
+		     'restrict_post',	"",
+		     'purge_received', "no",
+		     'administrivia', 	"yes",
+		     'resend_host', 	"",
+		     'debug', 		"no",
+		     'message_fronter', "",
+		     'message_footer',  "",
+		     'message_headers', "",
+		     'subject_prefix',	"",
+		     'taboo_headers',	"",
+		     'taboo_body',	"",
+		     'digest_volume',	"1",
+		     'digest_issue',	"1",
+		     'digest_work_dir', "",
+		     'digest_name',	"$ml",
+		     'digest_archive',	"",
+		     'digest_rm_footer',    "",
+		     'digest_rm_fronter',   "",  
+		     'digest_maxlines', "",
+		     'digest_maxdays',	"",
+		     'comments',	""
+		    );
+}
+
+
+#
+# Mailman mailing list params that are not derived from Majordomo mailing lists params
+# (e.g. bounce_matching_headers+forbbiden_posters vs. taboo_headers+taboo_body)
+# If you need one of this params to be variable remove it here and add some code to the 
+# main procedure; additionally, you should compare it with what you have in
+# /usr/lib/mailman/Mailman/mm_cfg.py
+#
+
+sub init_defaultmmconf {
+
+  %defaultmmconf=(  
+		  'goodbye_msg', "\'\'",
+		  'umbrella_list', "0",
+		  'umbrella_member_suffix', "\'$umbrella_member_suffix\'",
+		  'send_reminders', "0",
+		  'admin_immed_notify', "1",
+		  'admin_notify_mchanges', "0",
+		  'dont_respond_to_post_requests', "0",
+		  'obscure_addresses', "1",
+		  'require_explicit_destination', "1",
+		  'acceptable_aliases', "\"\"\"\n\"\"\"\n",
+		  'max_num_recipients', "10",
+		  'forbidden_posters', "[]",
+		  'bounce_matching_headers',  "\"\"\"\n\"\"\"\n",
+		  'anonymous_list', "0",
+		  'nondigestable', "1",
+		  'digestable', "1",
+		  'digest_is_default', "0",
+		  'mime_is_default_digest', "0",
+		  'digest_size_threshhold', "40",
+		  'digest_send_periodic', "1",
+		  'digest_header', "\'\'",
+		  'bounce_processing', "1",
+		  'minimum_removal_date', "4",
+		  'minimum_post_count_before_bounce_action', "3",
+		  'max_posts_between_bounces', "5",
+		  'automatic_bounce_action', "3",
+		  'archive_private', "0",
+		  'clobber_date', "1",
+		  'archive_volume_frequency', "1",
+		  'autorespond_postings', "0",
+		  'autoresponse_postings_text', "\'\'",
+		  'autorespond_admin', "0",
+		  'autoresponse_admin_text', "\'\'",
+		  'autorespond_requests', "0",
+		  'autoresponse_request_text', "\'\'",
+		  'autoresponse_graceperiod', "90"
+		 );
+}
+
+#
+# convert a Majordomo mailing list configuration (%mlconf) into a 
+# Mailman mailing list configuration (%mmconf)
+# only those params are affected which can be derived from Majordomo 
+# mailing list configurations
+#
+
+sub m2m {
+
+  my $elem;
+  my $admin;
+
+  $mmconf{"real_name"} = "\'" . $mlconf{"name"} . "\'";
+
+  # Mailman does not know the difference between owner and approver
+  for $admin (($mlconf{"primaryowner"}, @{$mlconf{"secondaryowner"}},
+	       $mlconf{"primaryapprover"}, @{$mlconf{"secondarapprover"}})) {
+    # merging owners and approvers may result in a loop:
+    if (lc($admin) ne lc("owner-" . $mlconf{"name"} . "\@" . $mydomain)) {
+      $mmconf{"owner"} .= ",\'" . "$admin" . "\'";
+    }
+  }
+  $mmconf{"owner"} =~ s/^,//g;
+  $mmconf{"owner"} = "\[" . $mmconf{"owner"} . "\]";
+
+  # remove characters that will break Python
+  ($mmconf{"description"} = $mlconf{"description"}) =~ s/\'/\\\'/g;
+  $mmconf{"description"} = "\'" . $mmconf{"description"} . "\'";
+
+  $mmconf{"info"} = "\"\"\"\n" . $mlconf{"info"} . "\"\"\"\n";
+
+  $mmconf{"subject_prefix"} = "\'" . $mlconf{"subject_prefix"} . "\'";
+
+  $mmconf{"welcome_msg"} = "\"\"\"\n" . $mlconf{"intro"} . "\"\"\"\n";
+
+  # I don't know how to handle this because the reply_to param in the lists
+  # I had were not configured consistently
+  if ($mlconf{"reply_to"} =~ /\S+/) {
+    if ($mlconf{"name"} . "\@" =~ m/$mlconf{"reply_to"}/i) {
+      $mmconf{"reply_goes_to_list"} = "1";
+      $mmconf{"reply_to_address"} = "\'\'";
+    }
+    else {
+      $mmconf{"reply_goes_to_list"} = "2";
+      $mmconf{"reply_to_address"} = "\'" . $mlconf{"reply_to"} . "\'";
+    }
+  }
+  else {
+    $mmconf{"reply_goes_to_list"} = "0";
+    $mmconf{"reply_to_address"} = "\'\'";
+  }
+
+  $mmconf{"administrivia"} = ($mlconf{"administrivia"} =~ m/yes/i) ? "1" : "0";
+  $mmconf{"send_welcome_msg"} = ($mlconf{"welcome"} =~ m/yes/i) ? "1" : "0";
+
+  $mmconf{"max_message_size"} = int ($mlconf{"maxlength"} / 1000);
+
+  $mmconf{"host_name"} = ($mlconf{"resend_host"} =~ /\S+/) ? 
+    $mlconf{"resend_host"} : "\'" . $mydomain . "\'";
+
+  $mmconf{"web_page_url"} = "\'" . $myurl . "\'";
+
+  # problematic since Mailman does not know access patterns
+  # I assume, that if there was given a noadvertise pattern, the
+  # list shouldn't be visible at all
+  $mmconf{"advertised"} = ($mlconf{"noadvertise"} =~ /\.\*/) ? "0" : "1";
+
+  # confirm+approval is much to long winded for private sites
+  $mmconf{"subscribe_policy"} = 
+    ($mlconf{"subscribe_policy"} =~ m/(open|auto)/i) ? "1" : 
+      ($private =~ m/yes/i) ? "2" : "3";
+
+  # in case this is a private site allow list visiblity at most
+  $mmconf{"private_roster"} =
+    ($mlconf{"who_access"} =~ m/open/i and not $private =~ m/yes/i) ? "0" :
+      ($mlconf{"who_access"} =~ m/open|list/i) ? "1" : "2";
+
+  $mmconf{"moderated"} = ($mlconf{"moderate"} =~ m/yes/i) ? "1" : "0";
+  # there is no way to a set a separate moderator in Mailman
+
+  # external, since lengthy
+  mm_posters();
+
+  if ($mlconf{"message_fronter"} =~ /\S+/) {
+    $mmconf{"msg_header"} = "\"\"\"\n" . $mlconf{"message_fronter"} . "\"\"\"\n";
+  }
+  else {
+    $mmconf{"msg_header"} = "\'\'";
+  }
+
+  if ($mlconf{"message_footer"} =~ /\S+/) {
+    $mmconf{"msg_footer"} = "\"\"\"\n" . $mlconf{"message_footer"} . "\"\"\"\n";
+  }
+  else {
+    $mmconf{"msg_footer"} = "\'\'";
+  }
+
+  # gateway to news
+  $mmconf{"nntp_host"} = "\'" . $newsserver . "\'";
+  $mmconf{"linked_newsgroup"} = "\'" . $newsprefix . $mlconf{"name"} . "\'";
+
+  if ($mlconf{"gated"} =~ m/yes/i) {
+    $mmconf{"gateway_to_news"} = "1";
+    $mmconf{"gateway_to_mail"} = "1";
+    $mmconf{"archive"} = "1";
+  }
+  else {
+    $mmconf{"gateway_to_news"} = "0";
+    $mmconf{"gateway_to_mail"} = "0";
+    $mmconf{"archive"} = "0";
+  }
+
+  # print warnings if this seems to be an umbrella list
+  for $elem (@{$mlconf{"privileged"}}, @{$mlconf{"members"}}) {
+    $elem =~ s/\@$mydomain//gi;
+    if (defined($mlaliases{$elem . $umbrella_member_suffix})) {
+      print STDERR "\"" . $mlconf{"name"} .
+	 "\" possibly forms part off/is an umbrella list, since \"$elem\" is a local mailing list alias\n";   
+    }
+  }
+
+  # print warnings if we encountered a Taboo-Header or Taboo-Body
+  if ($mlconf{"taboo_headers"} =~ /\S+/ or $mlconf{"taboo_body"} =~ /\S+/) {
+    print STDERR "\"" . $mlconf{"name"} . "\" taboo_headers or taboo_body seem to be set - please check manually.\n";
+  }
+}
+
+#
+# with some set theory on the member and priviliged list try to determine the params
+# $mmconf{"member_posting_only"} and $mmconf{"posters"}
+#
+
+sub mm_posters {
+  if ($mlconf{"restrict_post"} =~ /\S+/) {
+    my %privileged = ();
+    my %members = ();
+    my $key;
+
+    foreach $key (@{$mlconf{"privileged"}}) { $privileged{$key} = "OK"; }
+    foreach $key (@{$mlconf{"members"}}) { $members{$key} = "OK"; }
+
+    # are all members privileged, too ?
+    my $included = 1;
+    foreach $key (keys %members) {
+      if (not exists $privileged{$key}) {
+	$included = 0;
+	last;
+      }
+    }
+    if ($included) {
+      $mmconf{"member_posting_only"} = "1";
+
+      # posters = privileged - members:
+      my %diff = %privileged;
+      foreach $key (keys %members) {
+	delete $diff{$key} if exists $members{$key};
+      }
+
+      $mmconf{"posters"} = "";
+      for $key (sort keys %diff) {
+	$mmconf{"posters"} .= ",\'" . $key . "\'";
+      }
+      $mmconf{"posters"} =~ s/^,//g;
+      $mmconf{"posters"} = "[" . $mmconf{"posters"} . "]";
+    }
+    else {
+      $mmconf{"member_posting_only"} = "0";
+
+      # posters = privileged:
+      $mmconf{"posters"} = "";
+      for $key (sort keys %privileged) {
+	$mmconf{"posters"} .= ",\'" . $key . "\'";
+      }
+      $mmconf{"posters"} =~ s/^,//g;
+      $mmconf{"posters"} = "[" . $mmconf{"posters"} . "]";
+    }
+  }
+  else {
+    $mmconf{"member_posting_only"} = "0";
+    $mmconf{"posters"} = "[]";
+  }
+}
+

=== added file 'contrib/mm-handler'
--- contrib/mm-handler	1970-01-01 00:00:00 +0000
+++ contrib/mm-handler	2010-10-14 12:15:59 +0000
@@ -0,0 +1,236 @@
+#!/usr/local/bin/perl
+##
+## Sendmail mailer for Mailman
+##
+## Simulates these aliases:
+##
+##testlist:              "|/home/mailman/mail/mailman post testlist"
+##testlist-admin:        "|/home/mailman/mail/mailman admin testlist"
+##testlist-bounces:      "|/home/mailman/mail/mailman bounces testlist"
+##testlist-confirm:      "|/home/mailman/mail/mailman confirm testlist"
+##testlist-join:         "|/home/mailman/mail/mailman join testlist"
+##testlist-leave:        "|/home/mailman/mail/mailman leave testlist"
+##testlist-owner:        "|/home/mailman/mail/mailman owner testlist"
+##testlist-request:      "|/home/mailman/mail/mailman request testlist"
+##testlist-subscribe:    "|/home/mailman/mail/mailman subscribe testlist"
+##testlist-unsubscribe:  "|/home/mailman/mail/mailman unsubscribe testlist"
+##owner-testlist:        testlist-owner
+
+## Some assembly required.
+$MMWRAPPER = "/home/mailman/mail/mailman";
+$MMLISTDIR = "/home/mailman/lists";
+$SENDMAIL = "/usr/lib/sendmail -oem -oi";
+$VERSION = '$Id: mm-handler 5100 2002-04-05 19:41:09Z bwarsaw $';
+
+## Comment this if you offer local user addresses.
+$NOUSERS = "\nPersonal e-mail addresses are not offered by this server.";
+
+# uncomment for debugging....
+#$DEBUG = 1;
+
+use FileHandle;
+use Sys::Hostname;
+use Socket;
+
+($VERS_STR = $VERSION) =~ s/^\$\S+\s+(\S+),v\s+(\S+\s+\S+\s+\S+).*/\1 \2/;
+
+$BOUNDARY = sprintf("%08x-%d", time, time % $$);
+
+## Informative, non-standard rejection letter
+sub mail_error {
+	my ($in, $to, $list, $server, $reason) = @_;
+	my $sendmail;
+
+	if ($server && $server ne "") {
+		$servname = $server;
+	} else {
+		$servname = "This server";
+		$server = &get_ip_addr;
+	}
+
+	#$sendmail = new FileHandle ">/tmp/mm-$$";
+	$sendmail = new FileHandle "|$SENDMAIL $to";
+	if (!defined($sendmail)) {
+		print STDERR "$0: cannot exec \"$SENDMAIL\"\n";
+		exit (-1);
+	}
+
+	$sendmail->print ("From: MAILER-DAEMON\@$server
+To: $to
+Subject: Returned mail: List unknown
+Mime-Version: 1.0
+Content-type: multipart/mixed; boundary=\"$BOUNDARY\"
+Content-Disposition: inline
+
+--$BOUNDARY
+Content-Type: text/plain; charset=us-ascii
+Content-Description: Error processing your mail
+Content-Disposition: inline
+
+Your mail for $list could not be sent:
+	$reason
+
+For a list of publicly-advertised mailing lists hosted on this server,
+visit this URL:
+	http://$server/
+
+If this does not resolve your problem, you may write to:
+	postmaster\@$server
+or
+	mailman-owner\@$server
+
+
+$servname delivers e-mail to registered mailing lists
+and to the administrative addresses defined and required by IETF
+Request for Comments (RFC) 2142 [1].
+$NOUSERS
+
+The Internet Engineering Task Force [2] (IETF) oversees the development
+of open standards for the Internet community, including the protocols
+and formats employed by Internet mail systems.
+
+For your convenience, your original mail is attached.
+
+
+[1] Crocker, D. \"Mailbox Names for Common Services, Roles and
+    Functions\".  http://www.ietf.org/rfc/rfc2142.txt
+
+[2] http://www.ietf.org/
+
+--$BOUNDARY
+Content-Type: message/rfc822
+Content-Description: Your undelivered mail
+Content-Disposition: attachment
+
+");
+
+	while ($_ = <$in>) {
+		$sendmail->print ($_);
+	}
+
+	$sendmail->print ("\n");
+	$sendmail->print ("--$BOUNDARY--\n");
+
+	close($sendmail);
+}
+
+## Get my IP address, in case my sendmail doesn't tell me my name.
+sub get_ip_addr {
+	my $host = hostname;
+	my $ip = gethostbyname($host);
+	return inet_ntoa($ip);
+}
+
+## Split an address into its base list name and the appropriate command
+## for the relevant function.
+sub split_addr {
+	my ($addr) = @_;
+	my ($list, $cmd);
+	my @validfields = qw(admin bounces confirm join leave owner request
+				subscribe unsubscribe);
+
+	if ($addr =~ /(.*)-(.*)\+.*$/) {
+		$list = $1;
+		$cmd = "$2";
+	} else {
+		$addr =~ /(.*)-(.*)$/;
+		$list = $1;
+		$cmd = $2;
+	}
+	if (grep /^$cmd$/, @validfields) {
+		if ($list eq "owner") {
+			$list = $cmd;
+			$cmd = "owner";
+		}
+	} else {
+		$list = $addr;
+		$cmd = "post";
+	}
+
+	return ($list, $cmd);
+}
+
+## The time, formatted as for an mbox's "From_" line.
+sub mboxdate {
+	my ($time) = @_;
+	my @days = qw(Sun Mon Tue Wed Thu Fri Sat);
+	my @months = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
+	my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) =
+		localtime($time);
+
+	## Two-digit year handling complies with RFC 2822 (section 4.3),
+	## with the addition that three-digit years are accommodated.
+	if ($year < 50) {
+		$year += 2000;
+	} elsif ($year < 1900) {
+		$year += 1900;
+	}
+
+	return sprintf ("%s %s %2d %02d:%02d:%02d %d",
+		$days[$wday], $months[$mon], $mday,
+		$hour, $min, $sec, $year);
+}
+
+BEGIN: {
+	$sender = undef;
+	$server = undef;
+	@to = ();
+	while ($#ARGV >= 0) {
+		if ($ARGV[0] eq "-r") {
+			$sender = $ARGV[1];
+			shift @ARGV;
+		} elsif (!defined($server)) {
+			$server = $ARGV[0];
+		} else {
+			push(@to, $ARGV[0]);
+		}
+		shift @ARGV;
+	}
+
+	if ($DEBUG) {
+		$to = join(',', @to);
+		print STDERR "to: $to\n";
+		print STDERR "sender: $sender\n";
+		print STDERR "server: $server\n";
+		exit(-1);
+	}
+
+ADDR:	for $addr (@to) {
+		$prev = undef;
+		$list = $addr;
+
+		$cmd= "post";
+		if (! -f "$MMLISTDIR/$list/config.pck") {
+			($list, $cmd) = &split_addr($list);
+			if (! -f "$MMLISTDIR/$list/config.pck") {
+				$was_to = $addr;
+				$was_to .= "\@$server" if ("$server" ne "");
+				mail_error(\*STDIN, $sender, $was_to, $server,
+					"no list named \"$list\" is known by $server");
+				next ADDR;
+			}
+		}
+
+		$wrapper = new FileHandle "|$MMWRAPPER $cmd $list";
+		if (!defined($wrapper)) {
+			## Defer?
+			print STDERR "$0: cannot exec ",
+				"\"$MMWRAPPER $cmd $list\": deferring\n";
+			exit (-1);
+		}
+
+		# Don't need these without the "n" flag on the mailer def....
+		#$date = &mboxdate(time);
+		#$wrapper->print ("From $sender  $date\n");
+
+		# ...because we use these instead.
+		$from_ = <STDIN>;
+		$wrapper->print ($from_);
+
+		$wrapper->print ("X-Mailman-Handler: $VERSION\n");
+		while (<STDIN>) {
+			$wrapper->print ($_);
+		}
+		close($wrapper);
+	}
+}

=== added file 'contrib/mmdsr'
--- contrib/mmdsr	1970-01-01 00:00:00 +0000
+++ contrib/mmdsr	2010-10-14 12:15:59 +0000
@@ -0,0 +1,572 @@
+#!/bin/sh
+###############################################################################
+# mmdsr -- Mailman Daily Status Report (cron job, run at 23:59)
+###############################################################################
+# Copyright (c) 2005, Brad Knowles
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions
+# are met:
+# 
+#     Redistributions of source code must retain the above copyright
+#     notice, this list of conditions and the following disclaimer.
+# 
+#     Redistributions in binary form must reproduce the above copyright
+#     notice, this list of conditions and the following disclaimer
+#     in the documentation and/or other materials provided with the
+#     distribution.
+# 
+#     The name of the author or other contributors may not be used
+#     to endorse or promote products derived from this software without
+#     specific prior written permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+# "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+# LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
+# FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
+# COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
+# INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
+# BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+# CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
+# ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+###############################################################################
+
+###############################################################################
+# Version history
+###############################################################################
+# 0.0.1		Initial creation by Brad Knowles <[e-mail]>
+#		Created on: Tue Feb 15 04:01:20 PST 2005
+#
+# 0.0.2         Update by Brad Knowles <[e-mail]>
+#               Updated on: Wed Feb 16 18:55:52 CET 2005
+#               Feedback from Tom G. Christensen (tgc99):
+#               > The current UID grab command doesn't work on Solaris 
+#               > (2.6 & 8 tested).      
+#               >
+#               > I'd recommend this instead:
+#               > ps -o user -p $$|tail -1
+#               >
+#               > This is tested and works on RH 6.2, RH 7.3, RHEL 2.1,
+#               > RHEL3, FC3, FreeBSD 4.9, Solaris 2.6, 8.
+#
+# 0.0.3         Update by Brad Knowles <[e-mail]>
+#               Updated on: Sun Mar 13 01:15:24 CET 2005
+#               Noted errors from grep when trying to search a nonexistant
+#               file.  Added "-s" option to compensate, and extra code to
+#		notify the admin if the log file doesn't exist.
+#
+# 0.0.4         Update by Brad Knowles <[e-mail]>
+#               Updated on: Sun Mar 13 01:58:37 CET 2005
+#               Eliminate some extra cruft from the "fromusenet" logs.
+#
+# 0.0.5         Update by Brad Knowles <[e-mail]>
+#               Updated on: Wed Apr 13 00:54:42 CEST 2005
+#		Eliminate a lot of extra cruft from the "error" & "vette" logs.
+#               Eliminate more cruft from the "fromusenet" logs.
+#
+# 0.0.6         Update by Brad Knowles <[e-mail]>
+#               Updated on: Thu Apr 14 03:07:08 CEST 2005
+#               Eliminate even more cruft from the "fromusenet" logs.
+#               Eliminate more cruft from the "vette" logs.
+#               Eliminate cruft from the "mischief" logs.
+#
+# 0.0.7         Update by Brad Knowles <[e-mail]>
+#               Updated on: Sun May  1 22:29:13 CEST 2005   [guess]
+#		The "error" log "no such list" errors didn't need to be
+#		quite so "compressed", open them up to be more readable.
+#		Also eliminate all use of "xargs", use "fmt -w 75" instead.
+#
+# 0.0.8         Update by Brad Knowles <[e-mail]>
+#               Updated on: Sun May  1 23:09:13 CEST 2005
+#		Clean up code for queue subdirectories to check.
+#
+# 0.0.9         Update by Brad Knowles <[e-mail]>
+#               Updated on: Wed May 11 01:23:40 CEST 2005
+#		Eliminate date/time stamps from the rest of the logs,
+#		then pipe through `sort | uniq -c | sort -nr`
+#		so that all possible duplicates are eliminated.
+#
+# 0.0.10	Update by Brad Knowles <[e-mail]>
+#		Updated on: Tue Jul 12 16:53:49 CDT 2005
+#		Add code to do summary of normal list activity
+#
+# 0.0.11	Update by Brad Knowles <[e-mail]>
+#		Updated on: Tue Sep  6 15:44:19 CEST 2005
+#		Tweaked display of Mailman/qfiles subdirectories
+#		so as to avoid displaying more than $MAX_LINES
+#		output, which really helps if you have thousands
+#		of bounces sitting around, etc....
+#		Also slightly tweaked display of fromusenet logs
+#		to split summary from errors.
+#
+# 0.0.12	Update by Brad Knowles <[e-mail]>
+#		Updated on: Thu Sep 22 22:37:35 CEST 2005
+#		Bugs found by Mark Sapiro and Adrian Wells.
+#		Mark suggested splitting the Mailman log directory
+#		from the rest of the Mailman source and queues,
+#		as well as making sure to clean up all temp files.
+#		Adrian discovered that there was a log file format
+#		change between Mailman 2.1.5 and 2.1.6, which broke
+#		hourly statistics.
+#
+# 0.0.13	Update by Brad Knowles <[e-mail]>
+#		Updated on: Mon Dec 26 05:54:27 CET 2005
+#		Bugs found by Tom G. Christensen (tgc99):
+#		> ps output on solaris is full of whitespace but a further
+#		> echo get's rid of it.
+#		> The lines in the smtp log are sometimes broken up by a
+#		> newline (right before the msgid) which throws of the
+#		> summary. Piping it through sed first will rejoin the broken
+#		> lines.
+#		> Use $AWK instead of awk.
+#		Enhancements from Mark Sapiro:
+#		> The vette log summary lists posts held for moderation
+#		> individually under "Other Errors:". The following patch
+#		> (watch out for wrapped lines) summarizes them by list instead.
+#
+# 0.0.14	Update by Brad Knowles <[e-mail]>
+#		Updated on: Thu Dec 29 08:17:38 CET 2005
+#		Added code to check /usr/local/mailman/data for
+#		moderation hold queue
+#
+# 0.0.15	Update by Brad Knowles <[e-mail]>
+#		Updated on: Thu Jan 26 02:39:38 CET 2006
+#		Tweaked display of summary data in the "smtp-failure" log,
+#		and "other" category in the "vette" log, so as to reduce
+#		the spewage when things go wonky, mostly by removing
+#		unique-ifying data like message-id or sender address.
+#		Also tweaked moderation queue information, to tell us
+#		how many Python pickle files are in the data directory,
+#		as opposed to just doing a directory listing and skipping
+#		the files in the middle if there are too many -- now we
+#		know how many are being skipped.
+#
+# 0.0.16	Update by Brad Knowles <[e-mail]>
+#		Updated on: Sun Jan 29 11:45:58 CET 2006
+#		Mark found a couple of typos that I somehow let slip
+#		through.  Thanks!
+
+###############################################################################
+# Set up locations of standard commands, directories, etc....
+# You may need to modify these for your platform or installation.
+###############################################################################
+
+AWK="/usr/bin/awk"
+BASENAME="/usr/bin/basename"
+CAT="/bin/cat"
+DATE="/bin/date"
+EGREP="/bin/egrep"
+FMT="/usr/bin/fmt"
+GREP="/bin/grep"
+HEAD="/usr/bin/head"
+LS="/bin/ls"
+PS="/bin/ps"
+RM="/bin/rm"
+SED="/bin/sed"
+SENDMAIL="/usr/sbin/sendmail"
+SLEEP="/bin/sleep"
+SORT="/usr/bin/sort"
+TAIL="/usr/bin/tail"
+TOUCH="/bin/touch"
+TR="/usr/bin/tr"
+UNIQ="/usr/bin/uniq"
+XARGS="/usr/bin/xargs"
+WC="/usr/bin/wc"
+
+###############################################################################
+# Directory for temporary files
+###############################################################################
+TMPDIR="/tmp"
+
+###############################################################################
+# Mailman queue directory
+###############################################################################
+QUEUEDIR="/usr/local/mailman/qfiles"
+
+###############################################################################
+# Mailman log directory
+###############################################################################
+LOGDIR="/usr/local/mailman/logs"
+
+###############################################################################
+# Mailman data directory
+###############################################################################
+DATADIR="/usr/local/mailman/data"
+
+###############################################################################
+# Maximum number of subdirectory entries to display in report
+###############################################################################
+MAX_QUEUE_LINES=20
+
+###############################################################################
+# Maximum number of moderation queue pickle files to display in report
+###############################################################################
+MAX_DATA_LINES=100
+
+###############################################################################
+# Mailman Log files to check for errors.
+# No need to specify path, only log file name.
+###############################################################################
+ERR_LOGS="error fromusenet locks mischief post qrunner smtp-failure vette"
+
+###############################################################################
+# Mailman Log files to summarize.
+# No need to specify path, only log file name.
+###############################################################################
+SUM_LOGS="fromusenet post smtp"
+
+###############################################################################
+# Mailman queue subdirectories to check.  No need to specify path, only name.
+###############################################################################
+SUBDIRS="archive bounces commands in news out retry shunt virgin"
+
+###############################################################################
+# Specify recipients for report.  If none, then simply print to "STDOUT".
+# Specify sender address for report.  Not used if recipient list is empty.
+###############################################################################
+
+SENDER="INSERT.YOUR.SENDER.ADDRESS@HERE"
+RCPTS="INSERT.YOUR.RECIPIENTS.ADDRESSES@HERE"
+
+###############################################################################
+# If you run this program in cron at 23:59:00, you need to sleep sixty
+# seconds to make sure that you capture all the logs for the previous day.
+# Comment this line out to disable sleeping altogether.
+###############################################################################
+
+SLEEPTIME=60
+
+###############################################################################
+# What user id is Mailman installed under?
+# How do we determine what UID this program is running as?
+# NB:	There will probably be SysV vs. BSD semantic differences here.
+#	Be careful.  Make sure the command you specify actually works.
+#	The command string specified here may seem arcane, but should pull
+#	out the information we need, and throw away everything else.  If
+#	there is an easier cross-platform way to do it, please let me know.
+###############################################################################
+
+GRABUID=`$PS -o user -p $$ | $TAIL -1`
+MYUID=`echo $GRABUID`
+RUNAS="mailman"
+
+###############################################################################
+# No modifications below this line should be required.
+###############################################################################
+
+DAY=`$DATE '+%b %d'`
+YEAR=`$DATE '+%Y'`
+
+PROG=`$BASENAME $0`
+
+if [ "${MYUID}" != "${RUNAS}" -a "${MYUID}" != "root" ] ; then
+    echo "ERROR: You must be root or ${RUNAS} to run $PROG."
+    exit 1
+fi
+
+if [ "${SLEEPTIME}" != "" -a "${RCPTS}x" != "${SENDER}x" ] ; then
+    if [ $SLEEPTIME -gt 0 ] ; then
+	$SLEEP $SLEEPTIME
+    fi
+fi
+
+TMP="$TMPDIR/.$PROG.$$"
+TMPLOG="$TMP.log"
+$RM -f $TMP
+$TOUCH $TMP
+
+if [ "${RCPTS}x" != "x" ] ; then
+    echo "From: ${SENDER}" >> $TMP
+    echo "To: ${RCPTS}" >> $TMP
+    echo "Subject: Mailman Daily Status Report: $DAY $YEAR" >> $TMP
+    echo "" >> $TMP
+fi
+
+echo "		Mailman Daily Status Report: $DAY $YEAR" >> $TMP
+echo "" >> $TMP
+echo "" >> $TMP
+
+echo "******************************" >> $TMP
+echo "Log File Summary" >> $TMP
+echo "******************************" >> $TMP
+echo "" >> $TMP
+
+for LOG in $SUM_LOGS
+do
+
+    $RM -f $TMPLOG
+    $TOUCH $TMPLOG
+    echo "Log file: $LOG" >> $TMP
+    echo "==============================" >> $TMP
+
+    if [ -f "$LOGDIR/${LOG}" ] ; then
+    $SED -e :a -e '$!N;s/\n //;ta' -e 'P;D' $LOGDIR/$LOG | $GREP -si "^$DAY [0-9][0-9:]* $YEAR" >> $TMPLOG
+
+	if [ "${LOG}" = "post" ] ; then
+
+	    echo "" >> $TMP
+	    echo "Hourly Summary of Posts" >> $TMP
+	    echo "-----------------------" >> $TMP
+
+	    $SED -e 's/^[A-Z][a-z][a-z] *[0-9]* //' -e 's/:.*$//' $TMPLOG | $UNIQ -c | $SORT -n +1 | $AWK '{ printf( "%8d  %02d:00-%02d:59\n", $1, $2, $2 ) }' >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Post Count by List" >> $TMP
+	    echo "------------------" >> $TMP
+
+	    $SED -e 's/^.* post to //' -e 's/ .*$//' $TMPLOG | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Post Count by Sender" >> $TMP
+	    echo "--------------------" >> $TMP
+
+	    $SED -e 's/^.* from //' -e 's/,.*$//' $TMPLOG | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	elif [ "${LOG}" = "fromusenet" ] ; then
+
+	    GRPS=`$EGREP -vi '(watermark:|nothing new| posted to |: \[[0-9\.]*\])' $TMPLOG | $GREP -i ' gating ' | $AWK '{ print $7 }' | $SORT -u | $FMT -w 75`
+
+	    for GRP in $GRPS
+	    do
+		echo "" >> $TMP
+		echo "$GRP Article #'s Gated:" >> $TMP
+		echo "------------------------------" >> $TMP
+		$EGREP -vi '(watermark:|nothing new| posted to |: \[[0-9\.]*\])' $TMPLOG | $GREP -i " gating " | $GREP -i " $GRP " | $SED -e 's/^.*\[//' -e 's/\]$//' -e 's/\.\./ /' | $TR ' ' '\n' |  $SORT -u | $FMT -w 75 >> $TMP
+	    done
+
+	elif [ "${LOG}" = "smtp" ] ; then
+
+	    echo "" >> $TMP
+	    echo "Hourly Summary of Messages Sent" >> $TMP
+	    echo "-------------------------------" >> $TMP
+	    $SED -e 's/^[A-Z][a-z][a-z] *[0-9]* //' -e 's/:.* for / /' -e 's/ recips,.*$//' $TMPLOG | $AWK '{ val=int($1); sum[val]+=$2 } END { for (i=0; i<24; i++) { printf "%8d %02d:00-%02d:59\n", sum[i], i, i } }' >> $TMP
+
+	else
+
+	    $SED 's/^.* ([0-9]*) //' $TMPLOG | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	fi
+
+    else
+
+    	echo " ### Log file ${LOG} does not exist ### " >> $TMP
+
+    fi
+
+    echo "" >> $TMP
+
+done
+
+echo "******************************" >> $TMP
+echo "Log File Squawks" >> $TMP
+echo "******************************" >> $TMP
+echo "" >> $TMP
+
+for LOG in $ERR_LOGS
+do
+    $RM -f $TMPLOG
+    $TOUCH $TMPLOG
+    echo "Log file: $LOG" >> $TMP
+    echo "==============================" >> $TMP
+    $GREP -si "^$DAY [0-9][0-9:]* $YEAR" $LOGDIR/$LOG >> $TMPLOG
+
+    if [ -f "$LOGDIR/${LOG}" ] ; then
+
+	if [ "${LOG}" = "error" ] ; then
+
+	    echo "Uncaught Runner Exceptions:" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP 'Uncaught runner exception' $TMPLOG | $SED 's/^.*exception: //' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "No Such List:" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP 'No such list' $TMPLOG | $SED -e 's/^.* "//' -e 's/".*$//' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    CNT=`$GREP -i 'shunting' $TMPLOG | $WC -l`
+	    if [ "${CNT}x" != "x" ] ; then
+		if [ ${CNT} -gt 0 ] ; then
+		    echo "" >> $TMP
+		    echo "Shunting Count: $CNT" >> $TMP
+		    echo "------------------------------" >> $TMP
+		fi
+	    fi
+
+	    echo "" >> $TMP
+	    echo "Other Errors:" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $EGREP -vi '(Uncaught runner exception|No such list|Ignoring unparseable message|Traceback|shunting)' $TMPLOG | $SED 's/^.* ([0-9]*) //' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	elif [ "${LOG}" = "fromusenet" ] ; then
+
+	    $EGREP -vi '(watermark:|nothing new| posted to |: \[[0-9\.]*\])' $TMPLOG | $GREP -vi " gating " | $SED 's/^.* ([0-9]*) //' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	elif [ "${LOG}" = "mischief" ] ; then
+
+	    echo "" >> $TMP
+	    echo "Login failure with private rosters (by user):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP -i 'Login failure with private rosters' $TMPLOG | $AWK '{ print $NF }' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Unsub attempt of non-member (by user):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP -i 'Unsub attempt of non-member' $TMPLOG | $AWK '{ print $NF }' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Reminder attempt of non-member (by user):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP -i 'Reminder attempt of non-member' $TMPLOG | $AWK '{ print $NF }' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Other Messages:" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $EGREP -vi '(Login failure with private rosters|Unsub attempt of non-member|Reminder attempt of non-member)' $TMPLOG | $SED 's/^.* ([0-9]*) //' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	elif [ "${LOG}" = "post" ] ; then
+
+	    $GREP -vi 'success' $TMPLOG | $SED 's/^.* ([0-9]*) //' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	elif [ "${LOG}" = "vette" ] ; then
+
+	    echo "" >> $TMP
+	    echo "Message held -- Post by non-member (by list):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP 'Post by non-member' $TMPLOG | $AWK '{ print $6 }' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Message held -- Suspicious header (by list):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP -i 'suspicious header' $TMPLOG | $AWK '{ print $6 }' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Discarded posting (by list):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP -i 'Discarded posting' $TMPLOG | $AWK '{ print $6 }' | $SED 's/:$//' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Bulk/Junk message discarded (by list):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $EGREP -i '(bulk|junk) message discarded' $TMPLOG | $AWK '{ print $NF }' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Implicit destination (by list):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP -i 'Message has implicit destination' $TMPLOG | $AWK '{ print $6 }' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Post to moderated newsgroup (by list):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP -i 'Posting to a moderated newsgroup' $TMPLOG | $AWK '{ print $6 }' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Post to moderated list (by list):" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $GREP -i 'Post to moderated list' $TMPLOG | $AWK '{ print $6 }' | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	    echo "" >> $TMP
+	    echo "Other Errors:" >> $TMP
+	    echo "------------------------------" >> $TMP
+	    $EGREP -vi '(Post by non-member|suspicious header|message approved|Discarded posting|bulk message discarded|junk message discarded|Message has implicit destination|Posting to a moderated newsgroup|Post to moderated list|Message discarded, msgid)' $TMPLOG | $SED -e 's/^.* ([0-9]*) //' -e 's/, message-id=<[^> ]*>:/:/' | $SORT | $UNIQ -c | $SORT -nr >> $TMP 
+
+	elif [ "${LOG}" = "smtp-failure" ] ; then
+
+	    $SED 's/^.* ([0-9]*) //' $TMPLOG | $SED 's/delivery to [^@ ]*@[^@ ]* failed with code/delivery failed with code/g' | $SORT | $UNIQ -c | $SORT -nr >> $TMP 
+
+	else
+
+	    $SED 's/^.* ([0-9]*) //' $TMPLOG | $SORT | $UNIQ -c | $SORT -nr >> $TMP
+
+	fi
+    else
+
+    	echo " ### Log file ${LOG} does not exist ### " >> $TMP
+
+    fi
+    echo "" >> $TMP
+
+done