Desaster: Script Bewertung E-Mail input => PHP

Beitrag lesen

Hy @ll

Ich bräuchte eine Bewertung bzw. evtl. änderungs hinweise für mein folgendes Script.

Zu allererst möchte ich mich bei TomIRL entschuldigen. In dem Post
http://forum.de.selfhtml.org/archiv/2005/8/t114234/#m728716
wollte ich nicht den Anschein auf kommen lassen das du ein Arsch/loch bist.
Weil du dieses anscheinend doch so aufgefasst hast möchte ich nochmal erwähnen das dieses weder so gedacht noch so gemeint war.

THX im Vorraus

Desaster

Script:
#####################################################################
<?
print "<body bgcolor="#FFFFFF">";
include("ini/config.ini.php");
$mbox = @imap_open("{127.0.0.1:143}", "user", "pass");
if(isset($_GET['msg'])and $_GET['msg']!=NULL){$msg=$_GET['msg'];}else{$msg="1";}
if($msg!=1){$msgz=$msg-1;}else{$msgz=$msg;}
function del($del){global $mbox; imap_delete($mbox,$del,FT_UID);imap_expunge($mbox);}
$check=imap_mailboxmsginfo($mbox);
if($check) {
$folder= $check->Mailbox;    $size=number_format($check->Size,2);$size2=1024*1024;
$folder2=strpos($folder,"127.0.0.1");
if($folder2==true){$folder22="localhost ";}else{$folder22="Extern ";}
$folder1=strpos($folder, '}');
$size=$size/100;
$folder=substr($folder,$folder1+1);
 print "<table border="1"><tr>";
    print "<td>Date:</td><td>"     . $check->Date     . "    </td></tr><tr>\n" ;
    print "<td>Driver:</td><td>"   . $check->Driver   . "    </td></tr><tr>\n" ;
    print "<td>Ordner:</td><td>";print"$folder22==>$folder    </td></tr><tr>\n" ;
    print "<td>Messages:</td><td>" . $check->Nmsgs    . "    </td></tr><tr>\n" ;
    print "<td>Recent:</td><td>"   . $check->Recent   . "    </td></tr><tr>\n" ;
    print "<td>Size:</td><td>"    . $size     . " MB / 50MB</td></tr><tr>\n";
    print"</table><br>";
if($msg>=$check->Nmsgs){$msgn=$check->Nmsgs;}else{$msgn=$msg+1;}
if($check->Nmsgs>0){$x=imap_header($mbox, $msg);
 print "<title>$msg / $check->Nmsgs</title><table><tr>";
    print "<td>Datum:</td><td>"     . $x->Date          . "</td></tr><tr>\n";
    print "<td>Empfänger:</td><td>";
    if(!$x->toaddress){print "Anonymus".$x->toaddress."";}else{print_r($x->toaddress);}
                 print"</td></tr><tr>\n";
    print "<td>Absender:</td><td>";
    if(isset($x->senderaddress)){print_r($x->senderaddress);}
    if(empty($x->senderaddress)){print "Anonymus";}  print"</td></tr><tr>\n";
    print "<td>Betref:</td><td>"    . $x->Subject       . "</td></tr></table>\n";}
$y=imap_body($mbox, $msg);
$y=ereg_replace("href=(["|']?)(http[s]?://[a-z0-9~@&:=?+/.,_-]+)(/+)(#[a-z0-9~@&:=?+/.,_-]+)(["|']?)", "href=\1\4\5", $y);
$sub=strpos($x->Subject,"utf-8");
if($sub==true){
$utf8=imap_utf8($y);
print "<br>$utf8<br><br>";}
if($sub===false){
  $test=quoted_printable_decode($y);
//$test=ereg_replace("<87A7","xy",$test);
//$test=ereg_replace("<D31E","xy",$test);
//$test=ereg_replace("<DC2C","xy",$test);
//$test=ereg_replace("<5120","xy",$test);
//$test=ereg_replace("<07BA","xy",$test);
  $testx=$test;
  $testx21=strpos($testx, 'xml');//Outlook
    if($testx21==true)    {$testx2=$testx21-6;}
    if($testx21===false) {$testx22=strpos($testx,'!DOCTYPE');}//Outlook Express
 if(isset($testx22) and $testx22==true)   {$testx2=$testx22-1;}
    if(isset($testx22) and $testx22===false) {$testx23=strpos ($testx, '<HTML>');}  //Incredi Mail
    if(isset($testx23) and $testx23==true)   {$testx2=$testx23;}
    if(isset($testx23) and $testx23===false) {$testx2="0";}     //Weder noch
  $testx4=substr($testx,$testx2);
  $testx31=strpos($testx4,'</HTML>'); //Incedi Mail
    if($testx31==true)          {$testx3=$testx31+6;}
    if($testx31===false)         {$testx32=strrpos($testx4,'NextPart');} //Outlook Express
    if(isset($testx32) and $testx32==true)  {$testx3=$testx32-10;}
    if(isset($testx32) and $testx32===false){$testx33=strpos($testx4,'</html>');} //Outlook
    if(isset($testx33) and $testx33==true)  {$testx3=$testx33+7;}
    if(isset($testx33) and $testx33===false){$testx3="0";}    //wedernoch
    if($testx3>0)  {$testx=substr($testx,$testx2,$testx3);}
    if($testx3==0) {$testx=substr($testx,$testx2);}
  $testx=str_replace("<o:p></o:p>","<br>",$testx);
  $testx=str_replace("<o:p>","<br>",$testx);
  $testx=str_replace("</o:p>","<br>",$testx);
  $testx=ereg_replace("href=(["|']?)(http[s]?://[a-z0-9~@&:=?+/.,_-]+)(/+)(#[a-z0-9~@&:=?+/.,_-]+)(["|']?)", "href=\1\4\5", $testx);
    print "<table border="1" width="100%">$testx</table>";}
$status = imap_status ($mbox, "{127.0.0.1}INBOX", SA_ALL);
if($status) {
    print ("Messages:    " . $status->messages   ) . "<br>\n";
    print ("Recent:      " . $status->recent     ) . "<br>\n";
    print ("Unseen:      " . $status->unseen     ) . "<br>\n";
    print ("UIDnext:     " . $status->uidnext    ) . "<br>\n";
    print ("UIDvalidity: " . $status->uidvalidity) . "<br>\n";}
} else {
    print "imap_check() failed: " . imap_last_error() . "<br>\n";
}
global $status;
$z=imap_uid($mbox,$msg);
?>
<a href="del($z)">     <? print "<input type="submit" value="Löschen">"?></a><?print"
<a href="test.php?msg=1">     <input type="submit" value="|<=="></a>
<a href="test.php?msg=$msgz">    <input type="submit" value="&nbsp;&nbsp;--&nbsp;&nbsp;"></a>
<a href="test.php?msg=$msg">    <input type="submit" value="REFRESH"></a>
<a href="test.php?msg=$msgn">    <input type="submit" value="&nbsp;&nbsp;++&nbsp;&nbsp;"></a>
<a href="test.php?msg=$check->Nmsgs"><input type="submit" value="==>|"></a>";
imap_close($mbox);
print "</body>";?>