使用php通過Socket進行發信源碼，支援發信認證

使用php直接開啟socket連接埠進行發信的小程式
特點是使用smtp認證，能夠更好的使用滿足一般網友建站需要。

整個源碼附在本文中，同樣內容可到下列地址下載。
轉載請註明出處。

http://www.knowsky.com/download/phpsendmail.rar

/******************************************/
/* Php webmail sender */
/* www.ebugs.org */
/* Copyright 富翁 in im286.com 2005.03.07 */
/* 轉載請註明出處 */
/******************************************/

//使用前請首先按照提示進行配置發信認證的使用者名稱、密碼以及smtp伺服器位址、寄件者信箱等。
//注意將#替換成#，落伍(www.im286.com）負翁著作權，可隨意使用，但保留著作權資訊

//例子
echo send_mail('fuweng#im286.com','發信標題','發信內容');

function send_mail($to, $subject = 'No subject', $body) {
$loc_host = "im286"; //發信電腦名稱，可隨意
$smtp_acc = "fuweng#im286.com"; //Smtp認證的使用者名稱，類似fuweng@im286.com，或者fuweng
$smtp_pass="password"; //Smtp認證的密碼，一般等同pop3密碼
$smtp_host="smtp.im286.com"; //SMTP伺服器位址，類似 smtp.tom.com
$from="fuweng#im286.com"; //發信人Email地址，你的發信信箱地址
$headers = "Content-Type: text/plain; charset=\"gb2312\"\r\nContent-Transfer-Encoding: base64";
$lb="\r\n"; //linebreak

$hdr = explode($lb,$headers); //解析後的hdr
if($body) {$bdy = preg_replace("/^\./","..",explode($lb,$body));}//解析後的Body

$smtp = array(
//1、EHLO，期待返回220或者250
array("EHLO ".$loc_host.$lb,"220,250","HELO error: "),
//2、發送Auth Login，期待返回334
array("AUTH LOGIN".$lb,"334","AUTH error:"),
//3、發送經過Base64編碼的使用者名稱，期待返回334
array(base64_encode($smtp_acc).$lb,"334","AUTHENTIFICATION error : "),
//4、發送經過Base64編碼的密碼，期待返回235
array(base64_encode($smtp_pass).$lb,"235","AUTHENTIFICATION error : "));
//5、發送Mail From，期待返回250
$smtp[] = array("MAIL FROM: ".$lb,"250","MAIL FROM error: ");
//6、發送Rcpt To。期待返回250
$smtp[] = array("RCPT TO: ".$lb,"250","RCPT TO error: ");
//7、發送DATA，期待返回354
$smtp[] = array("DATA".$lb,"354","DATA error: ");
//8.0、發送From
$smtp[] = array("From: ".$from.$lb,"","");
//8.2、發送To
$smtp[] = array("To: ".$to.$lb,"","");
//8.1、發送標題
$smtp[] = array("Subject: ".$subject.$lb,"","");
//8.3、發送其他Header內容
foreach($hdr as $h) {$smtp[] = array($h.$lb,"","");}
//8.4、發送一個空行，結束Header發送
$smtp[] = array($lb,"","");
//8.5、發送信件主體
if($bdy) {foreach($bdy as $b) {$smtp[] = array(base64_encode($b.$lb).$lb,"","");}}
//9、發送“.”表示信件結束，期待返回250
$smtp[] = array(".".$lb,"250","DATA(end)error: ");
//10、發送Quit，退出，期待返回221
$smtp[] = array("QUIT".$lb,"221","QUIT error: ");

//開啟smtp伺服器連接埠
$fp = @fsockopen($smtp_host, 25);
if (!$fp) echo "Error: Cannot conect to ".$smtp_host."
";
while($result = @fgets($fp, 1024)){if(substr($result,3,1) == " ") { break; }}

$result_str="";
//發送smtp數組中的命令/資料
foreach($smtp as $req){
//發送資訊
@fputs($fp, $req[0]);
//如果需要接收伺服器返回資訊，則
if($req[1]){
//接收資訊
while($result = @fgets($fp, 1024)){
if(substr($result,3,1) == " ") { break; }
};
if (!strstr($req[1],substr($result,0,3))){
$result_str.=$req[2].$result."
";
}
}
}
//關閉串連
@fclose($fp);
return $result_str;
}
?>