用Socket发送电子邮件(利用需要验证的SMTP服务器)

<?
* 名称：用Socket发送电子邮件
* 描述：本类实现了直接使用需要验证的SMTP服务器直接发送邮件，参考文章《用Socket发送电子邮件》作者：limodou
* 此文章比较早，他是用不用验证SMTP服务器发送邮件，现在基本上SMTP服务器都需要验证了，所以这个文章里的类
意义也不是很大！同时参考了[RFC 1869]和PHP手册！！和上文还有不同的是我用的不是fsockopen()函数
具体你自己看吧！！我刚刚测试通过了，很爽！！
其实把这个类再改写一下就可以直接发送带附件的邮件了，期待。。。我过几天给大家写出来！
我刚刚调试通过，如果你不恶意去捉弄这个程序，他还是很听话的，过些日子我会对他完善加上发送附件的功能！！
即使你的虚拟主机不支持MAIL函数，现在也不怕了！快快试试这个吧！
请尊重别人的劳动成功，请保留此版权信息，谢谢！
作者：小露珠3.3 ，欢迎和我联系交流PHP QQ6550382
MAIL：cleverzhang@tom.com
*/
set_time_limit(120);
class smtp_mail
{
var $host; //主机
var $port; //端口 一般为25
var $user; //SMTP认证的帐号
var $pass; //认证密码
var $debug = false; //是否显示和服务器会话信息？
var $conn;
var $result_str; //结果
var $in; //客户机发送的命令
var $from; //源信箱
var $to; //目标信箱
var $subject; //主题
var $body; //内容
function smtp_mail($host,$port,$user,$pass,$debug=false)
{
$this->host = $host;
$this->port = $port;
$this->user = base64_encode($user);
$this->pass = base64_encode($pass);
$this->debug = $debug;
$this->socket = socket_create (AF_INET, SOCK_STREAM, SOL_TCP); //具体用法请参考手册
if($this->socket)
{
$this->result_str = "创建SOCKET:".socket_strerror(socket_last_error());
$this->debug_show($this->result_str);
}
else
{
exit("初始化失败，请检查您的网络连接和参数");
MIME 编码方式简介
（作者：陈俊清　2000年10月24日 15:09）
　　MIME 编码方式简介
　　Subject: =?gb2312?B?xOO6w6Oh?=
　　这里是邮件的主题，可是因为编码了，我们看不出是什么内容，其原来的文本是：“你好！”我们先看看 MIME 编码的两种方法。
　　对邮件进行编码最初的原因是因为 Internet 上的很多网关不能正确传输8 bit 内码的字符，比如汉字等。编码的原理就是把 8 bit 的内容转换成 7 bit 的形式以能正确传输，在接收方收到之后，再将其还原成 8 bit 的内容。
　　MIME 是“多用途网际邮件扩充协议”的缩写，在 MIME 协议之前，邮件的编码曾经有过 UUENCODE 等编码方式 ，但是由于 MIME 协议算法简单，并且易于扩展，现在已经成为邮件编码方式的主流，不仅是用来传输 8 bit 的字符，也可以用来传送二进制的文件 ，如邮件附件中的图像、音频等信息，而且扩展了很多基于MIME 的应用。从编码方式来说，MIME 定义了两种编码方法Base64与QP(Quote-Printable) :
　　Base 64 是一种通用的方法，其原理很简单，就是把三个Byte的数据用 4 个Byte表示，这样，这四个Byte 中，实际用到的都只有前面6 bit，这样就不存在只能传输 7bit 的字符的问题了。Base 64的缩写一般是“B”，像这封信中的Subject 就是用的 Base64 编码。
　　另一种方法是QP(Quote-Printable) 方法，通常缩写为“Q”方法，其原理是把一个 8 bit 的字符用两个16进制数值表示，然后在前面加“=”。所以我们看到经过QP编码后的文件通常是这个样子：=B3=C2=BF=A1=C7=E5=A3=AC=C4=FA=BA=C3=A3=A1。
　　在 PHP 里，系统有两个函数可以很方便地实现解码：base64_decode（）与quoted_printable_decode（），前者可用于base64 编码的解码，后者是用于 QP 编码方法的解码。
　　现在我们再来看看Subject: =?gb2312?B?xOO6w6Oh?= 这一主题的内容，这不是一段完整的编码，只有部分是编码了的，这个部分用 =? ?= 两个标记括起来，=? 后面说明的是这段文字的字符集是 GB2312 ，然后一个 ? 后面的一个 B 表示的是用的 Base64 编码。通过这段分析，我们来看一下这个 MIME 解码的函数：（该函数由 PHPX.COM 站长 Sadly 提供，本人将其放入一个类中，并做了少量的修改，在此致谢）
　　function decode_mime($string) {
　　 $pos = strpos($string, '=?');
　　 if (!is_int($pos)) {
　　　　 return $string;
　　 }
这是一个完全符合RFC2822和RFC2821的代码。只检查单个email地址。
function check_email_address($email) {
// First, we check that there's one @ symbol, and that the lengths are right
if (!ereg("[^@]{1,64}@[^@]{1,255}", $email)) {
// Email invalid because wrong number of characters in one section, or wrong number of @ symbols.
return false;
}
// Split it into sections to make life easier
$email_array = explode("@", $email);
$local_array = explode(".", $email_array[0]);
for ($i = 0; $i < sizeof($local_array); $i++) {
if (!ereg("^(([A-Za-z0-9!#$%&'*+/=?^_`{|}~-][A-Za-z0-9!#$%&'*+/=?^_`{|}~.-]{0,63})|("[^(|")]{0,62}"))$", $local_array[$i])) {
return false;
}
}
if (!ereg("^[?[0-9.]+]?$", $email_array[1])) { // Check if domain is IP. If not, it should be valid domain name
$domain_array = explode(".", $email_array[1]);
if (sizeof($domain_array) < 2) {
return false; // Not enough parts to domain
}
for ($i = 0; $i < sizeof($domain_array); $i++) {
if (!ereg("^(([A-Za-z0-9][A-Za-z0-9-]{0,61}[A-Za-z0-9])|([A-Za-z0-9]+))$", $domain_array[$i])) {
return false;
}
}
}
return true;
}
RFC2822：定义了email的格式
http://www.faqs.org/rfcs/rfc2822.html
RFC2821：定义了email中@前后的用户名和服务器名的最大长度，4.5.3.1节
http://www.faqs.org/rfcs/rfc2821.html
另外RFC2234定义了ABNF和一些常用的terminal：
http://www.faqs.org/rfcs/rfc2234.html
网上大多数的邮件地址检查代码都没有按照这些RFC来写。
另外还可以加上检查邮件服务器是否存在的代码。这个在网上有的是。
下面是我找到的一个直接使用smtp发送邮件的php例子程序(经改编), 但是服务器方总是提示: 550 system busy! 并且邮件无法发送.
那位知道如何处理?
另: 对于smtp服务器需要密码的情况该如何处理验证呢?
sory , 刚刚看到 smtp 发送邮件的问题 (链接的这个帖子怎么不是精华?, 建议斑竹给一个啊).
问题已经解决:
1. 命令data应该是"DATA "
2. from和to命令应该有, 否则一些server拒发邮件
3.使用base64_encode 加密用户名和密码
<?php
require("phpmail.php");
?>
<?
$smtp = "smtp.163.net";
$from ="hylpro@163.net";
$to = "hylpro@163.net";
$subject ="Hello php mail";
$message="Hello! this is a test use php";
$mail = new mail($smtp,"Welcom use this mail",true);
$mail->send( $to,$from,$subject,$message);
?>

<?
//---------------
// 实现SMTP
//---------------
class Mail{
var $lastmessage; //记录最后返回的响应信息
var $lastact; //最后的动作，字符串形式
var $welcome; //用在HELO后面，欢迎用户
var $debug; //是否显示调试信息
var $smtp; //smtp服务器
var $port; //smtp端口号
var $fp; //socket句柄
//Construct
function mail($smtp, $welcome="", $debug=false)
{
if(empty($smtp)) die("SMTP cannt be NULL!");
$this->smtp=$smtp;
if(empty($welcome))
{
$this->welcome=gethostbyaddr("localhost");
}
else
$this->welcome=$welcome;
$this->debug=$debug;
$this->lastmessage="";
$this->lastact="";
$this->port="25";
}
//
function show_debug($message, $inout)
{
if ($this->debug)
{
if($inout=="in") //响应信息
{
$m="<b> 收: </b>";
}
else
$m="<b> 发: </b>" ;
if(!ereg("n$", $message))
$message .= " ";
/**
 * 判断字符串emailAddr是否为合法的email格式
 * 主要判断'@'及'.'是否出现，以及两者的位置
 * @param emailAddr 输入的email地址
 * @return true/false。
 */
function emailCheck(emailAddr)
{
      if((emailAddr == null) || (emailAddr.length < 2)) return false ;
      // 需出现'@',且不在首字符.
      var aPos = emailAddr.indexOf("@" ,1) ;
      if(aPos < 0)
      {
     return false ;
      }
      // '@'后出现'.',且不紧跟其后.
      if(emailAddr.indexOf("." ,aPos+2) < 0)
      {
     return false ;
      }
      return true ;
}