Objective-C

Delete All IMAP Email

Demonstrates two ways to delete all email in a mailbox on an IMAP server. Objective-C

#import <CkoImap.h>
#import <CkoMessageSet.h>

BOOL success = NO;

//  This example requires the Chilkat API to have been previously unlocked.
//  See Global Unlock Sample for sample code.

CkoImap *imap = [[CkoImap alloc] init];

//  Turn on session logging:
imap.KeepSessionLog = YES;

//  Connect to an IMAP server.
//  Use TLS
imap.Ssl = YES;
imap.Port = [NSNumber numberWithInt:993];
success = [imap Connect: @"imap.example.com"];
if (success == NO) {
    NSLog(@"%@",imap.LastErrorText);
    return;
}

//  Login
success = [imap Login: @"myLogin" password: @"myPassword"];
if (success == NO) {
    NSLog(@"%@",imap.LastErrorText);
    return;
}

//  Select an IMAP mailbox
success = [imap SelectMailbox: @"Inbox.RubyMail"];
if (success == NO) {
    NSLog(@"%@",imap.LastErrorText);
    return;
}

//  Get the complete set of Uids for email in the selected mailbox.
CkoMessageSet *messageSet = [[CkoMessageSet alloc] init];
success = [imap QueryMbx: @"ALL" bUid: YES msgSet: messageSet];
if (success == NO) {
    NSLog(@"%@",imap.LastErrorText);
    return;
}

//  Set the Deleted flag for each message.
//  (ExpungeAndClose must be called to finalize the delete.)
success = [imap SetFlags: messageSet flagName: @"Deleted" value: [NSNumber numberWithInt: 1]];
if (success == NO) {
    NSLog(@"%@",imap.LastErrorText);
    return;
}

//  Alternatively, the Deleted flag may be set for each UID
//  individiually, but this is less efficient:
int i = 0;
int n = [messageSet.Count intValue];
while (i < n) {
    success = [imap SetFlag: [messageSet GetId: [NSNumber numberWithInt: i]] bUid: messageSet.HasUids flagName: @"Deleted" value: [NSNumber numberWithInt: 1]];
    if (success == NO) {
        NSLog(@"%@",imap.LastErrorText);
        return;
    }

    i = i + 1;
}

//  Expunge and close the mailbox.
success = [imap ExpungeAndClose];
if (success == NO) {
    NSLog(@"%@",imap.LastErrorText);
    return;
}

//  Display the session log.
NSLog(@"%@",imap.SessionLog);

//  Disconnect from the IMAP server.
success = [imap Disconnect];