Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Simple Construction of a RAW TCP/IP Packet.

by Anonymous Monk
on Dec 28, 2012 at 05:59 UTC ( [id://1010642] : note . print w/replies, xml ) Need Help??


in reply to Simple Construction of a RAW TCP/IP Packet.

Just to share, the code above working properly after updating TCP checksum generation parameter to:

my ($tcp_pseudo) = pack('a4a4CCnnnNNH2B8nvn', $src_host,$dst_host,0,$tcp_proto,$tcp_len, $src_port,$dst_port,$syn,$ack, $tcp_head_reserved,$tcp_all,$tcp_win,$null,$tcp_urg_ptr);

Replies are listed 'Best First'.
Re^2: Simple Construction of a RAW TCP/IP Packet.
by iThunder (Beadle) on Mar 13, 2015 at 03:54 UTC
    Hello, I am trying to use this code to send TCP/IP packet but looks like it is not compiling correctly...the protocol field in IP header is 255 (same as one mentioned in socket(RAW,.....). Has anyone run into this issue?