|
这个程序是直接验证邮箱是否真实有效的函数，checkmail是主函数，使用时请直接使用即可，注意：因使用了DNS函数，该程序不能运行在Windows系统之下，使用Linux和FreeBSD都测试通过。
<?
set_time_limit(0);
if($_POST["mail"]!=""){
echo "电子邮件地址：".$_POST["mail"];
if( checkmail($_POST["mail"]))
echo " — <font color=green>有效</font>";
else
echo " — <font color=red>无效</font>";
}
?>
<form method=post action="">
<input type=text name=mail ><input type="submit" value="检查">
</form>
<?
function server_parse($socket, $response, $line = __LINE__){
while (substr($server_response, 3, 1) != ' '){
if (!($server_response = fgets($socket, 512))){
return false;
}
}
if (!(substr($server_response, 0, 3) == $response)){
return false;
}
return true;
}
function checkmail($strMail){
$arrMail=explode("@",$strMail);
if(! getmxrr ( $arrMail[1], $mxhosts ,$bb))return -1;
if($mxhosts[0]=="")return -1;//不能获得主机的MX信息
$cc=false;
for($i=0;$i<count($mxhosts);$i++){
echo $mxhosts[$i]."
";
if( $socket = @fsockopen($mxhosts[$i], 25, $errno, $errstr, 5) ){
if(server_parse($socket, "220", __LINE__)){
$cc=true;
break;
}
}
}
if($cc==false)return -2;//不能打开主机
fputs($socket, "HELO ".$arrMail[1]."
");
if(!server_parse($socket, "250", __LINE__))return -3;
srand((double)microtime()*1000000);
$randval = substr(md5(uniqid(rand())),0,6);
fputs($socket, "MAIL FROM:<$randval@testemail.com>
");
//使用是请将testemail.com改成你网站的域名
if(!server_parse($socket, "250", __LINE__))return -4;
fputs($socket, "RCPT TO:<$strMail>
");
if(!server_parse($socket, "250", __LINE__))return -5;//无效的用户名
fclose($socket);
return true;
}
?> |
