function getMessageHeaders($imapConnection, $start, $end, &$from, &$subject, &$date) {
$rel_start = $start;
if (($start > $end) || ($start < 1)) {
- echo "Error in message header fetching. Start message: $start, End message: $end<BR>";
+ echo _("Error in message header fetching. Start message: "). $start, _("End message: "). "$end<BR>";
exit;
}
** individually. I'm not sure why it happens like that, but that's what my
** testing found. Perhaps later I will be proven wrong and this will change.
**/
- function getMessageFlags($imapConnection, $j, &$flags) {
+ function getMessageFlags($imapConnection, $low, $high, &$flags) {
/** * 2 FETCH (FLAGS (\Answered \Seen)) */
- fputs($imapConnection, "messageFetch FETCH $j:$j FLAGS\n");
+ fputs($imapConnection, "messageFetch FETCH $low:$high FLAGS\n");
$read = fgets($imapConnection, 1024);
$count = 0;
while ((substr($read, 0, 15) != "messageFetch OK") && (substr($read, 0, 16) != "messageFetch BAD")) {
if (strpos($read, "FLAGS")) {
$read = ereg_replace("\(", "", $read);
$read = ereg_replace("\)", "", $read);
+ $read = str_replace("\\", "", $read);
$read = substr($read, strpos($read, "FLAGS")+6, strlen($read));
$read = trim($read);
- $flags = explode(" ", $read);;
- $s = 0;
- while ($s < count($flags)) {
- $flags[$s] = substr($flags[$s], 1, strlen($flags[$s]));
- $s++;
- }
+ $flags[$count] = explode(" ", $read);;
} else {
- $flags[0] = "None";
+ $flags[$count][0] = "None";
}
$count++;
$read = fgets($imapConnection, 1024);
$emailAddr = ereg_replace("--EMAILEND", "", $emailAddr);
$from = $emailAddr;
}
- else if (strlen($name) > 0) {
+ else if (strlen(trim($name)) > 0) {
$from = $name;
}
else if (strlen($emailAddr > 0)) {
function expungeBox($imapConnection, $mailbox) {
selectMailbox($imapConnection, $mailbox, $num);
fputs($imapConnection, "1 EXPUNGE\n");
+ imapReadData($imapConnection, "1", true, $response, $message);
}
function getFolderNameMinusINBOX($mailbox, $del) {
$message["INFO"]["MAILBOX"] = $mailbox;
$message["HEADER"] = fetchHeader($imapConnection, $id);
$message["ENTITIES"] = fetchBody($imapConnection, $message["HEADER"]["BOUNDARY"], $id, $message["HEADER"]["TYPE0"], $message["HEADER"]["TYPE1"]);
-
return $message;
}
}
/** ENCODING TYPE **/
- else if (substr($read[$i], 0, 26) == "Content-Transfer-Encoding:") {
+ else if (substr(strtolower($read[$i]), 0, 26) == "content-transfer-encoding:") {
$header["ENCODING"] = strtolower(trim(substr($read[$i], 26)));
}
$encoding = "us-ascii";
$i = 0;
while (trim($read[$i]) != "") {
- if (substr($read[$i], 0, 26) == "Content-Transfer-Encoding:") {
+ if (substr(strtolower($read[$i]), 0, 26) == "content-transfer-encoding:") {
$encoding = strtolower(trim(substr($read[$i], 26)));
} else if (substr($read[$i], 0, 13) == "Content-Type:") {
$i++;
$read[$i] = trim($read[$i]);
}
+ $i--;
/** Detect the boundary of a multipart message **/
if (strpos(strtolower(trim($line)), "boundary=")) {
$i++;
}
- if ( ($encoding == "us-ascii") && ($type0 != "text") && ($type0 != "message") ) {
- $encoding = "base64";
- }
-
/** remove the header from the entity **/
$i = 0;
while (trim($read[$i]) != "") {
$read = $entity;
}
- function parsePlainTextMessage($line) {
- $line = "^^$line";
-
- if ((strpos(strtolower($line), "<!") == false) &&
- (strpos(strtolower($line), "<html>") == false) &&
- (strpos(strtolower($line), "</html>") == false)) {
- $line = str_replace("<", "<", $line);
- $line = str_replace(">", ">", $line);
- }
-
- $wrap_at = 86; // Make this configurable int the config file some time
- if (strlen($line) - 2 >= $wrap_at) // -2 because of the ^^ at the beginning
- $line = wordWrap($line, $wrap_at);
-
- $line = str_replace(" ", " ", $line);
- $line = str_replace("\t", " ", $line);
- $line = str_replace("\n", "", $line);
-
- /** if >> or > are found at the beginning of a line, I'll assume that was
- replied text, so make it different colors **/
- if (strpos(trim(str_replace(" ", "", $line)), ">>") == 2) {
- $line = substr($line, 2, strlen($line));
- $line = "<TT><FONT COLOR=FF0000>$line</FONT></TT><BR>\n";
- } else if (strpos(trim(str_replace(" ", "", $line)), ">") == 2) {
- $line = substr($line, 2, strlen($line));
- $line = "<TT><FONT COLOR=800000>$line</FONT></TT><BR>\n";
- } else {
- $line = substr($line, 2, strlen($line));
- $line = "<TT><FONT COLOR=000000>$line</FONT></TT><BR>\n";
- }
-
- /** This translates "http://" into a link. It could be made better to accept
- "www" and "mailto" also. That should probably be added later. **/
- if (strpos(strtolower($line), "http://") != false) {
- $line = ereg_replace("<BR>", "", $line);
- $start = strpos(strtolower($line), "http://");
- $link = substr($line, $start, strlen($line));
-
- if (strpos($link, " ")) {
- $end = strpos($link, " ")-1;
- }
- else if (strpos($link, " ")) {
- $end = strpos($link, " ")-1;
- }
- else if (strpos($link, "<")) {
- $end = strpos($link, "<");
- }
- else if (strpos($link, ">")) {
- $end = strpos($link, ">");
- }
- else if (strpos($link, "(")) {
- $end = strpos($link, "(")-1;
- }
- else if (strpos($link, ")")) {
- $end = strpos($link, ")")-1;
- }
- else if (strpos($link, "{")) {
- $end = strpos($link, "{")-1;
- }
- else if (strpos($link, "}")) {
- $end = strpos($link, "}")-1;
- }
- else
- $end = strlen($link);
-
- $link = substr($line, $start, $end);
- $end = $end + $start;
- $before = substr($line, 0, $start);
- $after = substr($line, $end, strlen($line));
-
- $line = "$before<A HREF=\"$link\" TARGET=_top>$link</A>$after<BR>";
- }
-
- return $line;
- }
?>