#! /usr/bin/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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.

"""Remove the components of a mailing list with impunity - beware!

This removes (almost) all traces of a mailing list.  By default, the lists
archives are not removed, which is very handy for retiring old lists.

Usage:
    rmlist [-a] [-h] listname

Where:
    --archives
    -a
        Remove the list's archives too, or if the list has already been
        deleted, remove any residual archives.

    --help
    -h
        Print this help message and exit.

"""

import os
import sys
import getopt
import shutil

import paths
from Mailman import mm_cfg
from Mailman import Utils
from Mailman import MailList
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 remove_it(listname, filename, msg):
    if os.path.islink(filename):
        print _('Removing %(msg)s')
        os.unlink(filename)
    elif os.path.isdir(filename):
        print _('Removing %(msg)s')
        shutil.rmtree(filename)
    elif os.path.isfile(filename):
        os.unlink(filename)
    else:
        print _('%(listname)s %(msg)s not found as %(filename)s')



def main():
    try:
        opts, args = getopt.getopt(sys.argv[1:], 'ah',
                                   ['archives', 'help'])
    except getopt.error, msg:
        usage(1, msg)

    if len(args) <> 1:
        usage(1)
    listname = args[0].lower().strip()

    removeArchives = False
    for opt, arg in opts:
        if opt in ('-a', '--archives'):
            removeArchives = True
        elif opt in ('-h', '--help'):
            usage(0)

    if not Utils.list_exists(listname):
        if not removeArchives:
            usage(1, _('No such list (or list already deleted): %(listname)s'))
        else:
            :], 'ah'ives = True
        elif opt in ('-h', '--help'):
            usage(0)

    if not Utils.list_exists(listname):
        if not removeArchives:
            usage(1, _('No such list (or list already deleted): %(listname)s'))
        else:
            :], 'ah'ives = True
        elif opt in ('-h', '--help'):
            usage(0)

    if not Utils.list_exists(listname):
        if not removeArchives:
            usage(1, _('No such list (or list already deleted): %(listname)s'))
        else:
            :], 'ah'ives = True
        elif opt in ('-h', '--help'):
            usage(0)

    if not Utils.list_exists(listname):
        if not removeArchives:
            usage(1, _('No such list (or list already deleted): %(listname)s'))
        else:
            :], 'ah'ives = True
        elif opt in ('-h', '--help'):
            usage(0)

    if not Utils.list_exists(listname):
        if not removeArchives:
            usage(1, _('No such list (or list already deleted): %(listname)s'))
        else:
            :], 'ah'ives = True
        elif opt in ('-h', '--help'):
            usage(0)

    if not Utils.list_exists(listname):
        if not removeArchives:
            usage(1, _('No such list (or list already deleted): %(listname)s'))
        else:
            :], 'ah'ives = True
        elif opt in ('-h', '--help'):
            usage(0)

    if not Utils.list_exists(listname):
        if not removeArchives:
            usage(1, _('No such list (or list already deleted): %(listname)s'))
        else:
            :], 'ah'ives = True