的换行标记。
第14行，输出整条信息，同时将信息颜色置为灰色以示区别。
执行一个命令
--------------------------------------------------------------------------------
1 function do_command($command, $code)
2 {
3 $this->lastact=$command;
4 $this->show_debug($this->lastact, "out");
5 fputs ( $this->fp, $this->lastact );
6 $this->lastmessage = fgets ( $this->fp, 512 );
7 $this->show_debug($this->lastmessage, "in");
8 if(!ereg("^$code", $this->lastmessage))
9 {
10 return false;
11 }
12 else
13 return true;
14 }
--------------------------------------------------------------------------------
在编写socket处理部分发现，一些命令的处理很相似，如HELO，MAIL FROM，RCPT TO，QUIT，DATA命令，
都要求根据是否显示调试信息将相关内容显示出来，同时对于返回的响应码，如果是期望的，则应继续处理，
如果不是期望的，则应中断出理。所以为了清晰与简化，专门对这些命令的处理编写了一个通用处理函数。
函数的参数中$code为期望的响应码，如果响应码与之相同则表示处理成功，否则出错。
第3行，记录最后执行命令。
第4行，将上传命令显示出来。
第5行，则使用fputs真正向服务器传换指令。
第6行，从服务器接收响应信息将放在最后响应消息变量中。
第7行，将响应信息显示出来。
第8行，判断响应信息是否期待的，如果是则第13行返回成功(true)，否则在第10行返回失败(false)。
这样，这个函数一方面完成指令及信息的发送显示功能，别一方面对返回的响应判断是否成功。
邮件发送处理
下面是真正的秘密了，可要看仔细了。:)
--------------------------------------------------------------------------------
1 function send( $to,$from,$subject,$message)
2 {
3
4 //连接服务器
5 $this->lastact="connect";
6
7 $this->show_debug("Connect to SMTP server : ".$this->smtp, "out");
8 $this->fp = fsockopen ( $this->smtp, $this->port );
9 if ( $this->fp )
10 {
11
12 set_socket_blocking( $this->fp, true );
13 $this->lastmessage=fgets($this->fp,512);
14 $this->show_debug($this->lastmessage, "in");
15
16 if (! ereg ( "^220", $this->lastmessage ) )
17 {
18 return false;
19 }
20 else
21 {
22 $this->lastact="HELO " . $this->welcome . "\n";
23 if(!$this->do_command($this->lastact, "250"))
24 {
25 fclose($this->fp);
26 return false;
27 }
28
29 $this->lastact="MAIL FROM: $from" . "\n";
30 if(!$this->do_command($this->lastact, "250"))
31 {
32 fclose($this->fp);
33 return false;
34 }
35
36 $this->lastact="RCPT TO: $to" . "\n";
37 if(!$this->do_command($this->lastact, "250"))
38 {
39 fclose($this->fp);
40 return false;
41 }
42
43 //发送正文
44 $this->lastact="DATA\n";
45 if(!$this->do_command($this->lastact, "354"))
46 {
47 fclose($this->fp);
48 return false;
49 }
50
51 //处理Subject头
52 $head="Subject: $subject\n";
53 if(!empty($subject) && !ereg($head, $message))
54 {
55 $message = $head.$message;
56 }
57
58 //处理From头
59 $head="From: $from\n";
60 if(!empty($from) && !ereg($head, $message))
61 {
62 $message = $head.$message;
63 }
64
65 //处理To头
66 $head="To: $to\n";
67 if(!empty($to) && !ereg($head, $message))
68 {
69 $message = $head.$message;
70 }
71
72 //加上结束串
73 if(!ereg("\n\.\n", $message))
74 $message .= "\n.\n";
75 $this->show_debug($message, "out");
76 fputs($this->fp, $message);
77
78 $this->lastact="QUIT\n";
79 if(!$this->do_command($this->lastact, "250"))
80 {
81 fclose($this->fp);
82 return false;
83 }
84 }
85 return true;
86 }
87 else
88 {
89 $this->show_debug("Connect failed!", "in");
90 return false;
91 }
92 }
--------------------------------------------------------------------------------
有些意思很清楚的我就不说了。
这个函数一共有四个参数，分别是$to表示收信人，$from表示发信人，$subject表求邮件主题和$message
表示邮件体。如果处理成功则返回true，失败则返回false。
第8行，连接邮件服务器，如果成功响应码应为220。
第12行，设置阻塞模式，表示信息必须返回才能继续。详细说明看手册吧。
第16行，判断响应码是否为220，如果是，则继续处理，否则出错返回。
第22-27行，处理HELO指令，期望响应码为250。
第29-34行，处理MAIL FROM指令，期望响应码为250。
第36-41行，处理RCPT TO指令，期望响应码为250。
第44-49行，处理DATA指令，期望响应码为354。
第51-76行，生成邮件体，并发送。
第52-56行，如果$subject不为空，则查找邮件体中是否有主题部分，如果没有，则加上主题部分。
第59-63行，如果$from不为空，则查找邮件体中是否有发信人部分，如果没有，则加上发信人部分。
第66-70行，如果$to不为空，则查找邮件体中是否有收信人部分，如果没有，则加上收信人部分。
第73-74行，查找邮件体是否有了结束行，如果没有则加上邮件体的结束行(以"."作为单独的一行的特殊行)。
第76行，发送邮件体。
第78-83行，执行QUIT结否与服务器的连接，期望响应码为250。
第85行，返回处理成功标志(true)。
第81-91行，与服务器连接失败的处理。
以上为整个send_mail类的实现，应该不是很难的。下面给出一个实例。
邮件发送实例
先给出一个最简单的实例：
--------------------------------------------------------------------------------
