line |
true |
false |
branch |
12
|
13 |
5 |
unless exists $args{'parts'} |
23
|
1 |
33 |
unless my($addr, $type, $bytes_str) = $line =~ /
: # intel hex start
[[:xdigit:]]{2} # bytecount
([[:xdigit:]]{4}) # addr
([[:xdigit:]]{2}) # type
([[:xdigit:]] * ) # databytes
[[:xdigit:]]{2} # checksum
/xi |
35
|
24 |
9 |
if ($type == 0) { } |
|
3 |
6 |
elsif ($type == 4) { } |
|
3 |
3 |
elsif ($type == 2) { } |
72
|
1 |
21 |
unless substr($line, 0, 1) =~ /s/i |
78
|
1 |
19 |
unless my($addr, $bytes_str) = $line =~ /
s #srec hex start
[[:xdigit:]]{1} #type
[[:xdigit:]]{2} #bytecount
([[:xdigit:]]{$addr_length}) #addr
([[:xdigit:]] * ) #databytes
[[:xdigit:]]{2} #checksum
/xi |
88
|
6 |
1 |
if ($type == 1 or $type == 2 or $type == 3) |
111
|
4 |
76 |
if ($create_part == 0 and $to == $start_addr) { } |
|
20 |
56 |
elsif ($create_part == 0 and $from == $end_addr + 1) { } |
|
4 |
52 |
elsif ($from < $start_addr) { } |
119
|
17 |
3 |
if $part_i + 1 == @{$self->{'parts'};} |
123
|
1 |
2 |
if ($to == $next_part->{'start'}) |
155
|
2 |
6 |
if $gap > 0 |
157
|
5 |
3 |
if ($overlap eq 'a') { } |
|
1 |
2 |
elsif ($overlap eq 'l') { } |
|
1 |
1 |
elsif ($overlap eq 'r') { } |
186
|
22 |
11 |
if ($overlap eq 'a') { } |
|
2 |
9 |
elsif ($overlap eq 'l') { } |
|
7 |
2 |
elsif ($overlap eq 'r') { } |
229
|
25 |
106 |
if ($from < $end_addr and $to > $start_addr) |
230
|
14 |
11 |
if ($from <= $start_addr) { } |
|
3 |
8 |
elsif ($to < $end_addr - 1) { } |
231
|
2 |
12 |
if ($to < $end_addr - 1) |
248
|
9 |
16 |
if $start_addr > $to |
252
|
15 |
1 |
if ($to >= $end_addr) { } |
282
|
3 |
9 |
if ($cur_high_addr_hex ne $addr_high_hex) |
287
|
5 |
7 |
if (($slice_i + 1) * $bytes_hex_a_line <= $#{$$part{'bytes'};}) { } |
325
|
1 |
14 |
if length $checksum_hex != 2 |
352
|
5 |
7 |
if (($slice_i + 1) * $bytes_hex_a_line <= $#{$$part{'bytes'};}) { } |
377
|
5 |
7 |
if (length $total_addr_hex == 4) { } |
|
4 |
3 |
elsif (length $total_addr_hex <= 6) { } |
382
|
3 |
1 |
if length $total_addr_hex == 5 |
387
|
1 |
2 |
if length $total_addr_hex == 7 |