| line |
true |
false |
branch |
|
52
|
0 |
4 |
if (defined $data) { } |
|
53
|
0 |
0 |
unless ($self->parse($data)) |
|
66
|
4 |
0 |
if (defined $hostname) |
|
67
|
4 |
0 |
if (my $h = gethost $hostname) |
|
81
|
1 |
0 |
if (@_ == 1) { } |
|
|
0 |
0 |
elsif (@_ == 0) { } |
|
83
|
0 |
1 |
if (ref $source eq 'Net::SAP::Packet') { } |
|
|
1 |
0 |
elsif ($source =~ /^v=0/) { } |
|
|
0 |
0 |
elsif ($source =~ /^\w+:/) { } |
|
|
0 |
0 |
elsif ($source eq '-') { } |
|
|
0 |
0 |
elsif ($source ne '') { } |
|
85
|
0 |
0 |
if ($source->payload_type ne 'application/sdp') |
|
125
|
0 |
0 |
unless open SDP, $filename |
|
138
|
0 |
0 |
if $@ |
|
140
|
0 |
0 |
unless my $data = LWP::Simple::get($url) |
|
162
|
0 |
1 |
unless defined $data |
|
181
|
0 |
12 |
if ($field eq '') |
|
187
|
0 |
12 |
if $value eq '' |
|
191
|
10 |
2 |
if ($section eq 'session') |
|
193
|
1 |
9 |
if ($field eq 'v') { } |
|
|
1 |
8 |
elsif ($field eq 'm') { } |
|
|
1 |
7 |
elsif ($field eq 't') { } |
|
|
0 |
7 |
elsif ($field eq 'r') { } |
|
|
1 |
6 |
elsif ($field eq 'o') { } |
|
|
2 |
4 |
elsif ($field eq 'p' or $field eq 'e') { } |
|
|
1 |
3 |
elsif ($field eq 'a' or $field eq 'b') { } |
|
195
|
0 |
1 |
unless $self->_parse_v($value) |
|
211
|
0 |
0 |
unless ($$self{'time'}[-1]) |
|
241
|
3 |
9 |
if ($section eq 'media') |
|
243
|
1 |
2 |
if ($field eq 'm') { } |
|
|
0 |
2 |
elsif ($field =~ /a|b/) { } |
|
|
1 |
1 |
elsif ($field =~ /c/) { } |
|
247
|
0 |
1 |
if (defined $$self{'session'}{'c'}) |
|
286
|
0 |
1 |
unless (defined $$self{'v'}) |
|
290
|
0 |
1 |
unless (defined $$session{'o_sess_id'}) |
|
294
|
0 |
1 |
unless (defined $$session{'o_sess_vers'}) |
|
298
|
0 |
1 |
unless (defined $$session{'s'}) |
|
305
|
0 |
1 |
unless (exists $$self{'time'}[0]) |
|
335
|
0 |
1 |
if (scalar @{$$self{'time'};} == 0) |
|
370
|
8 |
4 |
if (exists $$hashref{$field} and defined $$hashref{$field}) { } |
|
372
|
2 |
6 |
if (ref $$hashref{$field} eq 'ARRAY') { } |
|
|
2 |
4 |
elsif (ref $$hashref{$field} eq 'HASH') { } |
|
379
|
2 |
0 |
if (ref $attrib eq 'ARRAY') { } |
|
391
|
0 |
4 |
unless ($optional) |
|
428
|
0 |
1 |
if ($$self{'v'} ne '0') |
|
449
|
0 |
1 |
unless (defined $$hashref{$field}) |
|
453
|
1 |
0 |
if (my($att_field, $att_value) = $value =~ /^([\w\-\_]+):(.*)$/) { } |
|
456
|
1 |
0 |
unless (defined $$fieldref{$att_field}) |
|
472
|
0 |
1 |
if defined $o |
|
485
|
1 |
1 |
if defined $uname |
|
492
|
1 |
1 |
if defined $id |
|
499
|
1 |
1 |
if defined $vers |
|
506
|
1 |
1 |
if defined $net_type |
|
513
|
1 |
1 |
if defined $addr_type |
|
520
|
1 |
1 |
if defined $addr |
|
543
|
1 |
1 |
if defined $s |
|
550
|
1 |
1 |
if defined $i |
|
557
|
1 |
1 |
if defined $u |
|
567
|
1 |
1 |
if (defined $e) |
|
568
|
1 |
0 |
if (ref $e eq 'ARRAY') { } |
|
576
|
2 |
0 |
if (exists $$session{'e'}[0]) |
|
586
|
0 |
0 |
if (defined $$session{'e'}) |
|
598
|
1 |
1 |
if (defined $p) |
|
599
|
1 |
0 |
if (ref $p eq 'ARRAY') { } |
|
607
|
2 |
0 |
if (exists $$session{'p'}[0]) |
|
617
|
0 |
0 |
if (defined $$session{'p'}) |
|
627
|
0 |
0 |
if defined $method |
|
628
|
0 |
0 |
if defined $key |
|
637
|
0 |
2 |
unless defined $attr_name |
|
641
|
1 |
1 |
if (defined $attr_value) |
|
642
|
0 |
1 |
if (ref $attr_value eq 'ARRAY') { } |
|
650
|
0 |
2 |
unless (exists $$hashref{'a'}{$attr_name}) |
|
658
|
2 |
0 |
if (ref $attrib eq 'ARRAY') { } |
|
659
|
2 |
0 |
if (scalar @{$attrib;} == 1) { } |
|
685
|
0 |
0 |
unless defined $name |
|
688
|
0 |
0 |
if defined $value |
|
696
|
0 |
0 |
unless defined $name |
|
698
|
0 |
0 |
if (exists $$self{'session'}{'a'}{$name}) |
|
711
|
0 |
1 |
unless defined $type |
|
714
|
1 |
0 |
if $media->media_type eq $type |
|
742
|
0 |
0 |
unless defined $num and defined $$self{'media'}[$num] |
|
746
|
0 |
0 |
if $loop == $num |
|
761
|
1 |
0 |
unless defined $num |
|
762
|
0 |
1 |
unless defined $$self{'time'}[$num] |
|
789
|
0 |
0 |
unless defined $num |
|
790
|
0 |
0 |
unless defined $$self{'time'}[$num] |
|
794
|
0 |
0 |
if $loop == $num |
|
821
|
1 |
0 |
if defined $media_type |