| line |
true |
false |
branch |
|
160
|
0 |
0 |
if (lc $key eq 'port') |
|
164
|
0 |
0 |
if (lc $key eq 'baudrate') |
|
168
|
0 |
0 |
if (lc $key eq 'warn_malformed_kiss') |
|
172
|
0 |
0 |
if (lc $key eq 'file') |
|
176
|
0 |
0 |
if (lc $key eq 'raw_log') |
|
182
|
0 |
0 |
if ($data{'FILE'}) { } |
|
185
|
0 |
0 |
if ($file->open("<$data{'FILE'}")) { } |
|
199
|
0 |
0 |
if ($m_raw_log->open(">>$raw_log_file")) { } |
|
209
|
0 |
0 |
unless ($m_port_name) |
|
214
|
0 |
0 |
unless ($baudrate) |
|
220
|
0 |
0 |
if ($Device::TNC::KISS::Config{'osname'} eq 'MSWin32') { } |
|
222
|
0 |
0 |
unless $m_port = 'Win32::SerialPort'->new($m_port_name) |
|
227
|
0 |
0 |
unless $m_port = 'Device::SerialPort'->new($m_port_name) |
|
235
|
0 |
0 |
if $Device::TNC::KISS::Config{'osname'} eq 'MSWin32' |
|
250
|
0 |
0 |
unless $m_port->close |
|
254
|
0 |
0 |
if $m_raw_log |
|
275
|
0 |
0 |
if ($$self{'FILE'}) { } |
|
282
|
0 |
0 |
if ord $saw == $FEND |
|
284
|
0 |
0 |
if $fend_count > 0 |
|
286
|
0 |
0 |
if ($fend_count == 2) |
|
288
|
0 |
0 |
if (scalar @frame > 2) { } |
|
309
|
0 |
0 |
if ($count > 0) |
|
311
|
0 |
0 |
if $$self{'RAW_LOG'} |
|
312
|
0 |
0 |
if ord $saw == $FEND |
|
314
|
0 |
0 |
if $fend_count > 0 |
|
316
|
0 |
0 |
if ($fend_count == 2) |
|
318
|
0 |
0 |
if (scalar @frame > 2) { } |
|
336
|
0 |
0 |
if (wantarray) { } |
|
447
|
0 |
0 |
if ($location == 0) { } |
|
|
0 |
0 |
elsif ($location == $#kiss) { } |
|
|
0 |
0 |
elsif ($location == 1) { } |
|
450
|
0 |
0 |
unless (ord $kiss[$location] == $FEND) |
|
452
|
0 |
0 |
if $$self{'WARN_MALFORMED_KISS'} |
|
458
|
0 |
0 |
unless (ord $kiss[$location] == $FEND) |
|
460
|
0 |
0 |
if $$self{'WARN_MALFORMED_KISS'} |
|
472
|
0 |
0 |
if (ord $kiss[$location] == $FESC) { } |
|
475
|
0 |
0 |
if (ord $kiss[$location + 1] == $TFESC) { } |
|
|
0 |
0 |
elsif (ord $kiss[$location + 1] == $TFEND) { } |
|
|
0 |
0 |
elsif (ord $kiss[$location + 1] != $TFESC) { } |
|
|
0 |
0 |
elsif (ord $kiss[$location + 1] != $TFEND) { } |
|
489
|
0 |
0 |
if $$self{'WARN_MALFORMED_KISS'} |
|
493
|
0 |
0 |
if $$self{'WARN_MALFORMED_KISS'} |
|
503
|
0 |
0 |
if (wantarray) { } |