用smtp协议php发送email函数（发邮件）

hao0089

　　网上找发送email的函数，基本没找到，有发邮件的类，自己试着写了一个smtp的，发送邮件倒是可以了，不过还不知道怎么发附件，先记录一下，再研究，慢慢更新。
　　测试了163的smtp，可以发送。

function sendEmail($host, $port=25, $check=0, $username='', $password='', $fromemail, $toemail, $fromName=''
, $toName='', $subject='', $message='', $additional='', $charset='utf-8')
{
$CRLF = "\r\n";
$fromName = trim($fromName) == '' ? $fromemail : $fromName;
$toName = trim($toName) == '' ? $toemail : $toName;
$send_from = "=?$charset?B?".base64_encode($fromName)."?= <$fromemail>";
$send_to = "=?$charset?B?".base64_encode($toName)."?= <$toemail>";
$send_subject = "=?$charset?B?".base64_encode(str_replace(array("\r","\n"), array('',' '),$subject)).'?=';
$send_message = chunk_split(base64_encode(str_replace("\r\n.", " \r\n..", str_replace("\n", "\r\n",
str_replace("\r", "\n", str_replace("\r\n", "\n", str_replace("\n\r", "\r", $message)))))));
$additional = "To: {$send_to}{$CRLF}From: {$send_from}{$CRLF}MIME-Version: 1.0{$CRLF}Content-type: text/html; charset=$charset{$CRLF}{$additional}Content-Transfer-Encoding: base64{$CRLF}";
$fp = fsockopen($host, $port, $errno, $errstr);
if (!$fp)
{
return 'SCE'; //smtp connect error
}
if (strncmp(fgets($fp, 512), '220', 3) != 0)
{
return 'SCE'; //smtp connect error
}
fwrite($fp, "EHLO $fromName{$CRLF}");
if ($check)
{
while ($rt=strtolower(fgets($fp, 512)))
{
if (strpos($rt, "-") !== 3 || empty($rt))
{
break;
}
elseif (strpos($rt, "2") !== 0)
{
return "AE";//auth error
}
}
fwrite($fp, "AUTH LOGIN{$CRLF}");
if (strncmp(fgets($fp, 512), '334', 3) != 0)
{
return "ALE";//auth login error
}
fwrite($fp, base64_encode($username).$CRLF);
if (strncmp(fgets($fp,512), '334', 3) != 0)
{
return "ALUE";//auth login username error
}
fwrite($fp, base64_encode($password).$CRLF);
if (strncmp(fgets($fp, 512), '235', 3) != 0)
{
return 'ALPE';//auth login password error
}
}
$from = preg_replace("/.*\<(.+?)\>.*/", "\\1", $fromemail);
fwrite($fp, "MAIL FROM: <$from>$CRLF");
if (strncmp(fgets($fp, 512), '250', 3) != 0)
{
return 'EFE'; //email from error
}
fwrite($fp, "RCPT TO: <$toemail>$CRLF");
if (strncmp(fgets($fp,512), '250', 3) != 0)
{
return 'ETE';//email toemail error
}
fwrite($fp, "DATA$CRLF");
if (strncmp(fgets($fp, 512), '354', 3) != 0)
{
return 'EDE';//email data error
}
$msg  = "Date: ".Date("r").$CRLF;
$msg .= "Subject: $send_subject".$CRLF;
$msg .= $additional.$CRLF;
$msg .= $send_message.$CRLF.".".$CRLF;
fwrite($fp, $msg);
$lastmessage = fgets($fp, 512);
if (substr($lastmessage, 0, 3) != 250)
{
return 'ESE';//email send error
}
fwrite($fp, "QUIT\r\n");
fclose($fp);
return 'OK';
}