diff options
Diffstat (limited to 'modules/mm_mailcmd.py')
| -rw-r--r-- | modules/mm_mailcmd.py | 607 |
1 files changed, 0 insertions, 607 deletions
diff --git a/modules/mm_mailcmd.py b/modules/mm_mailcmd.py deleted file mode 100644 index 745327394..000000000 --- a/modules/mm_mailcmd.py +++ /dev/null @@ -1,607 +0,0 @@ -# Copyright (C) 1998 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. - - -"""Process maillist user commands arriving via email.""" - -__version__ = "$Revision: 693 $" - -# Try to stay close to majordomo commands, but accept common mistakes. -# Not implemented: get / index / which. - -import string, os, sys, re -import mm_message, mm_err, mm_cfg, mm_utils, mm_pending - -option_descs = { 'digest' : - 'receive mail from the list bundled together instead of ' - 'one post at a time', - 'nomail' : - 'Stop delivering mail. Useful if you plan on taking a ' - 'short vacation.', - 'norcv' : - 'Turn this on to NOT receive posts you send to the list. ' - 'does not work if digest is set', - 'ack' : - 'Turn this on to receive acknowlegement mail when you ' - 'send mail to the list', - 'plain' : - 'Get plain, not MIME-compliant, ' - 'digests (only if digest is set)', - 'hide' : - 'Conceals your email from the list of subscribers' - } -option_info = { 'digest' : 0, - 'nomail' : mm_cfg.DisableDelivery, - 'norcv' : mm_cfg.DontReceiveOwnPosts, - 'ack' : mm_cfg.AcknowlegePosts, - 'plain' : mm_cfg.DisableMime, - 'hide' : mm_cfg.ConcealSubscription - } - -class MailCommandHandler: - def __init__(self): - self._response_buffer = '' - self._cmd_dispatch = { - 'subscribe' : self.ProcessSubscribeCmd, - 'confirm': self.ProcessConfirmCmd, - 'unsubscribe' : self.ProcessUnsubscribeCmd, - 'who' : self.ProcessWhoCmd, - 'info' : self.ProcessInfoCmd, - 'lists' : self.ProcessListsCmd, - 'help' : self.ProcessHelpCmd, - 'set' : self.ProcessSetCmd, - 'options' : self.ProcessOptionsCmd, - 'password' : self.ProcessPasswordCmd, - } - self.__NoMailCmdResponse = 0 - - def AddToResponse(self, text): - self._response_buffer = self._response_buffer + text + "\n" - - def AddError(self, text): - self._response_buffer = self._response_buffer + "**** " + text + "\n" - - def ParseMailCommands(self): - mail = mm_message.IncomingMessage() - subject = mail.getheader("subject") - sender = string.lower(mail.GetSender()) - if sender in ['daemon', 'nobody', 'mailer-daemon', 'postmaster', - 'orphanage', 'postoffice']: - # This is for what are probably delivery-failure notices of - # subscription confirmations that are, of necessity, bounced - # back to the -request address. - self.LogMsg("bounce", - ("%s: Mailcmd rejected" - "\n\tReason: Probable bounced subscribe-confirmation" - "\n\tFrom: %s" - "\n\tSubject: %s" - ), - self._internal_name, - mail.getheader('from'), - subject) - return - if subject: - subject = string.strip(subject) - if (subject and self._cmd_dispatch.has_key(string.split(subject)[0])): - lines = [subject] + string.split(mail.body, '\n') - else: - lines = string.split(mail.body, '\n') - if subject: - # - # check to see if confirmation request -- special handling - # - conf_pat = r"%s -- confirmation of subscription -- request (\d\d\d\d\d\d)" % \ - self.real_name - match = re.search(conf_pat, subject) - if not match: - match = re.search(conf_pat, mail.body) - if match: - lines = ["confirm %s" % (match.group(1))] - else: - self.AddError("Subject line ignored: %s" % subject) - for line in lines: - line = string.strip(line) - if not line: - continue - self.AddToResponse("\n>>>> %s" % line) - line = string.strip(line) - if not line: - continue - args = string.split(line) - cmd = string.lower(args[0]) - args = args[1:] - if cmd == 'end': - self.AddError("End of commands.") - break - if not self._cmd_dispatch.has_key(cmd): - self.AddError("%s: Command UNKNOWN." % cmd) - else: - self._cmd_dispatch[cmd](args, line, mail) - if not self.__NoMailCmdResponse: - self.SendMailCmdResponse(mail) - - def SendMailCmdResponse(self, mail): - self.SendTextToUser(subject = 'Mailman results for %s' % - self.real_name, - recipient = mail.GetSender(), - sender = self.GetRequestEmail(), - text = self._response_buffer) - self._response_buffer = '' - - def ProcessPasswordCmd(self, args, cmd, mail): - if len(args) <> 2: - self.AddError("Usage: password <oldpw> <newpw>") - return - try: - self.ChangeUserPassword(mail.GetSender(), - args[0], args[1], args[1]) - self.AddToResponse('Succeeded.') - except mm_err.MMListNotReady: - self.AddError("List is not functional.") - except mm_err.MMNotAMemberError: - self.AddError("%s isn't subscribed to this list." % - mail.GetSender()) - except mm_err.MMBadPasswordError: - self.AddError("You gave the wrong password.") - except: - self.AddError("An unknown Mailman error occured.") - self.AddError("Please forward on your request to %s" % - self.GetAdminEmail()) - self.AddError("%s" % sys.exc_type) - - def ProcessOptionsCmd(self, args, cmd, mail): - sender = self.FindUser(mail.GetSender()) - if not sender: - self.AddError("%s is not a member of the list." % mail.GetSender()) - return - options = option_info.keys() - options.sort() - value = '' - for option in options: - if self.GetUserOption(sender, option_info[option]): - value = 'on' - else: - value = 'off' - self.AddToResponse("%s: %s" % (option, value)) - self.AddToResponse("") - self.AddToResponse("To change an option, do: " - "set <option> <on|off> <password>") - self.AddToResponse("") - self.AddToResponse("Option explanations:") - self.AddToResponse("--------------------") - for option in options: - self.AddToResponse("%s:" % option) - self.AddToResponse(option_descs[option]) - self.AddToResponse("") - - def ProcessSetCmd(self, args, cmd, mail): - def ShowSetUsage(s=self, od = option_descs): - options = od.keys() - options.sort() - s.AddError("Usage: set <option> <on|off> <password>") - s.AddError("Valid options are:") - for option in options: - s.AddError("%s: %s" % (option, od[option])) - if len(args) <> 3: - ShowSetUsage() - return - if args[1] == 'on': - value = 1 - elif args[1] == 'off': - value = 0 - else: - ShowSetUsage() - return - if option_info.has_key(args[0]): - try: - sender = self.FindUser(mail.GetSender()) - if not sender: - self.AddError("You aren't subscribed.") - return - self.ConfirmUserPassword(sender, args[2]) - self.SetUserOption(sender, option_info[args[0]], value) - self.AddToResponse("Succeeded.") - except mm_err.MMBadPasswordError: - self.AddError("You gave the wrong password.") - except: - self.AddError("An unknown Mailman error occured.") - self.AddError("Please forward on your request to %s" % - self.GetAdminEmail()) - self.AddError("%s" % sys.exc_type) - elif args[0] == 'digest': - try: - self.SetUserDigest(mail.GetSender(), args[2], value) - self.AddToResponse("Succeeded.") - except mm_err.MMAlreadyDigested: - self.AddError("You are already receiving digests.") - except mm_err.MMAlreadyUndigested: - self.AddError("You already have digests off.") - except mm_err.MMBadEmailError: - self.AddError("Email address '%s' not accepted by Mailman." % - mail.GetSender()) - except mm_err.MMMustDigestError: - self.AddError("List only accepts digest members.") - except mm_err.MMCantDigestError: - self.AddError("List doesn't accept digest members.") - except mm_err.MMNotAMemberError: - self.AddError("%s isn't subscribed to this list." - % mail.GetSender()) - except mm_err.MMListNotReady: - self.AddError("List is not functional.") - except mm_err.MMNoSuchUserError: - self.AddError("%s is not subscribed to this list." - % mail.GetSender()) - except mm_err.MMBadPasswordError: - self.AddError("You gave the wrong password.") - except mm_err.MMNeedApproval: - self.AddApprovalMsg(cmd) - except: - # TODO: Should log the error we got if we got here. - self.AddError("An unknown Mailman error occured.") - self.AddError("Please forward on your request to %s" % - self.GetAdminEmail()) - self.AddError("%s" % sys.exc_type) - else: - ShowSetUsage() - return - - def ProcessListsCmd(self, args, cmd, mail): - if len(args) != 0: - self.AddError("Usage: lists") - return - lists = os.listdir(mm_cfg.LIST_DATA_DIR) - lists.sort() - self.AddToResponse("** Public mailing lists run by Mailman@%s:" - % self.host_name) - for list in lists: - if list == self._internal_name: - listob = self - else: - try: - import maillist - listob = maillist.MailList(list) - except: - continue - # We can mention this list if you already know about it. - if not listob.advertised and listob <> self: - continue - self.AddToResponse("%s (requests to %s):\n\t%s" % - (listob.real_name, listob.GetRequestEmail(), - listob.description)) - - def ProcessInfoCmd(self, args, cmd, mail): - if len(args) != 0: - self.AddError("Usage: info\n" - "To get info for a particular list, " - "send your request to\n" - "the '-request' address for that list, or " - "use the 'lists' command\n" - "to get info for all the lists.") - return - - if self.private_roster and not self.IsMember(mail.GetSender()): - self.AddError("Private list: only members may see info.") - return - - self.AddToResponse("\nFor more complete info about %s, including" - " background" % self.real_name) - self.AddToResponse("and instructions for subscribing to and" - " using it, visit:\n\n\t%s\n" - % self.GetAbsoluteScriptURL('listinfo')) - - if not self.info: - self.AddToResponse("No other details about %s are available." % - self.real_name) - else: - self.AddToResponse("Here is the specific description of %s:\n" - % self.real_name) - # Put a blank line between the paragraphs, as indicated by CRs. - self.AddToResponse(string.join(string.split(self.info, "\n"), - "\n\n")) - - def ProcessWhoCmd(self, args, cmd, mail): - if len(args) != 0: - self.AddError("To get subscribership for a particular list, " - "send your request\n" - "to the '-request' address for that list.") - return - def AddTab(str): - return '\t' + str - - if self.private_roster == 2: - self.AddError("Private list: No one may see subscription list.") - return - if self.private_roster and not self.IsMember(mail.GetSender()): - self.AddError("Private list: only members may see list " - "of subscribers.") - return - if not len(self.digest_members) and not len(self.members): - self.AddToResponse("NO MEMBERS.") - return - - def NotHidden(x, s=self, v=mm_cfg.ConcealSubscription): - return not s.GetUserOption(x, v) - - if len(self.digest_members): - self.AddToResponse("") - self.AddToResponse("Digest Members:") - digestmembers = self.digest_members[:] - digestmembers.sort() - self.AddToResponse(string.join(map(AddTab, - filter(NotHidden, - digestmembers)), - "\n")) - if len(self.members): - self.AddToResponse("Non-Digest Members:") - members = self.members[:] - members.sort() - self.AddToResponse(string.join(map(AddTab, - filter(NotHidden, members)), - "\n")) - - def ProcessUnsubscribeCmd(self, args, cmd, mail): - if not len(args): - self.AddError("Must supply a password.") - return - if len(args) > 2: - self.AddError("To get unsubscribe from a particular list, " - "send your request\nto the '-request' address" - "for that list.") - return - - if len(args) == 2: - addr = args[1] - else: - addr = mail.GetSender() - try: - self.ConfirmUserPassword(addr, args[0]) - self.DeleteMember(addr, "mailcmd") - self.AddToResponse("Succeeded.") - except mm_err.MMListNotReady: - self.AddError("List is not functional.") - except mm_err.MMNoSuchUserError: - self.AddError("%s is not subscribed to this list." - % mail.GetSender()) - except mm_err.MMBadPasswordError: - self.AddError("You gave the wrong password.") - except: - # TODO: Should log the error we got if we got here. - self.AddError("An unknown Mailman error occured.") - self.AddError("Please forward on your request to %s" - % self.GetAdminEmail()) - self.AddError("%s %s" % (sys.exc_type, sys.exc_value)) - self.AddError("%s" % sys.exc_traceback) - - def ProcessSubscribeCmd(self, args, cmd, mail): - digest = self.digest_is_default - password = "" - address = "" - done_digest = 0 - if not len(args): - password = "%s%s" % (mm_utils.GetRandomSeed(), - mm_utils.GetRandomSeed()) - elif len(args) > 3: - self.AddError("Usage: subscribe [password] [digest|nodigest] [address=<email-address>]") - return - else: - for arg in args: - if string.lower(arg) == 'digest' and not done_digest: - digest = 1 - done_digest = 1 - elif string.lower(arg) == 'nodigest' and not done_digest: - digest = 0 - done_digest = 1 - elif string.lower(arg)[:8] == 'address=' and not address: - address = string.lower(arg)[8:] - elif not password: - password = arg - else: - self.AddError("Usage: subscribe [password] " - "[digest|nodigest] [address=<email-address>]") - return - if not password: - password = "%s%s" % (mm_utils.GetRandomSeed(), - mm_utils.GetRandomSeed()) - if not address: - pending_addr = mail.GetSender() - else: - pending_addr = address - cookie = mm_pending.gencookie() - mm_pending.add2pending(pending_addr, password, digest, cookie) - self.SendTextToUser(subject = "%s -- confirmation of subscription -- request %d" % \ - (self.real_name, cookie), - recipient = pending_addr, - sender = self.GetRequestEmail(), - text = mm_pending.VERIFY_FMT % ({"email": pending_addr, - "listaddress": self.GetListEmail(), - "listname": self.real_name, - "cookie": cookie, - "requestor": mail.GetSender(), - "request_addr": self.GetRequestEmail()})) - self.__NoMailCmdResponse = 1 - return - - - def FinishSubscribe(self, addr, password, digest): - try: - self.AddMember(addr, password, digest) - self.AddToResponse("Succeeded.") - except mm_err.MMBadEmailError: - self.AddError("Email address '%s' not accepted by Mailman." % - addr) - except mm_err.MMMustDigestError: - self.AddError("List only accepts digest members.") - except mm_err.MMCantDigestError: - self.AddError("List doesn't accept digest members.") - except mm_err.MMListNotReady: - self.AddError("List is not functional.") - except mm_err.MMNeedApproval: - self.AddApprovalMsg(cmd) - except mm_err.MMHostileAddress: - self.AddError("Email address '%s' not accepted by Mailman " - "(insecure address)" % addr) - except mm_err.MMAlreadyAMember: - self.AddError("%s is already a list member." % addr) - except: - # TODO: Should log the error we got if we got here. - self.AddError("An unknown Mailman error occured.") - self.AddError("Please forward on your request to %s" % - self.GetAdminEmail()) - self.AddError("%s" % sys.exc_type) - - - - def ProcessConfirmCmd(self, args, cmd, mail): - if len(args) != 1: - self.AddError("Usage: confirm <confirmation number>\n") - return - try: - cookie = string.atoi(args[0]) - except: - self.AddError("Usage: confirm <confirmation number>\n") - return - pending = mm_pending.get_pending() - if not pending.has_key(cookie): - self.AddError("Invalid confirmation number!\n" - "Please recheck the confirmation number and try again.") - return - (email_addr, password, digest, ts) = pending[cookie] - if self.open_subscribe: - self.ApprovedAddMember(email_addr, password, digest) - self.AddToResponse("Succeeded") - else: - self.AddRequest('add_member', digest, email_addr, password) - del pending[cookie] - mm_pending.set_pending(pending) - - - - def AddApprovalMsg(self, cmd): - self.AddError('''Your request to %s: - - %s - -has been forwarded to the person running the list. - -This is probably because you are trying to subscribe to a 'closed' list. - -You will receive email notification of the list owner's decision about -your subscription request. - -Any questions about the list owner's policy should be directed to: - - %s - -''' % (self.GetRequestEmail(), cmd, self.GetAdminEmail())) - - - def ProcessHelpCmd(self, args, cmd, mail): - self.AddToResponse("**** Help for %s maillist:" % self.real_name) - self.AddToResponse(""" -This is email command help for version %s of the "Mailman" list manager. -The following describes commands you can send to get information about and -control your subscription to mailman lists at this site. A command can -be the subject line or in the body of the message. - -(Note that much of the following can also be accomplished via the web, at: - - %s - -In particular, you can use the web site to have your password sent to your -delivery address.) - -List specific commands (subscribe, who, etc) should be sent to the -*-request address for the particular list, e.g. for the 'mailman' list, -use 'mailman-request@...'. - -About the descriptions - words in "<>"s signify REQUIRED items and words in -"[]" denote OPTIONAL items. Do not include the "<>"s or "[]"s when you use -the commands. - -The following commands are valid: - - subscribe [password] [digest-option] [address=<address>] - Subscribe to the mailing list. Your password must be given to - unsubscribe or change your options. When you subscribe to the - list, you'll be reminded of your password periodically. - 'digest-option' may be either: 'nodigest' or 'digest' (no quotes!) - If you wish to subscribe an address other than the address you send - this request from, you may specify "address=<email address>" (no brackets - around the email address, no quotes!) - - unsubscribe <password> [address] - Unsubscribe from the mailing list. Your password must match - the one you gave when you subscribed. If you are trying to - unsubscribe from a different address than the one you subscribed - from, you may specify it in the 'address' field. - - who - See who is on this mailing list. - - info - View the introductory information for this list. - - lists - See what mailing lists are run by this Mailman server. - - help - This message. - - set <option> <on|off> <password> - Turn on or off list options. Valid options are: - - ack: - Turn this on to receive acknowlegement mail when you send mail to - the list - - digest: - receive mail from the list bundled together instead of one post at - a time - - plain: - Get plain-text, not MIME-compliant, digests (only if digest is set) - - nomail: - Stop delivering mail. Useful if you plan on taking a short vacation. - - norcv: - Turn this on to NOT receive posts you send to the list. - Does not work if digest is set - - hide: - Conceals your address when people look at who is on this list. - - - options - Show the current values of your list options. - - password <oldpassword> <newpassword> - Change your list password. - - end - Stop processing commands (good to do if your mailer automatically - adds a signature file - it'll save you from a lot of cruft). - - -Commands should be sent to %s - -Questions and concerns for the attention of a person should be sent to -%s -""" % (mm_cfg.VERSION, - self.GetAbsoluteScriptURL('listinfo'), - self.GetRequestEmail(), - self.GetAdminEmail())) - |