wimap

        # All alnum
        if any((not s.isalnum()) for s in tup):
            return False

        return True


































    # See if this names a folder, then list contents
    def list_folder(self):
        pp = self.paths
        if len(pp) != 1:
            return False,None

        # Which folder?
................................................................................
        srv = self.get_server()
        tup = srv.messages(fn, startidx, NMSG)
        if tup is None:
            return False,None
        nmsg,msgs = tup

        # Here's your messages

        buf = self.build_header("Messages %d-%d" %
            (startidx, startidx+len(msgs)-1))
        buf += '<table>\n'
        for msgidx,flags,fields in msgs:
            buf += ' <tr>\n'

            # Time if today
            # mm/dd if this year
            # mm/yy if previous years
            today = time.localtime()
            tm = srv.dt_parse(fields["date"])

            # This year
            if tm.tm_year == today.tm_year:
                # Today
                if (tm.tm_mon == today.tm_mon) and \
                        (tm.tm_mday == today.tm_mday):
                    tms = "%02d:%02d" % (tm.tm_hour, tm.tm_min)
                else:
                    # Some month of this year
                    tms = "%d/%d" % (tm.tm_mon, tm.tm_mday)
            else:
                # Some month of that year
                tms = "%d/%04d" % (tm.tm_mon, tm.tm_year)

            # Emphasize time for unread
            if "Seen" not in flags:
                tms = "<em>%s</em>" % (tms,)

            # Add date
            buf += '  <td>%s</td>\n' % (tms,)

            # Who
            if "from" in fields:
                tup = parseaddr(fields["from"])
                s = tup[0].strip() or tup[1].strip() or "--"
                s = s[:20]
                buf += '  <td>%s</td>\n' % (cgi.escape(s),)
            else:
                buf += '  <td>--</td>\n'

            # Subject

            buf += '  <td>%s</td>\n' % \
             (cgi.escape(fields.get("subject", "--")),)

            buf += ' </tr>\n'

        buf += '</table>\n'

        # Next and previous pages?
        ourpath = '/'.join(self.paths)
        if startidx > 1:
            buf += '<a href="/%s?from=%d">Older</a>\n' % (
                ourpath,
                (1 if (startidx <= NMSG) else (startidx-NMSG)) )

        if (startidx + NMSG) < nmsg:
            buf += '<a href="/%s?from=%d">Newer</a>\n' % (
                ourpath,
                startidx+NMSG )

        buf = self.build_tailer(buf)

        return True,self.send_result(buf, "text/html")









    # Message number under folder, render contents
    def read_msg(self):



        return None

        # All alnum
        if any((not s.isalnum()) for s in tup):
            return False

        return True

    # Time if today
    # mm/dd if this year
    # mm/yy if previous years
    def get_when(self, fields):
        srv = self.srv

        today = time.localtime()
        tm = srv.dt_parse(fields["date"])

        # This year
        if tm.tm_year == today.tm_year:
            # Today
            if (tm.tm_mon == today.tm_mon) and \
                    (tm.tm_mday == today.tm_mday):
                tms = "%02d:%02d" % (tm.tm_hour, tm.tm_min)
            else:
                # Some month of this year
                tms = "%d/%d" % (tm.tm_mon, tm.tm_mday)
        else:
            # Some month of that year
            tms = "%d/%04d" % (tm.tm_mon, tm.tm_year)

        return tms

    # Name or email address or just '--'
    def get_who(self, fields):
        if "from" not in fields:
            return '--'

        tup = parseaddr(fields["from"])
        s = tup[0].strip() or tup[1].strip() or "--"
        return cgi.escape(s)

    # See if this names a folder, then list contents
    def list_folder(self):
        pp = self.paths
        if len(pp) != 1:
            return False,None

        # Which folder?
................................................................................
        srv = self.get_server()
        tup = srv.messages(fn, startidx, NMSG)
        if tup is None:
            return False,None
        nmsg,msgs = tup

        # Here's your messages
        ourpath = '/'.join(self.paths)
        buf = self.build_header("Messages %d-%d" %
            (startidx, startidx+len(msgs)-1))
        buf += '<table border="1" frame="void" rules="rows">\n'
        for msgidx,flags,fields in msgs:
            buf += ' <tr>\n'

            # Date/time
            when = self.get_when(fields)

















            # Emphasize time for unread
            if "Seen" not in flags:
                tms = "<em>%s</em>" % (when,)

            # Add date
            buf += '  <td>%s</td>\n' % (when,)

            # Who, truncated
            who = self.get_who(fields)[:20]



            buf += '  <td>%s</td>\n' % (who,)



            # Subject
            msgurl = "/%s/%d" % (ourpath, msgidx)
            buf += '  <td><a href="%s">%s</a></td>\n' % \
             (msgurl, cgi.escape(fields.get("subject", "--")),)

            buf += ' </tr>\n'

        buf += '</table>\n'

        # Next and previous pages?  And "Done" in between.

        if startidx > 1:
            buf += '<a href="/%s?from=%d">Older</a>\n' % (
                ourpath,
                (1 if (startidx <= NMSG) else (startidx-NMSG)) )
        buf += '<a href="/">Done</a>\n'
        if (startidx + NMSG) < nmsg:
            buf += '<a href="/%s?from=%d">Newer</a>\n' % (
                ourpath,
                startidx+NMSG )

        buf = self.build_tailer(buf)

        return True,self.send_result(buf, "text/html")

    # Return straight text, with blank lines replaced with <p>
    # This'll make reflowable-friendly HTML.
    def para_body(self, body):
        while "\n\n" in body:
            idx = body.index("\n\n")
            body = body[:idx] + "\n<p>\n" + body[idx+2:]
        return body

    # Message number under folder, render contents
    def read_msg(self):
        # /<folder>/<msg#>
        pp = self.paths
        if len(pp) != 2:
            return False,None

        # Which folder?
        fn = urllib.unquote_plus(pp[0])
        if not self.valid_fname(fn):
            return False,None

        # Valid message #?
        try:
            msgidx = int(pp[1])
            if msgidx < 1:
                return False,None
        except:
            return False,None

        # Move to that folder
        srv = self.get_server()
        nmsg = srv.folder(fn)
        if nmsg is None:
            return False,None

        # Legal message number?
        if msgidx > nmsg:
            return False,None

        # Headers and text of body
        fields,body = srv.msg_text(msgidx)

        # Render to page
        who = self.get_who(fields)
        when = self.get_when(fields)
        buf = self.build_header("%s %s" % (when, who))
        buf += self.para_body(body)

        buf = self.build_tailer(buf)
        return True,self.send_result(buf, "text/html")

#
# imap.py
#       imaplib services
#
import imaplib, time, sys
from email.header import decode_header


























































































# Wrapper around imaplib connection
class Server(object):
    def __init__(self, user, srv):
        self.user = user
        self.srv = srv

................................................................................
            # On to next
            msgidx += 1
            msgcount += 1
            if msgcount >= maxmsg:
                break

        return nmsg,res






















































































































# Get or start an imap server connection
def get(user, uconfig, imaps):
    # Existing connection?
    srv = imaps.get(user)
    if srv is not None:
        # Make sure it's still alive

#
# imap.py
#       imaplib services
#
import imaplib, time, sys, html2text
from email.header import decode_header
import chore

# Turn an imap BODYSTRUCTURE into a Python list representation
class BodyParser(object):
    def __init__(self, s):
        self.s = s
        self.peeked = None

    # Return next lexical element
    def lex(self):
        s = self.s

        # Lookahead already got it?
        if self.peeked is not None:
            res = self.peeked
            self.peeked = None
            return res

        # Whitespace
        while s and s[0].isspace():
            s = s[1:]
        
        # EOF
        if not s:
            self.s = s
            return None

        # Next char
        c = s[0]

        # Parens
        if c in ('(', ')'):
            self.s = s[1:]
            return c

        # Quoted string
        if c == '"':
            if '"' not in s[1:]:
                raise Exception, "Missing closing quote"
            idx = s[1:].index('"')+1
            res = s[:idx+1]
            self.s = s[idx+1:]
            return res

        # Identifier
        if not c.isalnum():
            raise Exception, "Unknown token"
        res = ""
        while s[0].isalnum():
            res += s[0]
            s = s[1:]
        self.s = s
        return res

    # Peek next lexical element
    def peek(self):
        if self.peeked is not None:
            return self.peeked
        res = self.peeked = self.lex()
        return res

    # Consume either a single element, or a list of elem's
    #  within (...)
    def elem(self):
        t = self.lex()

        # List of elem's
        if t == '(':
            res = []
            while self.peek() != ')':
                e = self.elem()
                res.append(e)
            self.lex()
            return res

        # A single elem
        return t

    def parse(self):
        # BODYSTRUCTURE ...elems... end-of-string
        t = self.lex()
        if t != "BODYSTRUCTURE":
            raise Exception, "Not parsing a bodystructure"
        res = self.elem()
        t = self.lex()
        if t != None:
            raise Exception, "Residual content"
        return res


# Wrapper around imaplib connection
class Server(object):
    def __init__(self, user, srv):
        self.user = user
        self.srv = srv

................................................................................
            # On to next
            msgidx += 1
            msgcount += 1
            if msgcount >= maxmsg:
                break

        return nmsg,res

    # Select folder, return message count in it
    # None for failure.
    def folder(self, fn, readonly=False):
        # Select folder, get message count
        tup = self.srv.select(fn, readonly=readonly)
        if tup[0] != "OK":
            return None
        nmsg = int(tup[1][0])
        return nmsg

    # Fill in self.bodstruct from MIME description
    #  out of imap
    def load_bodstruct(self, m):
        tup = self.srv.fetch(m, '(BODYSTRUCTURE)')
        if tup[0] != 'OK':
            raise Exception, "Can't parse %d: %s" % (m, tup[1])
        s = tup[1][0]
        # Should start with '<num> (' and end with ')'
        idx = s.index('(')
        assert s.endswith(')')
        s = s[idx+1:][:-1]
        assert s.startswith('BODYSTRUCTURE')
        return BodyParser(s).parse()

    # Return the MIME index for this type
    # Find MIME index for this type
    # Returns None for failure, otherwise
    #  ( (indices...), (entry-which-matched) )
    def _find_type(self, st, typ1, typ2, prefix=()):
        for idx,tup in enumerate(st):

            # Nested
            if isinstance(tup[0], list):
                res = self._find_type(tup, typ1, typ2, prefix + (idx+1,))
                if res is not None:
                    return res
                continue

            # Not a usable message part
            if len(tup) < 6:
                continue

            # Match type & subtype
            if (tup[0] == typ1) and (tup[1] == typ2):
                return (prefix + (idx+1,), tup)

        # Didn't find it
        return None

    # Given the specified type/subtype, return its contents
    def _get_type(self, bods, m, typ1, typ2):

        # Single body contents
        if not isinstance(bods[0], list):
            e = bods
            if (e[0] != typ1) or (e[1] != typ2):
                return None
            tup = self.srv.fetch(m, "(BODY[TEXT])")
            if tup[0] != 'OK':
                raise Exception, "Can't get body %d: %s" % (m, tup[1])
            bod = tup[1][0][1]

        else:
            # Find MIME variant
            res = self._find_type(bods, typ1, typ2)
            if res is None:
                # Didn't find it
                return None
            key,e = res
            key = ".".join(str(k) for k in key)

            # Get body of this MIME section
            tup = self.srv.fetch(m, "(BODY.PEEK[%s])" % (key,))
            if tup[0] != 'OK':
                raise Exception, \
                 "Can't get MIME body %d: %s" % (m, tup[1])
            bod = tup[1][0][1]

        # If encoded base64, get back original text
        if e[5] == '"base64"':
            bod = base64.b64decode(bod)
        elif e[5] == '"quoted-printable"':
            bod = quopri.decodestring(bod)

        # Streamline UTF-8 and such
        bod = chore.utils.uncharenc(bod)

        # Field DOS-style line endings
        bod = bod.replace("\r\n", "\n")

        return bod

    # Get a textual-ish body
    # Return (fields, body-text)
    def msg_text(self, msgidx):
        # MIME structure of message
        bods = self.load_bodstruct(msgidx)

        # Try for textual, then HTML (plus render to text)
        t = self._get_type(bods, msgidx, '"text"', '"plain"')
        if t is None:
            bodhtml = self._get_type(bods, msgidx, '"text"', '"html"')
            if bodhtml is None:
                return None
            t = html2text.html2text(bodhtml)

        # Message header fields
        tup = self.srv.fetch(msgidx,
         '(BODY[HEADER.FIELDS (FROM TO DATE STATUS SUBJECT)])')
        if tup[0] != "OK":
            sys.stderr.write("%s msg %d failed: %s\n" %
                (self.user, msgidx, tup[1]))
            return None
        fields = self.field_dict(tup[1][0][1])

        return fields,t

# Get or start an imap server connection
def get(user, uconfig, imaps):
    # Existing connection?
    srv = imaps.get(user)
    if srv is not None:
        # Make sure it's still alive