[sysadmin-bin] check and change various settings

[Olav Vitters <ovitters src gnome org>]

commit 9031b8e576dbac7b845d23f6f0a13840f5769585
Author: Olav Vitters <olav vitters nl>
Date:   Thu Oct 27 14:53:09 2011 +0200

    check and change various settings

 mail/mailman-moderated-lists |   39 +++++++++++++++++++++++++++++++++------
 1 files changed, 33 insertions(+), 6 deletions(-)
---
diff --git a/mail/mailman-moderated-lists b/mail/mailman-moderated-lists
index b56a1b9..dadea73 100755
--- a/mail/mailman-moderated-lists
+++ b/mail/mailman-moderated-lists
@@ -20,19 +20,46 @@ mlist_names = Utils.list_names()
 mlist_names.sort()
 moderated_lists = []
 
+CHECKS=[
+        # attribute, setting, optional check
+        #  - fix moderator password
+        ('mod_password', MOD_PASSWORD, lamba m: m.moderator == MODERATORTEAM),
+        #  - auto discard held email after a while
+        ('max_days_to_hold', 90),
+        #  - don't forward discarded emails to moderator
+        ('forward_auto_discards', False),
+]
+
+
 for n in mlist_names:
     mlist = MailList.MailList(n, lock=0)
-    if mlist.moderator != MODERATORTEAM:
-        continue
 
-    moderated_lists.append(mlist.internal_name())
+    if mlist.moderator == MODERATORTEAM:
+        moderated_lists.append(mlist.internal_name())
+
+    change = []
+
+    for ck in CHECKS:
+        attr_name, attr_val = ck[:2]
+
+        # Attribute different than expected?
+        if getattr(mlist, attr_name) != attr_val:
+            continue
+
+        # Do we have a specific lamba check and does it validate?
+        if len(ck) > 2 and not ck[3](mlist):
+            continue
+
+        # Remember to change the attr (done while mailing list is locked)
+        change.append((attr_name, attr_val))
 
-    if mlist.mod_password == MOD_PASSWORD:
+    if not len(change):
         continue
 
-    print "Resetting moderator password for mailing list:", n
     mlist.Lock()
-    mlist.mod_password = MOD_PASSWORD
+    for attr_name, attr_val in change.iteritems():
+        print "Resetting", attr_name, "for mailing list:", n
+        setattr(mlist, attr_name, attr_val)
     mlist.Save()
     mlist.Unlock()