Perl RawIP CWR标志

Question

我使用Net :: RawIP发送带有特定TCP标志的数据包。有没有办法设置CWR标志？ TCP protokey＆＃34; res2＆＃34;设置ECE标志，但是＆＃34; res1＆＃34;似乎设置了NS标志：

$n = Net::RawIP->new({
ip  => {
        saddr => 'my.target.lan',
        daddr => 'my.target.lan',
       },
tcp => {
        source => 123,
        dest   => 123,
        res1   => 1,
        res2   => 1,
        fin    => 1,
        syn    => 1
       }
});

这是Wireshark捕获数据包的标志：

Answer 1

res2是两位宽。

res2 => 1   # ECE
res2 => 2   # CWR
res2 => 3   # ECE & CWR

（在big-endian机器上可能相反，但我对此表示怀疑。）

（res1是Wireshark捕获中标记为“Reserved”和“Nonce”的4位。）