} else {
$rel_end = $end;
}
- fputs($imapConnection, "messageFetch FETCH $rel_start:$rel_end RFC822.HEADER.LINES (From Subject Date To Cc)\n");
+ fputs($imapConnection, "messageFetch FETCH $rel_start:$rel_end RFC822.HEADER.LINES (From Subject Date)\n");
$read = fgets($imapConnection, 1024);
while ((substr($read, 0, 15) != "messageFetch OK") && (substr($read, 0, 16) != "messageFetch BAD")) {
}
/** This function gets all the information about a message. Including Header and body **/
- function fetchMessage($imapConnection, $id) {
+ function fetchMessage($imapConnection, $id, $mailbox) {
+ $message["INFO"]["ID"] = $id;
+ $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)));
}
$cont = strtolower(trim(substr($read, 13)));
if (strpos($cont, ";"))
$cont = substr($cont, 0, strpos($cont, ";"));
- $header["TYPE0"] = substr($cont, 0, strpos($cont, "/"));
- $header["TYPE1"] = substr($cont, strpos($cont, "/")+1);
+
+ if (strpos($cont, "/")) {
+ $header["TYPE0"] = substr($cont, 0, strpos($cont, "/"));
+ $header["TYPE1"] = substr($cont, strpos($cont, "/")+1);
+ } else {
+ $header["TYPE0"] = $cont;
+ }
$line = $read;
$read = fgets($imapConnection, 1024);
$header["CHARSET"] = "us-ascii";
}
+ /** Detects filename if any **/
+ if (strpos(strtolower(trim($line)), "name=")) {
+ $pos = strpos($line, "name=") + 5;
+ $name = trim($line);
+ if (strpos($line, " ", $pos) > 0) {
+ $name = substr($name, $pos, strpos($line, " ", $pos));
+ } else {
+ $name = substr($name, $pos);
+ }
+ $name = str_replace("\"", "", $name);
+ $header["FILENAME"] = $name;
+ }
}
/** REPLY-TO **/
- else if (substr($read, 0, 9) == "Reply-To:") {
+ else if (strtolower(substr($read, 0, 9)) == "reply-to:") {
$header["REPLYTO"] = trim(substr($read, 9, strlen($read)));
$read = fgets($imapConnection, 1024);
}
/** FROM **/
- else if (substr($read, 0, 5) == "From:") {
+ else if (strtolower(substr($read, 0, 5)) == "from:") {
$header["FROM"] = trim(substr($read, 5, strlen($read) - 6));
if ($header["REPLYTO"] == "")
$header["REPLYTO"] = $header["FROM"];
$read = fgets($imapConnection, 1024);
}
/** DATE **/
- else if (substr($read, 0, 5) == "Date:") {
+ else if (strtolower(substr($read, 0, 5)) == "date:") {
$d = substr($read, 5, strlen($read) - 6);
$d = trim($d);
$d = ereg_replace(" ", " ", $d);
$read = fgets($imapConnection, 1024);
}
/** SUBJECT **/
- else if (substr($read, 0, 8) == "Subject:") {
+ else if (strtolower(substr($read, 0, 8)) == "subject:") {
$header["SUBJECT"] = trim(substr($read, 8, strlen($read) - 9));
if (strlen(Chop($header["SUBJECT"])) == 0)
$header["SUBJECT"] = "(no subject)";
$read = fgets($imapConnection, 1024);
}
/** CC **/
- else if (substr($read, 0, 3) == "CC:") {
+ else if (strtolower(substr($read, 0, 3)) == "cc:") {
$pos = 0;
$header["CC"][$pos] = trim(substr($read, 4));
$read = fgets($imapConnection, 1024);
}
}
/** TO **/
- else if (substr($read, 0, 3) == "To:") {
+ else if (strtolower(substr($read, 0, 3)) == "to:") {
$pos = 0;
$header["TO"][$pos] = trim(substr($read, 4));
$read = fgets($imapConnection, 1024);
return decodeMime($body, $bound, $type0, $type1);
}
- function fetchEntityHeader($imapConnection, &$read, &$type0, &$type1, &$bound, &$encoding, &$charset) {
+ function fetchEntityHeader($imapConnection, &$read, &$type0, &$type1, &$bound, &$encoding, &$charset, &$filename) {
/** defaults... if the don't get overwritten, it will display text **/
$type0 = "text";
$type1 = "plain";
$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:") {
$cont = strtolower(trim(substr($read[$i], 13)));
if (strpos($cont, ";"))
$cont = substr($cont, 0, strpos($cont, ";"));
- $type0 = substr($cont, 0, strpos($cont, "/"));
- $type1 = substr($cont, strpos($cont, "/")+1);
+ if (strpos($cont, "/")) {
+ $type0 = substr($cont, 0, strpos($cont, "/"));
+ $type1 = substr($cont, strpos($cont, "/")+1);
+ } else {
+ $type0 = $cont;
+ }
+
+ $read[$i] = trim($read[$i]);
$line = $read[$i];
+ $i++;
while ( (substr(substr($read[$i], 0, strpos($read[$i], " ")), -1) != ":") && (trim($read[$i]) != "") && (trim($read[$i]) != ")")) {
str_replace("\n", "", $line);
str_replace("\n", "", $read[$i]);
$line = "$line $read[$i]";
$i++;
+ $read[$i] = trim($read[$i]);
}
+ $i--;
/** Detect the boundary of a multipart message **/
if (strpos(strtolower(trim($line)), "boundary=")) {
}
$charset = str_replace("\"", "", $charset);
}
+
+ /** Detects filename if any **/
+ if (strpos(strtolower(trim($line)), "name=")) {
+ $pos = strpos($line, "name=") + 5;
+ $name = trim($line);
+ if (strpos($line, " ", $pos) > 0) {
+ $name = substr($name, $pos, strpos($line, " ", $pos));
+ } else {
+ $name = substr($name, $pos);
+ }
+ $name = str_replace("\"", "", $name);
+ $filename = $name;
+ }
}
$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);
-
- /** 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;
- }
?>