技术资料 > PHP技术 > 经典文章 : 在PHP中用Socket发送电子邮件(三)

在PHP中用Socket发送电子邮件(三)

March 23,2004

邮件发送处理
　　下面是真正的秘密了，可要看仔细了。:)

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="DATAn";
45             if(!$this->do_command($this->lastact, "354"))
46             {
47                   fclose($this->fp);
48                   return false;
49             }
50
51             //处理Subject头
52             $head="Subject: $subjectn";
53             if(!empty($subject) && !ereg($head, $message))
54             {
55                   $message = $head.$message;
56             }
57
58             //处理From头
59             $head="From: $fromn";
60             if(!empty($from) && !ereg($head, $message))
61             {
62                   $message = $head.$message;
63             }
64
65             //处理To头
66             $head="To: $ton";
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="QUITn";
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类的实现，应该不是很难的。