一般我們常希望拜訪你的網站的朋友能留下Email 但是很多人都會隨便打,造成管理員的困擾, 以下這個class可以線上檢查Email是否是有效的Email(存不存在)
<? class CEmail { var $email_regular_expression="^([a-z0-9_]|\-|\.)+@(([a-z0-9_]|\-)+\.)+[a-z]{2,4}$"; var $timeout=0; var $localhost=""; var $localuser="";
Function GetLine($connection) { for($line="";;) { if(feof($connection)) return(0); $line.=fgets($connection,100); $length=strlen($line); if($length>=2 && substr($line,$length-2,2)=="rn") return(substr($line,0,$length-2)); } }
Function PutLine($connection,$line) { return(fputs($connection,"$linern")); }
Function VerifyRule($email) { return(eregi($this->email_regular_expression,$email)!=0); }
Function ValidateEmailHost($email,$hosts=0) { if(!$this->VerifyRule($email)) return(0); $user=strtok($email,"@"); $domain=strtok(""); if(GetMXRR($domain,&$hosts,&$weights)) { $mxhosts=array(); for($host=0;$host<count($hosts);$host++) $mxhosts[$weights[$host]]=$hosts[$host]; KSort($mxhosts); for(Reset($mxhosts),$host=0;$host<count($mxhosts);Next($mxhosts),$host++) $hosts[$host]=$mxhosts[Key($mxhosts)]; } else { $hosts=array(); if(strcmp(@gethostbyname($domain),$domain)!=0) $hosts[]=$domain; } return(count($hosts)!=0); }
Function VerifyResultLines($connection,$code) { while(($line=$this->GetLine($connection))) { if(!strcmp(strtok($line," "),$code)) return(1); if(strcmp(strtok($line,"-"),$code)) return(0); } return(-1); }
Function VerifyOnline($email) { if(!$this->ValidateEmailHost($email,&$hosts)) return(0); if(!strcmp($localhost=$this->localhost,"") && !strcmp($localhost=getenv("SERVER_NAME"),"") && !strcmp($localhost=getenv("HOST"),"")) $localhost="localhost"; if(!strcmp($localuser=$this->localuser,"") && !strcmp($localuser=getenv("USERNAME"),"") && !strcmp($localuser=getenv("USER"),"")) $localuser="root"; for($host=0;$host<count($hosts);$host++) { if(($connection=($this->timeout ? fsockopen($hosts[$host],25,&$errno,&$error,$this->timeout) : fsockopen($hosts[$host],25)))) { if($this->VerifyResultLines($connection,"220")>0 && $this->PutLine($connection,"HELO $localhost") && $this->VerifyResultLines($connection,"250")>0 && $this->PutLine($connection,"MAIL FROM: <$localuser@$localhost>") && $this->VerifyResultLines($connection,"250")>0 && $this->PutLine($connection,"RCPT TO: <$email>") && ($result=$this->VerifyResultLines($connection,"250"))>=0) { fclose($connection); return($result); } fclose($connection); } } return(-1); }
function Verify($email,$type=0) { if($type==0) return $this->VerifyRule($email) ; else return $this->VerifyOnline($email) ;
}
}; ?>
用法: $m=new CEmail; //僅檢查語法 if($m->Verify("jerry@mail.jerry.com.tw",0)) echo "有效"; else echo "無效";
//線上檢查是否真的有該Email if($m->Verify("jerry@mail.jerry.com.tw",1)) echo "有效"; else echo "無效";
|