Re: Invalid ICMP type 69

You may be unpacking the packet incorrectly - this will be difficult to diagnose. I suggest using NetPacket::ICMP and related Netpacket/pcap modules to make your code more readable/reliabe/standard.

"A closed mouth gathers no feet." --Unknown

Comment on Re: Invalid ICMP type 69

Replies are listed 'Best First'.
Re^2: Invalid ICMP type 69 by vancetech (Beadle) on Nov 03, 2006 at 19:13 UTC
I installed NetPacket and used it to decode in icmp_recv like this: `sub icmp_recv { my $icmp = shift; # Listen for ICMP response my $icmpbuffer; if( my $icmpr = $icmp->recv( $icmpbuffer, 1024, 0 ) ) { my $obj = NetPacket::ICMP->decode( $icmpbuffer ); print Dumper( $obj ); } return $icmpbuffer; }` [download] which returns this: `$VAR1 = bless( { '_parent' => undef, 'data' => 'r@ їЯEr@ Мда', 'cksum' => 9216, 'type' => 69, '_frame' => 'E$r@ їЯEr@ Мда', 'code' => 0 }, 'NetPacket::ICMP' );` [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: Invalid ICMP type 69
by vancetech (Beadle) on Nov 03, 2006 at 19:13 UTC

sub icmp_recv {
    my $icmp = shift;

    #    Listen for ICMP response
    my $icmpbuffer;
    if( my $icmpr = $icmp->recv( $icmpbuffer, 1024, 0 ) ) {
        my $obj = NetPacket::ICMP->decode( $icmpbuffer );
        print Dumper( $obj );
    }
    return $icmpbuffer;
}
[download]

$VAR1 = bless( {
                 '_parent' => undef,
                 'data' => 'r@
їЯEr@
Мда',
                 'cksum' => 9216,
                 'type' => 69,
                 '_frame' => 'E$r@
їЯEr@
Мда',
                 'code' => 0
               }, 'NetPacket::ICMP' );
[download]

[reply]
[d/l]
[select]