1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
|
# Copyright (C) 2001-2006 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.
import sha
import sys
import optparse
from Mailman import Errors
from Mailman import MailList
from Mailman import Message
from Mailman import Utils
from Mailman import Version
from Mailman import i18n
from Mailman.configuration import config
_ = i18n._
__i18n_templates__ = True
SPACE = ' '
def parseargs():
parser = optparse.OptionParser(version=Version.MAILMAN_VERSION,
usage=_("""\
%%prog [options]
Change a list's password.
Prior to Mailman 2.1, list passwords were kept in crypt'd format -- usually.
Some Python installations didn't have the crypt module available, so they'd
fall back to md5. Then suddenly the Python installation might grow a crypt
module and all list passwords would be broken.
In Mailman 2.1, all list and site passwords are stored in SHA1 hexdigest
form. This breaks list passwords for all existing pre-Mailman 2.1 lists, and
since those passwords aren't stored anywhere in plain text, they cannot be
retrieved and updated.
Thus, this script generates new passwords for a list, and optionally sends it
to all the owners of the list."""))
parser.add_option('-a', '--all',
default=False, action='store_true',
help=_('Change the password for all lists'))
parser.add_option('-d', '--domain',
default=[], type='string', action='append',
dest='domains', help=_("""\
Change the password for all lists in the virtual domain DOMAIN. It is okay
to give multiple -d options."""))
parser.add_option('-l', '--listname',
default=[], type='string', action='append',
dest='listnames', help=_("""\
Change the password only for the named list. It is okay to give multiple -l
options."""))
parser.add_option('-p', '--password',
type='string', metavar='NEWPASSWORD', help=_("""\
Use the supplied plain text password NEWPASSWORD as the new password for any
lists that are being changed (as specified by the -a, -d, and -l options). If
not given, lists will be assigned a randomly generated new password."""))
parser.add_option('-q', '--quiet',
default=False, action='store_true', help=_("""\
Don't notify list owners of the new password. You'll have to have some other
way of letting the list owners know the new password (presumably
out-of-band)."""))
parser.add_option('-C', '--config',
help=_('Alternative configuration file to use'))
opts, args = parser.parse_args()
if args:
parser.print_help()
print >> sys.stderr, _('Unexpected arguments')
sys.exit(1)
if opts.password == '':
parser.print_help()
print >> sys.stderr, _('Empty list passwords are not allowed')
sys.exit(1)
return parser, opts, args
_listcache = {}
_missing = object()
def openlist(listname):
missing = []
mlist = _listcache.get(listname, _missing)
if mlist is _missing:
try:
mlist = MailList.MailList(listname, lock=False)
except Errors.MMListError:
print >> sys.stderr, _('No such list: $listname')
return None
_listcache[listname] = mlist
return mlist
def main():
parser, opts, args = parseargs()
config.load(opts.config)
# Cull duplicates
domains = set(opts.domains)
if opts.all:
listnames = set(Utils.list_names())
else:
listnames = set(opts.listnames)
if domains:
for name in Utils.list_names():
mlist = openlist(name)
if mlist.host_name in domains:
listnames.add(name)
if not listnames:
print >> sys.stderr, _('Nothing to do.')
sys.exit(0)
# Set the password on the lists
if opts.password:
shapassword = sha.new(opts.password).hexdigest()
for listname in listnames:
mlist = openlist(listname)
mlist.Lock()
try:
if opts.password is None:
randompw = Utils.MakeRandomPassword(
config.ADMIN_PASSWORD_LENGTH)
shapassword = sha.new(randompw).hexdigest()
notifypassword = randompw
else:
notifypassword = opts.password
mlist.password = shapassword
mlist.Save()
finally:
mlist.Unlock()
# Notification
print _('New $listname password: $notifypassword')
if not opts.quiet:
otrans = i18n.get_translation()
i18n.set_language(mlist.preferred_language)
try:
hostname = mlist.host_name
adminurl = mlist.GetScriptURL('admin', absolute=True)
msg = Message.UserNotification(
mlist.owner[:], mlist.no_reply_address,
_('Your new $listname list password'),
_('''\
The site administrator at $hostname has changed the password for your
mailing list $listname. It is now
$notifypassword
Please be sure to use this for all future list administration. You may want
to log in now to your list and change the password to something more to your
liking. Visit your list admin page at
$adminurl
'''),
mlist.preferred_language)
finally:
i18n.set_translation(otrans)
msg.send(mlist)
if __name__ == '__main__':
main()
|
