diff -r 000000000000 -r a1044ae95953 MailUtils.m
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/MailUtils.m	Wed Jul 16 10:50:34 2008 -0700
@@ -0,0 +1,136 @@
+//
+//  MailUtils.m
+//  YourMove
+//
+//  Created by Jens Alfke on 7/13/08.
+//  Copyright 2008 Jens Alfke. All rights reserved.
+//  Adapted from Apple's "SBSendEmail" sample app.
+//
+
+#import "MailUtils.h"
+#import "MailBridge.h"
+#import "CollectionUtils.h"
+
+
+@implementation OutgoingEmail
+
+
+- (id) init
+{
+    self = [super init];
+    if (self != nil) {
+        _toRecipients = [[NSMutableArray alloc] init];
+        _attachments  = [[NSMutableArray alloc] init];
+    }
+    return self;
+}
+
+- (id) initWithSubject: (NSString*)subject body: (NSString*)body
+{
+    self = [self init];
+    if (self != nil) {
+        self.subject = subject;
+        self.body = body;
+    }
+    return self;
+}
+
+- (void) dealloc
+{
+    [_message release];
+    [_subject release];
+    [_body release];
+    [_sender release];
+    [_toRecipients release];
+    [_attachments release];
+    [super dealloc];
+}
+
+
+@synthesize subject=_subject, sender=_sender, body=_body,
+            toRecipients=_toRecipients, attachments=_attachments;
+
+
++ (MailApplication*) mailApp
+{
+    /* create a Scripting Bridge object for talking to the Mail application */
+    MailApplication *mail = [SBApplication applicationWithBundleIdentifier:@"com.apple.Mail"];
+    mail.timeout = 5*60; // in ticks
+    return mail;
+}
+
++ (BOOL) isMailRunning
+{
+    return [self mailApp].isRunning;
+}
+
+- (MailOutgoingMessage*) _message
+{
+    if( ! _message ) {
+        MailApplication *mail = [[self class] mailApp];
+        
+        /* create a new outgoing message object */
+        MailOutgoingMessage *emailMessage =
+            [[[mail classForScriptingClass:@"outgoing message"] alloc] initWithProperties:
+                                                                 $dict({@"subject", self.subject},
+                                                                       {@"content", self.body})];
+        
+        /* set the sender, show the message */
+        if( _sender )
+            emailMessage.sender = _sender;
+        
+        /* Have to add this to a container now, else the scripting bridge complains */
+        [[mail outgoingMessages] addObject: emailMessage];
+
+        /* create a new recipient and add it to the recipients list */
+        for( NSString *recipient in _toRecipients ) {
+            MailToRecipient *theRecipient =
+                [[[mail classForScriptingClass:@"to recipient"] alloc] initWithProperties:
+                                                                 $dict({@"address", recipient})];
+            [emailMessage.toRecipients addObject: theRecipient];
+        }
+        
+        /* add an attachment, if one was specified */
+        for( NSString *attachmentPath in self.attachments ) {
+            /* create an attachment object */
+            MailAttachment *theAttachment = 
+                [[[mail classForScriptingClass:@"attachment"] alloc] initWithProperties:
+                                                                 $dict({@"fileName", attachmentPath})];
+            
+            /* add it to the list of attachments */
+            [[emailMessage.content attachments] addObject: theAttachment];
+        }
+        
+        /* add the object to the mail app  */
+        _message = [emailMessage retain];
+    }
+    return _message;
+}
+
+
+- (void) show
+{
+	self._message.visible = YES;
+    [[[self class] mailApp] activate];
+}
+
+
+- (void) send
+{
+	[self._message send];
+}
+
+
+@end
+
+
+
+
+TestCase(MailUtils) {
+    OutgoingEmail *m = [[OutgoingEmail alloc] initWithSubject: @"This is a test"
+                                                         body: @"Hi there! This is a test email from an automated test case. http://mooseyard.com/"];
+    [m.toRecipients addObject: @"jens@mooseyard.com"];
+    [m show];
+    //[m send];
+    [m release];
+}