Improve racal2pcap for other tests like 6113 call signalling tests

The text logs have stuff like UNIT DATA INDICATION which we didn't
parse so far
This commit is contained in:
Harald Welte 2011-03-28 21:12:06 +02:00
parent b8d8e6c835
commit 93c031cd06
1 changed files with 8 additions and 6 deletions

View File

@ -80,16 +80,18 @@ while (my $line = <STDIN>) {
}
}
if ($state == 0) {
if ($line =~ /^MDL_ASSIGN_REQUEST ces = (\d+),tei = (\d+)/) {
if ($line =~ /MDL_ASSIGN_REQUEST ces = (\d+),tei = (\d+)/) {
$ces_to_tei{$1} = $2;
} elsif ($line =~ /^\**DL ESTABLISH REQUEST sapi = (\d+), ces = (\d+)/) {
$ces_to_tei{$2} = $1;
}
if ($line =~ /^DL DATA INDICATION sapi = (\d+), ces = (\d+)/) {
$tei = $ces_to_tei{$2};
$sapi = $1;
if ($line =~ /DL (UNIT )?DATA INDICATION sapi = (\d+), ces = (\d+)/) {
$tei = $ces_to_tei{$3};
$sapi = $2;
$state = 1;
$msg_hex = "";
} elsif ($line =~ /^DL_DATA_REQUEST sapi = (\d+)/) {
$sapi = $1;
} elsif ($line =~ /DL_(UNIT)?DATA_REQUEST sapi = (\d+)/) {
$sapi = $2;
$state = 2;
$msg_hex = "";
}