From 5660024bcd6b48152bd250bcbbe3c5ff4c257c51 Mon Sep 17 00:00:00 2001
From: Mariano Alvira <mar@devl.org>
Date: Wed, 29 Dec 2010 18:10:45 -0800
Subject: [PATCH] update rftest parser to new output format

---
 tools/rftestrx2pcap.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/tools/rftestrx2pcap.pl b/tools/rftestrx2pcap.pl
index 2bf58a657..b10c19d09 100755
--- a/tools/rftestrx2pcap.pl
+++ b/tools/rftestrx2pcap.pl
@@ -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";