Apple-2-SW/contiki
1
0
Fork 0
mirror of https://github.com/oliverschmidt/contiki.git synced 2024-07-10 14:28:56 +00:00
Code Issues Projects Releases Wiki Activity

fix parsing and pcap generation for packets with multiple output lines

Browse Source 
(those that are > 16 bytes).
This commit is contained in:
maralvira 2011-01-17 15:47:08 +00:00
parent d0227afbed
commit d82b004154
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
cpu/mc1322x/tools/rftestrx2pcap.pl
View File

@ -59,13 +59,13 @@ while(1) {
#new packet
($sec, $usec) = gettimeofday;
print STDERR "rftestline: $sec $usec $str";
} elsif($str =~ /^\s*data/) {
} elsif($str =~ /^\w+/) {
#packet payload
print STDERR "dataline: ";
print STDERR $str;
$str =~ /data: 0x\d+ (.+)/;
chomp $str;
$str =~ /(.+)/;
my @data = split(' ',$1);
($len, @data) = @data;
#write out pcap entry
print pack('LLLL',($sec,$usec,scalar(@data),scalar(@data)+2));
print STDERR "new packet: $sec $usec " . scalar(@data) . " " . (scalar(@data)+2) . "\n\r";