/brz/remove-bazaar

"""

Based on this original script: http://www.kirbyfooty.com/simplemapi.py

Now works (and tested) with:

    Outlook Express, Outlook 97 and 2000, 

    Eudora, Incredimail and Mozilla Thunderbird (1.5.0.2)

Date   : 30 May 2006

Version: 1.0.0

John Popplewell

john@johnnypops.demon.co.uk

http://www.johnnypops.demon.co.uk/python/

Thanks to Werner F. Bruhin and Michele Petrazzo on the ctypes list.

"""

import os

from ctypes import *

FLAGS = c_ulong

LHANDLE = c_ulong

LPLHANDLE = POINTER(LHANDLE)

# Return codes

SUCCESS_SUCCESS = 0

MAPI_USER_ABORT = 1

# Recipient class

MAPI_ORIG       = 0

MAPI_TO         = 1

# Send flags

MAPI_LOGON_UI   = 1

MAPI_DIALOG     = 8

class MapiRecipDesc(Structure):

    _fields_ = [

        ('ulReserved',      c_ulong),

        ('ulRecipClass',    c_ulong),

        ('lpszName',        c_char_p),

        ('lpszAddress',     c_char_p),

        ('ulEIDSize',       c_ulong),

        ('lpEntryID',       c_void_p),

    ]

lpMapiRecipDesc  = POINTER(MapiRecipDesc)

lppMapiRecipDesc = POINTER(lpMapiRecipDesc)

class MapiFileDesc(Structure):

    _fields_ = [

        ('ulReserved',      c_ulong),

        ('flFlags',         c_ulong),

        ('nPosition',       c_ulong),

        ('lpszPathName',    c_char_p),

        ('lpszFileName',    c_char_p),

        ('lpFileType',      c_void_p),

    ]

lpMapiFileDesc = POINTER(MapiFileDesc)

class MapiMessage(Structure):

    _fields_ = [

        ('ulReserved',          c_ulong),

        ('lpszSubject',         c_char_p),

        ('lpszNoteText',        c_char_p),

        ('lpszMessageType',     c_char_p),

        ('lpszDateReceived',    c_char_p),

        ('lpszConversationID',  c_char_p),

        ('flFlags',             FLAGS),

        ('lpOriginator',        lpMapiRecipDesc),

        ('nRecipCount',         c_ulong),

        ('lpRecips',            lpMapiRecipDesc),

        ('nFileCount',          c_ulong),

        ('lpFiles',             lpMapiFileDesc),

    ]

lpMapiMessage = POINTER(MapiMessage)

MAPI                    = windll.mapi32

MAPISendMail            = MAPI.MAPISendMail

MAPISendMail.restype    = c_ulong

MAPISendMail.argtypes   = (LHANDLE, c_ulong, lpMapiMessage, FLAGS, c_ulong)

MAPIResolveName         = MAPI.MAPIResolveName

MAPIResolveName.restype = c_ulong

MAPIResolveName.argtypes= (LHANDLE, c_ulong, c_char_p, FLAGS, c_ulong, lppMapiRecipDesc)

MAPIFreeBuffer          = MAPI.MAPIFreeBuffer

MAPIFreeBuffer.restype  = c_ulong

MAPIFreeBuffer.argtypes = (c_void_p, )

MAPILogon               = MAPI.MAPILogon

MAPILogon.restype       = c_ulong

MAPILogon.argtypes      = (LHANDLE, c_char_p, c_char_p, FLAGS, c_ulong, LPLHANDLE)

MAPILogoff              = MAPI.MAPILogoff

MAPILogoff.restype      = c_ulong

MAPILogoff.argtypes     = (LHANDLE, c_ulong, FLAGS, c_ulong)

def _logon(profileName=None, password=None):

    pSession = LHANDLE()

    rc = MAPILogon(0, profileName, password, MAPI_LOGON_UI, 0, byref(pSession))

    if rc != SUCCESS_SUCCESS:

        raise WindowsError, "MAPI error %i" % rc

    return pSession

def _logoff(session):

    rc = MAPILogoff(session, 0, 0, 0)

    if rc != SUCCESS_SUCCESS:

        raise WindowsError, "MAPI error %i" % rc

def _resolveName(session, name):

    pRecipDesc = lpMapiRecipDesc()

    rc = MAPIResolveName(session, 0, name, 0, 0, byref(pRecipDesc))

    if rc != SUCCESS_SUCCESS:

        raise WindowsError, "MAPI error %i" % rc

    rd = pRecipDesc.contents

    name, address = rd.lpszName, rd.lpszAddress

    rc = MAPIFreeBuffer(pRecipDesc)

    if rc != SUCCESS_SUCCESS:

        raise WindowsError, "MAPI error %i" % rc

    return name, address

def _sendMail(session, recipient, subject, body, attach):

    nFileCount = len(attach)

    if attach: 

        MapiFileDesc_A = MapiFileDesc * len(attach) 

        fda = MapiFileDesc_A() 

        for fd, fa in zip(fda, attach): 

            fd.ulReserved = 0 

            fd.flFlags = 0 

            fd.nPosition = -1 

            fd.lpszPathName = fa 

            fd.lpszFileName = None 

            fd.lpFileType = None 

        lpFiles = fda

    else:

        lpFiles = lpMapiFileDesc()

    RecipWork = recipient.split(';')

    RecipCnt = len(RecipWork)

    MapiRecipDesc_A = MapiRecipDesc * len(RecipWork) 

    rda = MapiRecipDesc_A() 

    for rd, ra in zip(rda, RecipWork):

        rd.ulReserved = 0 

        rd.ulRecipClass = MAPI_TO

        try:

            rd.lpszName, rd.lpszAddress = _resolveName(session, ra)

        except WindowsError:

            # work-round for Mozilla Thunderbird

            rd.lpszName, rd.lpszAddress = None, ra

        rd.ulEIDSize = 0

        rd.lpEntryID = None

    recip = rda

    msg = MapiMessage(0, subject, body, None, None, None, 0, lpMapiRecipDesc(),

                      RecipCnt, recip,

                      nFileCount, lpFiles)

    rc = MAPISendMail(session, 0, byref(msg), MAPI_DIALOG, 0)

    if rc != SUCCESS_SUCCESS and rc != MAPI_USER_ABORT:

        raise WindowsError, "MAPI error %i" % rc

def SendMail(recipient, subject="", body="", attachfiles=""):

    """Post an e-mail message using Simple MAPI

    recipient - string: address to send to (multiple addresses separated with a semicolon)

    subject   - string: subject header

    body      - string: message text

    attach    - string: files to attach (multiple attachments separated with a semicolon)

    """

    attach = []

    AttachWork = attachfiles.split(';')

    for file in AttachWork:

        if os.path.exists(file):

            attach.append(file)

    attach = map(os.path.abspath, attach)

    restore = os.getcwd()

    try:

        session = _logon()

        try:

            _sendMail(session, recipient, subject, body, attach)

        finally:

            _logoff(session)

    finally:

        os.chdir(restore)

if __name__ == '__main__':

    import sys

    recipient = "test@johnnypops.demon.co.uk"

    subject = "Test Message Subject"

    body = "Hi,\r\n\r\nthis is a quick test message,\r\n\r\ncheers,\r\nJohn."

    attachment = sys.argv[0]

    SendMail(recipient, subject, body, attachment)