mailview.php

通过WAP连接MAIL服务器 接受邮件

<?
/*
$Header: /home/cvsroot/pofhq-wapmail/mailview.php,v 1.3 2002/12/12 20:49:57 pau Exp $
Copyright (c) 2002 Pau Oliva Fora <[e-mail]>               
Licensed under the GNU GPL. For full terms see the file COPYING.
*/

require("config.php");
wmlheader();

$mbox = imap_open ("\{$IMAPSERVER:$IMAPPORT}$F", "$U", "$P") or wmldie ("can't connect: " . imap_last_error());
$header = imap_header ($mbox, $msgid, 50, 50, 50);
$from = $header->from;
$msgfrom = sprintf("%s@%s", $from[0]->mailbox,$from[0]->host);
$msgsubject = getsubject($header->fetchsubject);
$msgdate = date("d/m/y H:i:s", $header->udate);
$msgbody = getmsgbody($mbox, $msgid);
$bodysize = strlen($msgbody);
$parts = ceil($bodysize / $MESSAGESIZE);

imap_close($mbox);

if ($parts > 1) { /* better measure of parts */
	$counter = 1;
	$pos = 0;
	while ( ($pos + $MESSAGESIZE) < $bodysize ) {
		$pos = $pos + $MESSAGESIZE;
		while ($msgbody[$pos] != " ") $pos++;
		if ( $pos != $bodysize - 1 ) $counter++;
	}
	$parts = $counter;
}


print "<card id=\"mailbody\">\n";

if ( !isset($part) or $part == 1 ){
	
	/* print from and link to reply */
	echo "<p mode=\"nowrap\">\n";
	echo "<small>$S_FROM";
	waplink($S_REPLY,$msgfrom,"compose.php",array("subject"=>"RE:$msgsubject","msgto"=>$msgfrom,"F"=>$F,"U"=>$U,"P"=>$P));	
	echo "</small>\n";
	echo "</p>\n";
	
	/* print subject */
	echo "<p mode=\"nowrap\">\n";
	echo "<small>$S_SUBJECT $msgsubject</small>";
	echo "</p>\n";

	/* print date */
	echo "<p mode=\"nowrap\">\n";
	echo "<small>$S_DATE $msgdate</small>";
	echo "<br/></p>\n";

}

if ( $parts == 1 ) {

	/* print body */
	echo "<p mode=\"wrap\">\n";
	echo $msgbody;
	echo "\n</p>\n";

} else { /* message is longer than MESSAGESIZE */

	if ( isset($part) and $part == $parts ) { /* last part */

		/* find position for previous message */
		$pos=0;
		for($n=1; $n < $part - 1; $n++) {
			$pos = $pos + $MESSAGESIZE;
			while ($msgbody[$pos] != " ") $pos++;
		}

		/* print previous */
		echo "<p>\n";
		$prev_part = $part - 1;
		waplink($S_SUBMIT,$S_PREVIOUS,"mailview.php",array("position"=>$pos,"page"=>$page,"part"=>$prev_part,"msgid"=>$msgid,"F"=>$F,"U"=>$U,"P"=>$P));
		echo "</p>\n";

		/* print body from where we stopped */
		if (!isset($position)) $position = ($MESSAGESIZE * ($part - 1));
		echo "<p mode=\"wrap\">\n";
		echo "<small><b>Part:</b> $part/". $parts ."- <b>Size:</b> $bodysize</small><br/>\n";
		while ($msgbody[$position] != " ") $position++;
		for ($i = $position; $i < $bodysize; $i++) print("$msgbody[$i]");
		echo "\n</p>\n";

		/* link to reply */
		echo "<p>\n";
		waplink($S_REPLY,$S_REPLY,"compose.php",array("subject"=>"RE:$msgsubject","msgto"=>$msgfrom,"F"=>$F,"U"=>$U,"P"=>$P));	
		echo "</p>\n";

	} else { /* print this part */

		if (!isset($part) or $part == 1) { 
		/* we are on the 1st part, we have to set part here and link to part 2 */

			echo "<p mode=\"wrap\">\n";
			echo "<small><b>Part:</b> 1/". $parts ."- <b>Size:</b> $bodysize</small><br/>\n";
			for ($i = 0; $i < $MESSAGESIZE; $i++) print("$msgbody[$i]");
			while ($msgbody[$i] != " ") {
			/* don't cut the message until we find a suitable place */
				print("$msgbody[$i]");
				$i++;
			}
			echo "\n</p>\n";
			
			/* print next */
			echo "<p>\n";
			waplink($S_SUBMIT,$S_NEXT,"mailview.php",array("page"=>$page,"part"=>"2","msgid"=>$msgid,"F"=>$F,"U"=>$U,"P"=>$P));	
			echo "</p>\n";

		} else {
		/* we are on a part that is not 1st, we have to link to next and previous part */

			/* find position for previous message */
			$pos=0;
			for($n=1; $n < $part - 1; $n++) {
				$pos = $pos + $MESSAGESIZE;
				while ($msgbody[$pos] != " ") $pos++;
			}
			
			/* print previous */
			echo "<p>\n";
			$prev_part = $part - 1;
			waplink($S_SUBMIT,$S_PREVIOUS,"mailview.php",array("position"=>$pos,"page"=>$page,"part"=>$prev_part,"msgid"=>$msgid,"F"=>$F,"U"=>$U,"P"=>$P));
			echo "</p>\n";

			if (!isset($position)) $position = ($MESSAGESIZE * ($part - 1));

			echo "<p mode=\"wrap\">\n";
			echo "<small><b>Part:</b> $part/". $parts ."- <b>Size:</b> $bodysize</small><br/>";
			while ($msgbody[$position] != " ") $position++;
			for ($i = $position; $i < $position + $MESSAGESIZE; $i++) print("$msgbody[$i]");
			$position = $i;
			while ($msgbody[$position] != " ") {
			/* don't cut the message until we find a suitable place */
				print("$msgbody[$position]");
				$position++;
			}
			echo "\n</p>\n";

			/* print next */
			echo "<p>\n";
			$next_part = $part + 1;
			waplink($S_SUBMIT,$S_NEXT,"mailview.php",array("position"=>$position,"page"=>$page,"part"=>$next_part,"msgid"=>$msgid,"F"=>$F,"U"=>$U,"P"=>$P));
			echo "</p>\n";
		}
	}
}

/* always print delete return and back */
echo "<p>\n";
waplink($S_SUBMIT,$S_DELETE,"maildel.php",array("msgid"=>$msgid,"F"=>$F,"U"=>$U,"P"=>$P));
echo "</p>\n";
echo "<p>\n";
wapbutton(0,$S_INDEX,"index.php",array("F"=>$F,"U"=>$U,"P"=>$P));
echo "</p>\n";
echo "<p>\n";
wapbutton(0,$S_BACK,"maillist.php",array("page"=>$page,"F"=>$F,"U"=>$U,"P"=>$P));
echo "</p>\n";


wmlfooter();
?>