smtp

/***********************************
PHP MIME　SMTP ver 1.0 Powered by Boss_ch， Unigenius soft ware co. Ltd
All rights reserved, Copyright 2000 ;
本類用　PHP　通過　smtp 　sock 操作發(fā)送　MIME 類型的郵件，可以發(fā)送
HTML 格式的正文、附件，采用　base64 編碼
本版本是針對(duì)個(gè)人的發(fā)送，與多人群發(fā)版本不同的是，每發(fā)送到一個(gè)人，就重新進(jìn)行一次編碼，在接收端的用戶看來，只是發(fā)送給他一個(gè)人的。
針對(duì)多人群發(fā)的情況，只發(fā)送一次，通過多個(gè)　RCPT　TO　命令發(fā)送到不同的人信箱中，
說明：
請(qǐng)把　$hostname 設(shè)為你有權(quán)限的　默認(rèn)　smtp 服務(wù)器或是在　new 時(shí)指定
把　$charset 改成你的默認(rèn)　字符集
Html 正文中如有圖片，請(qǐng)用絕對(duì)路徑的引用　"httP://host/path/image.gif";
　　并連上網(wǎng)，以保證程序能讀取到圖片的數(shù)據(jù)信息
如果是通過表單提交過來的　Html 正文，請(qǐng)先用　StripSlashes($html_body)　把正文內(nèi)容進(jìn)行預(yù)處理
　　Html 中用到的樣式表文件，請(qǐng)不要用　之類　的引用，直接把樣式表定義放在
標(biāo)簽中

轉(zhuǎn)載請(qǐng)保留此版權(quán)信息，　Bugs Report : boss_ch@china.com
*************************************/
if(!isset($__smtp_class__)){
$__smtp_class__=1;

class smtp
{
var $hostname="";
var $port=25;
var $connection=0;
var $debug=1;

var $timeout=30;
var $err_str;
var $err_no;

var $autocode=true;
var $charset="GB2312";
var $subject="";
var $body="";
var $attach="";
var $temp_text_body;
var $temp_html_body;
var $temp_body_images;

var $bound_begin="=====powered_by_boss_chen_";
var $bound_end="_046484063883_=====";

Function smtp($server="smtp.china.com"",$port=25,$time_out=20)
{$this->hostname=$server;
$this->port=$port;
$this->timeout=$time_out;
return true;
}

Function outdebug($message)
{
echo htmlspecialchars($message)."
\n";
}


function command($command,$return_lenth=1,$return_code='2')
{
if ($this->connection==0)
{
$this->err_str="沒有連接到任何服務(wù)器，請(qǐng)檢查網(wǎng)絡(luò)連接";
return false;
}
if ($this->debug)
$this->outdebug(">>> $command");
if (!fputs($this->connection,"$command \r\n"))
{
$this->err_str="無法發(fā)送命令".$command;
return false;
}
else
{
$resp=fgets($this->connection,256);
if($this->debug)
$this->outdebug("$resp");
if (substr($resp,0,$return_lenth)!=$return_code)
{
$this->err_str=$command." 命令服務(wù)器返回?zé)o效:".$resp;
return false;
}
else
return true;
}
}


Function open()
{
if($this->hostname=="")
{$this->err_str="無效的主機(jī)名!!";
return false;
}

if ($this->debug) echo "$this->hostname,$this->port,&$err_no, &$err_str, $this->timeout
";
if (!$this->connection=fsockopen($this->hostname,$this->port,&$err_no, &$err_str, $this->timeout))
{
$this->err_str="連接到　SMTP 服務(wù)器失敗,錯(cuò)誤信息：".$err_str."錯(cuò)誤號(hào)：".$err_no;
return false;
}
else
{
$resp=fgets($this->connection,256);
if($this->debug)
$this->outdebug("$resp");
if (substr($resp,0,1)!="2")
{$this->err_str="服務(wù)器返回?zé)o效的信息：".$resp."請(qǐng)檢查SMTP服務(wù)器是否正確";
return false;
}
return true;
}
}


Function Close()
{
if($this->connection!=0)
{
fclose($this->connection);
$this->connection=0;
}
}

Function Buildhead($from_name,$to_name,$from_mail,$to_mail,$subject)
{
if (empty($from_name))
$from_name=$from_mail;
if (empty($to_name)) $to_name=$to_mail;
$this->subject="From: =?$this->charset?B?".base64_encode($from_name)."?=\r\n";
$this->subject.="To: =?$this->charset?B?".base64_encode($to_name)."?=\r\n";
$subject=ereg_replace("\n","",$subject);
$this->subject.="Subject: =?$this->charset?B?".base64_encode($subject)."?=\r\n";
if ($this->debug) echo nl2br(htmlspecialchars($this->subject));
return true;
}


Function parse_html_body($html_body=null)
{
$passed="";
$image_count=0;
$this->temp_body_images=array();
while (eregi("\]+)src[[:space:]]*=[[:space:]]*([^ ]+)",$html_body,$reg))
{

$pos=@strpos($html_body,$reg[0]);
$passed.=substr($html_body,0,$pos);
$html_body=substr($html_body,$pos+strlen($reg[0]));
$image_tag=$reg[2];
$image_att=$reg[1];
$tag_len=strlen($image_tag);
if ($image_tag[0]=="'" or $image_tag[0]=='"')
$image_tag=substr($image_tag,1);
if (substr($image_tag,strlen($imgage_tag)-1,1)=="'" or substr($image_tag,strlen($imgage_tag)-1,1)=='"')
$image_tag=substr($image_tag,0,strlen($imgage_tag)-1);
//echo $image_tag."
";
$cid=md5(uniqid(rand()));
$cid=substr($cid,0,15)."@unigenius.com";
$passed.="$end_pos=@strpos($html_body,'>');
$passed.=substr($html_body,0,$end_pos);
$html_body=substr($html_body,$end_pos);
// 把圖片數(shù)據(jù)讀出來保存到一個(gè)數(shù)據(jù)；

$img_file_con=fopen($image_tag,"r");
unset($image_data);
while ($tem_buffer=AddSlashes(fread($img_file_con,16777216)))
$image_data.=$tem_buffer;
fclose($img_file_con);
$image_exe_name=substr($image_tag,strrpos($image_tag,'.')+1,3);
switch (strtolower($image_exe_name))
{
case "jpg":
case "jpeg":
$content_type="image/jpeg";
break;
case "gif":
$content_type="image/gif";
break;
case "png":
$content_type="image/x-png";
break;
case "tif":
$content_type="image/tif";
break;
default:
$content_type="image/";
break;
}

$this->temp_body_images[$image_count][name]=basename($image_tag);
$this->temp_body_images[$image_count][type]=$content_type;
$this->temp_body_images[$image_count][cid]=$cid;
$this->temp_body_images[$image_count][data]=$image_data;
$image_count++;
}
$this->temp_html_body=$passed.$html_body;
return true;

}

function build_content($bound_level=0,$text_body,$html_body,$hava_att=false)
{
if ($html_body)
{
if (eregi("\{
$bound_level++;
if ($text_body)
{
$this->body.="Content-Type: multipart/related;
type=\"multipart/alternative\";
boundary=\"";
$this->body.=$this->bound_begin.$bound_level.$this->bound_end."\"\r\n\r\n";
}
else
{
$this->body.="Content-Type: multipart/related;
boundary=\"";
$this->body.=$this->bound_begin.$bound_level.$this->bound_end."\"\r\n\r\n";

} // 對(duì)于是否 text 正文 、 html正文 有沒有，須有不同的 MIME 頭
if (!$hava_att) $this->body.="This is a multi-part message in MIME format.\r\n\r\n";
// 正文標(biāo)識(shí)，如果是已經(jīng)有附件的編碼，則在正文 中不需要這一句
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."\r\n";
$this->parse_html_body($html_body);
if ($text_body)
{
$this->body.="Content-Type: multipart/alternative;
boundary=\"";
$bound_level++;
$this->body.=$this->bound_begin.$bound_level.$this->bound_end."\"\r\n\r\n";
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."\r\n";
$this->body.="Content-Type: text/plain;\r\n";
$this->body.="charset=\"$this->charset\"\r\n";
$this->body.="Content-Transfer-Encoding: base64 \r\n";
$this->body.="\r\n".chunk_split(base64_encode(StripSlashes($text_body)))."\r\n";
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."\r\n";
$this->body.="Content-Type: text/html;\r\n";
$this->body.="charset=\"$this->charset\"\r\n";
$this->body.="Content-Transfer-Encoding: base64 \r\n";
$this->body.="\r\n".chunk_split(base64_encode(StripSlashes($this->temp_html_body)))."\r\n";
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."--\r\n\r\n";
$bound_level--;
}
else
{
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."\r\n";
$this->body.="Content-Type: text/html;\r\n";
$this->body.="charset=\"$this->charset\"\r\n";
$this->body.="Content-Transfer-Encoding: base64 \r\n";
$this->body.="\r\n".chunk_split(base64_encode(StripSlashes($this->temp_html_body)))."\r\n";
} //正文編碼，有或沒有　text 部分，編成不同的格式。
for ($i=0;$itemp_body_images);$i++)
{
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."\r\n";
$this->body.="Content-Type:".$this->temp_body_images[$i][type].";
name=\"";
$this->body.=$this->temp_body_images[$i][name]."\"\r\n";
$this->body.="Content-Transfer-Encoding: base64\r\n";
$this->body.="Content-ID: temp_body_images[$i][cid].">\r\n";
$this->body.="\r\n".chunk_split(base64_encode(StripSlashes($this->temp_body_images[$i][data])))."\r\n";
}
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."--\r\n\r\n";
$bound_level--;
}
else // 有或沒有圖片，以上是有圖片的處理，下面是沒有圖片的處理
{
$this->temp_html_body=$html_body;
if ($text_body)
{
$bound_level++;
$this->body.="Content-Type: multipart/alternative;
boundary=\"";
$this->body.=$this->bound_begin.$bound_level.$this->bound_end."\"\r\n\r\n";

if (!$hava_att) $this->body.="\r\nThis is a multi-part message in MIME format.\r\n\r\n";
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."\r\n";
$this->body.="Content-Type: text/plain;\r\n";
$this->body.="charset=\"$this->charset\"\r\n";
$this->body.="Content-Transfer-Encoding: base64 \r\n";
$this->body.="\r\n".chunk_split(base64_encode(StripSlashes($text_body)))."\r\n";
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."\r\n";
$this->body.="Content-Type: text/html;\r\n";
$this->body.="charset=\"$this->charset\"\r\n";
$this->body.="Content-Transfer-Encoding: base64 \r\n";
$this->body.="\r\n".chunk_split(base64_encode(StripSlashes($this->temp_html_body)))."\r\n";
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."--\r\n\r\n";
$bound_level--;
}
else
{
$this->body.="Content-Type: text/html;\r\n";
$this->body.="charset=\"$this->charset\"\r\n";
$this->body.="Content-Transfer-Encoding: base64 \r\n";
$this->body.="\r\n".chunk_split(base64_encode(StripSlashes($this->temp_html_body)))."\r\n";
} //正文編碼，有或沒有　text 部分，編成不同的格式。

} // end else
}
else // 如果沒有　html 正文，只有　text 正文　
{
$this->body.="Content-Type: text/plain;
charset=\"$this->charset\"\r\n";
$this->body.="Content-Transfer-Encoding: base64 \r\n";
$this->body.="\r\n".chunk_split(base64_encode(StripSlashes($text_body)))."\r\n";
}
} // end function default


Function Buildbody($text_body=null,$html_body=null,$att=null)
{
$this->body="MIME-Version: 1.0\r\n";
if (null==$att or (@count($att)==0)) //如果沒有附件，查看正文的類型??；
{
$encode_level=0;
$this->build_content($encode_level,$text_body,$html_body);
} // 如果沒有附件，
// ********************************************************
else //如果有附件，
{
$bound_level=0;
$this->body.="Content-Type: multipart/mixed;
boundary=\"";
$bound_level++;

$this->body.=$this->bound_begin.$bound_level.$this->bound_end."\"\r\n\r\n";
$this->body.="This is a multi-part message in MIME format.\r\n\r\n";
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."\r\n";
$this->build_content($bound_level,$text_body,$html_body,true); // 編入正文部分

$num=count($att);
for ($i=0;$i{
$file_name=$att[$i][name];
$file_source=$att[$i][source];
$file_type=$att[$i][type];
$file_size=$att[$i][size];

if (file_exists($file_source))
{
$file_data=addslashes(fread($fp=fopen($file_source,"r"), filesize($file_source)));
$file_data=chunk_split(base64_encode(StripSlashes($file_data)));
$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."\r\n";
$this->body.="Content-Type: $file_type;\r\n name=\"$file_name\"\r\nContent-Transfer-Encoding: base64\r\n";
$this->body.="Content-Disposition: attachment; filename=\"$file_name\"\r\n\r\n";
$this->body.=$file_data."\r\n";
}
} //end for

$this->body.="--".$this->bound_begin.$bound_level.$this->bound_end."--\r\n\r\n";
} // end else

if ($this->debug) echo nl2br(htmlspecialchars($this->body));

return true;
}


function send($from_name,$to_name,$from_mail,$to_mail,$subject,$text_body=false,$html_body=false,$att=false)
{

if (empty($from_mail) or empty($to_mail))
{
$this->err_str="沒有指定正確的郵件地址:發(fā)送人：".$from_mail."接收人：".$to_mail;
return false;
}

if (gettype($to_mail)!="array")
$to_mail=split(",",$to_mail); //如果不是數(shù)組，轉(zhuǎn)換成數(shù)組，哪怕只有一個(gè)發(fā)送對(duì)象;
if (gettype($to_name)!="array")
$to_name=split(",",$to_name); //如果不是數(shù)組，轉(zhuǎn)換成數(shù)組，哪怕只有一個(gè)發(fā)送對(duì)象;

$this->Buildbody($text_body,$html_body,$att);
// 所有信件的內(nèi)容是一樣的，可以只編一次，而對(duì)于不同的收信人，需要不同的　Head


if (!$this->open()) return false;
if (!$this->command("HELO $this->hostname",3,"250")) return false;
// 與服務(wù)器建立鏈接
if (!$this->open()) return false;
if (!$this->command("HELO $this->hostname",3,"250")) return false;

for ($i=0;$i{
$this->Buildhead($from_name,$to_name[$i],$from_mail,$to_mail[$i],$subject);
if (!$this->command("RSET",3,"250")) return false;
if (!$this->command("MAIL FROM:".$from_mail,3,"250")) return false;
if (!$this->command("RCPT TO:".$to_mail[$i],3,"250")) return false;
if (!$this->command("DATA",3,"354")) return false;
// 準(zhǔn)備發(fā)送郵件
if ($this->debug) $this->outdebug("sending subject;");
if (!fputs($this->connection,$this->subject)) { $this->err_str="發(fā)送郵件頭時(shí)出錯(cuò)！"; return false;}
if ($this->debug) $this->outdebug("sending body;");
if (!fputs($this->connection,$this->body)) { $this->err_str="發(fā)送正文時(shí)出錯(cuò)！"; return false;}
if (!fputs($this->connection,".\r\n")) { $this->err_str="發(fā)送正文時(shí)出錯(cuò)！"; return false;} //正文發(fā)送完畢，退出；
$resp=fgets($this->connection,256);
if($this->debug)
$this->outdebug("$resp");
if (substr($resp,0,1)!="2")
{
$this->err_str="發(fā)送完后，服務(wù)器沒有響應(yīng)！！";
return false;
}
// 發(fā)送郵件
}
if (!$this->command("QUIT",3,"221")) return false;
$this->close();
return true;
}

}//end class define
}//end if(!isset($__smtp_class__))
?>