(PHP ActiveX) Async Task Chain

Demonstrates how to combine a sequence of asynchronous tasks into a single task chain to be run in a background thread.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows Note: The php_com_dotnet.dll may need to be enabled inside of php.ini.

<?php

// All Chilkat classes can be unlocked at once at the beginning of a program
// by calling UnlockBundle.  It requires a Bundle unlock code.
// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.Global')
$chilkatGlob = new COM("Chilkat.Global");
$success = $chilkatGlob->UnlockBundle('Anything for 30-day trial.');
if ($success != 1) {
    print $chilkatGlob->LastErrorText . "\n";
    exit;
}

// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.MailMan')
$mailman = new COM("Chilkat.MailMan");

// Set the POP3 server's hostname
$mailman->MailHost = 'pop.someMailServer.com';

// Set the POP3 login/password and any other requirements..
$mailman->PopUsername = 'myLogin';
$mailman->PopPassword = 'myPassword';
$mailman->PopSsl = 1;
$mailman->MailPort = 995;

// Connect to the POP3 server:
$success = $mailman->Pop3BeginSession();
if (!$success) {
    print $mailman->LastErrorText . "\n";
    exit;
}

// Get the number of messages in the mailbox.
$numMessages = $mailman->GetMailboxCount();
if ($numMessages == 0) {
    print 'No email messages in the POP3 mailbox.' . "\n";
    exit;
}

// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.TaskChain')
$taskChain = new COM("Chilkat.TaskChain");

// Create async task objects to fetch each email message
// by its sequence number

for ($i = 1; $i <= $numMessages; $i++) {

    // task is a Chilkat.Task
    $task = $mailman->FetchByMsgnumAsync($i);
    if ($mailman->LastMethodSuccess == 0) {
        print $mailman->LastErrorText . "\n";
        exit;
    }

    // Append each task to the task chain.
    $success = $taskChain->Append($task);
    if (!$success) {
        print $taskChain->LastErrorText . "\n";
        exit;
    }

}

// At this point, no tasks have actually started running.
// All we've done so far is to create tasks for the work that will be done
// when the task chain is run.

// Start the task chain running in a background thread.
// Each task is run one after the other (on the same background thread) until all tasks have completed.
// The task chain will stop at the first task that fails.
$taskChain->StopOnFailedTask = 1;
$success = $taskChain->Run();
if (!$success) {
    print $taskChain->LastErrorText . "\n";
    exit;
}

// The application is now free to do anything else
// while the emails are being downloaded

// For this example, we'll simply sleep and periodically
// check to see if the taskchain if finished. 
while ($taskChain->Finished != 1) {

    // Sleep 100 ms.
    $taskChain->SleepMs(100);

}

// A finished task chain could be one that was canceled, aborted, or truly finished.  

// If the task chain "completed", then it ran to completion.  A "completed" task will
// have a StatusInt equal to 7.   If the task finished, but was not completed, then it must've
// been aborted or canceled:
if ($taskChain->StatusInt != 7) {
    print 'Task did not complete.' . "\n";
    print 'task chain status: ' . $taskChain->Status . "\n";
    exit;
}

// For versions of Chilkat < 10.0.0, use new COM('Chilkat_9_5_0.Chilkat.Email')
$email = new COM("Chilkat.Email");

$numTasks = $taskChain->NumTasks;
$taskIdx = 0;

while (($taskIdx < $numTasks)) {

    // task is a Chilkat.Task
    $task = $taskChain->GetTask($taskIdx);

    // Load the email object with email downloaded by this task.
    $success = $email->LoadTaskResult($task);
    if (!$success) {
        print 'Failed to load email object for task.' . "\n";
    }
    else {
        print $email->From . '; ' . $email->Subject . "\n";
    }

    $taskIdx = $taskIdx + 1;
}


?>