function testIMAP() { $conn = new Net_IMAP(HOST, PORT); // we need to login for getting the delimiter $conn->login(USER, PASS); if (PEAR::isError($this->delimiter = $conn->getHierarchyDelimiter())) { $this->fail('Can not get hierarchy delimiter'); } $conn->disconnect(); $this->reservedFolders = array('INBOX', 'INBOX' . $this->delimiter . 'Trash'); }
$elapsedTime = microtime(true) - $startTime; print "<h1> {$elapsedTime} :: Login as user {$username1} </h1>"; $imapClient = new Net_IMAP($host, $port, $enableSTARTTLS); $imapClient->setDebug(true); $imapClient->login($username1, $password1, true, false); $imapClient->selectMailbox($testFolder); if (!empty($username2) && !empty($password2)) { $elapsedTime = microtime(true) - $startTime; print "<h1> {$elapsedTime} :: Login as user {$username2} </h1>"; $imapClient2 = new Net_IMAP($host); $imapClient2->setDebug(true); $imapClient2->login($username2, $password2, true, false); } $elapsedTime = microtime(true) - $startTime; print "<h1> {$elapsedTime} :: Getting hierarchy delimiter </h1>"; $delimiter = $imapClient->getHierarchyDelimiter(); print "delimiter is: {$delimiter}<br>"; $elapsedTime = microtime(true) - $startTime; print "<h1> {$elapsedTime} :: List all folders </h1>"; $imapClient->getMailboxes(); $elapsedTime = microtime(true) - $startTime; print "<h1> {$elapsedTime} :: List all subscribed folders </h1>"; $imapClient->listsubscribedMailboxes(); $elapsedTime = microtime(true) - $startTime; print "<h1> {$elapsedTime} :: Checking for ACL support: "; if ($imapClient->hasCapability('ACL')) { print "<span style='color:green;'>supported</span></h1>"; $imapClient->getMyRights($testFolder); $imapClient->getACLRights($username1, $testFolder); if (!empty($username2)) { $imapClient->setACL($testFolder, $username2, 'lrswipcda');