Add support for Entourage export files

Source/EmUpWindowController.m

 /* Copyright (c) 2009 Google Inc.
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
@@ skipping 15 matching lines @@
 NSString *const kTabViewItemSelection = @"Selection";
 NSString *const kTabViewItemProgress = @"Progress";
 NSString *const kTabViewItemSkipped = @"Skipped";
 
 @interface EmUpWindowController (PrivateMethods)
 - (GDataServiceGoogle *)service;
 
 - (void)updateUI;
 - (NSString *)displayTimeForSeconds:(unsigned int)seconds;
 
+- (void)addMailboxesAtPath:(NSString *)path typeTag:(int)tag;
+
 // "backing off" happens when we get a status 503 on an entry;
 // delays happen normally to keep our upload throttled to
 // 1 message per second (in slow upload mode)
 - (void)uploadNow;
 - (void)uploadMoreMessages;
 - (void)uploadMoreMessagesAfterBackingOff;
 - (void)uploadMoreMessagesAfterDelay:(NSTimeInterval)delay;
 - (void)cancelUploadMoreMessagesAfterDelay;
 
 - (void)uploadEntry:(GDataEntryMailItem *)entry;
@@ skipping 405 matching lines @@
 
 [outlineView_ reloadData];
 [outlineView_ display];
 }
 }
 }
 
 [self endingLoadingMailboxes];
 }
 
-// addMailboxes is sent by menu items with a tag of 0 (Apple) or 1 (mbox)
+enum {
+ // kinds of mail folders
+ kAppleMailTag = 0,
+ kMBoxTag = 1, // mbox files
+ kMaildirTag = 2, // Maildir directories and dot subdirectories
+ kEntourageRGETag = 3
+};
+
+- (IBAction)importRGEArchiveFromEntourage:(id)sender {
+ // if we previously exported the rge archive, remove it and make a fresh
+ // export
+ NSFileManager *fileManager = [NSFileManager defaultManager];
+ if ([fileManager fileExistsAtPath:@"/tmp/EntourageArchive.rge"]) {
+ [fileManager removeFileAtPath:@"/tmp/EntourageArchive.rge"
+ handler:nil];
+ }
+
+ // execute a script to create an export archive package in /tmp, and report
+ // any errors
+ NSString *str = @"tell application \"Microsoft Entourage\" "
+ "to export archive to \"/tmp/EntourageArchive.rge\" "
+ "item types (mail items)";
+
+ NSAppleScript *script = [[[NSAppleScript alloc] initWithSource:str] autoreleas  e];
+ NSDictionary *errorDict = nil;
+ [script executeAndReturnError:&errorDict];
+
+ if (errorDict) {
+ NSString *title = NSLocalizedString(@"RGEImportFailed", nil);
+ NSString *msg = [errorDict objectForKey:NSAppleScriptErrorMessage];
+ NSBeginAlertSheet(title, nil, nil, nil,
+ [self window], self, NULL,
+ nil, nil, msg);
+ return;
+ }
+
+ // add the exported directory's Mail folder as the folder containing mbox
+ // files
+ NSString *path = @"/tmp/EntourageArchive.rge/Mail";
+ [self addMailboxesAtPath:path
+ typeTag:kEntourageRGETag];

[TVL, 2010/02/03 05:16:01]

does it make sense to do anything (special type?) to mark this so we'll delete it from tmp when done? (since the size could be non trivial) 

+}
+
+// addMailboxes is sent by menu items with a tag for the kind of mailbox to add
 - (IBAction)addMailboxes:(id)sender {
-
 if (isUploading_) return;
 
 int tag = [sender tag];
 
 NSOpenPanel *panel = [NSOpenPanel openPanel];
+[panel setPrompt:NSLocalizedString(@"SelectButton", nil)]; // "Select"
 
- [panel setCanChooseDirectories:YES];
- [panel setCanChooseFiles:NO];
- [panel setPrompt:NSLocalizedString(@"SelectButton", nil)]; // "Select"
- [panel setMessage:NSLocalizedString(@"SelectTitle", nil)]; // "Select Mail Dir  ectory"
+ NSArray *types = nil;
+ if (tag == kEntourageRGETag) {
+ // select "files" with extension rge, though it's really a package directory
+ [panel setCanChooseDirectories:NO];
+ [panel setCanChooseFiles:YES];
+ [panel setMessage:NSLocalizedString(@"SelectRGETitle", nil)]; // "Select rge   file"
+ types = [NSArray arrayWithObject:@"rge"];
+ } else {
+ // select any folder
+ [panel setCanChooseDirectories:YES];
+ [panel setCanChooseFiles:NO];
+ [panel setMessage:NSLocalizedString(@"SelectTitle", nil)]; // "Select Mail D  irectory"
+ }
 
 [panel beginSheetForDirectory:nil
 file:nil
+types:types
 modalForWindow:[self window]
 modalDelegate:self
 didEndSelector:@selector(openPanelDidEnd:returnCode:contextInfo :)
 contextInfo:(void *)tag];
 }
 
 - (void)openPanelDidEnd:(NSOpenPanel *)panel returnCode:(int)returnCode context Info:(void *)contextInfo {
 
 if (returnCode != NSOKButton) return;
 
-enum {
-// kinds of mail folders
-kAppleMailTag = 0,
-kMBoxTag = 1, // mbox files
-kMaildirTag = 2 // Maildir directories and dot subdirectories
-};
-
 int tag = (int)contextInfo;
 
 NSString *path = [panel filename];
+··
+if (tag == kEntourageRGETag) {
+// look in the Mail subdirectory of the Entourage archive; from there,
+// it's all mbox directories
+path = [path stringByAppendingPathComponent:@"Mail"];·
+}
+
+[self addMailboxesAtPath:path
+typeTag:tag];
+}
+
+- (void)addMailboxesAtPath:(NSString *)path typeTag:(int)tag {
+
 NSString *shortPath = [path stringByAbbreviatingWithTildeInPath];
 NSString *longPath = [path stringByStandardizingPath];
 
 [self beginningLoadingMailboxes];
 
 // the user picked a menu item for adding new mail directories to scan
 NSString *template;
 switch(tag) {
 
 case kAppleMailTag: {
 template = NSLocalizedString(@"AppleMailPathTemplate", nil); // "Apple Mai l - %@"
 NSString *appleRootName = [NSString stringWithFormat:template, shortPath];
 
 AppleMailItemsController *appleMail;
 appleMail = [[[AppleMailItemsController alloc] initWithMailFolderPath:long Path
 rootName:appl eRootName
 isMaildir:NO] autorelease];
 [itemsControllers_ addObject:appleMail];
 break;
 }
 
+case kEntourageRGETag:
 case kMBoxTag: {
- template = NSLocalizedString(@"MBoxPathTemplate", nil); // "MBox - %@"
+ if (tag == kMBoxTag) {
+  template = NSLocalizedString(@"MBoxPathTemplate", nil); // "MBox - %@"
+ } else {
+ // "Entourage - %@"
+ template = NSLocalizedString(@"EntouragePathTemplate", nil);
+ }
 NSString *macRootName = [NSString stringWithFormat:template, shortPath];
 MBoxItemsController *mbox;
 mbox = [[[MBoxItemsController alloc] initWithMailFolderPath:longPath
 rootName:macRootName] a utorelease];
 [itemsControllers_ addObject:mbox];
 break;
 }
 
 case kMaildirTag: {
 template = NSLocalizedString(@"MaildirPathTemplate", nil); // "Maildir - % @"
@@ skipping 999 matching lines @@
 - (void)setLastUploadDate:(NSDate *)date {
 [lastUploadDate_ release];
 lastUploadDate_ = [date retain];
 }
 
 - (void)setSimulateUploads:(BOOL)flag {
 shouldSimulateUploads_ = flag;
 }
 
 @end