使用PHP的Socket写的POP3类（一）_PHP教程

查看 pop3/smtp 协议的时候想尝试一下自己写一个操作类，核心没啥，就是使用 fsockopen ，然后写入/接收数据，只实现了最核心的部分功能，当作是学习 socket 操作的练手。其中参考了 rfc 2449和一个国外的简单web邮件系统 uebimiau 的部分代码，不过绝对没有抄他滴，hoho，绝对原创。假如你喜欢，请收藏，随便修改，嗯，但是记得不要删除偶类里的声名，究竟偶也是辛辛劳苦写了好几天呐。
另外，欢迎自由发挥，改善或者修正这个类，希望能够为你所用。代码没有认真仔细的调试，发现bug请自己修正，hoho！

php
/**
* 类名：socketpopclient
* 功能：pop3 协议客户端的基本操作类
* 作者：heiyeluren
* 时间：2006-7-3
* 参考：rfc 2449, uebimiau
* 授权：bsd license
*/

class socketpopclient
{
var $strmessage = '';
var $interrornum = 0;
var $boldebug = false;

var $stremail = '';
var $strpasswd = '';
var $strhost = '';
var $intport = 110;
var $intconnsecond = 30;
var $intbuffsize = 8192;

var $reshandler = null;
var $bolislogin = false;
var $strrequest = '';
var $strresponse = '';
var $arrrequest = array();
var $arrresponse = array();


//---------------
// 基础操作
//---------------

//构造函数
function socketpop3client($strloginemail, $strloginpasswd, $strpophost='', $intport='')
{
$this->stremail = trim(strtolower($strloginemail));
$this->strpasswd = trim($strloginpasswd);
$this->strhost = trim(strtolower($strpophost));

if ($this->stremail=='' || $this->strpasswd=='')
{
$this->setmessage('email address or passwd is empty', 1001);
return false;
}
if (!preg_match("/^[w-] (.[w-] )*@[w-] (.[w-] ) $/i", $this->stremail))
{
$this->setmessage('email address invalid', 1002);
return false;
}
if ($this->strhost=='')
{
$this->strhost = substr(strrchr($this->stremail, "@"), 1);
}
if ($intport!='')
{
$this->intport = $intport;
}
$this->connecthost();
}

//连接服务器
function connecthost()
{
if ($this->boldebug)
{
echo "connection ".$this->strhost." ...rn";
}
if (!$this->getisconnect())