| line |
true |
false |
branch |
|
3
|
0 |
1 |
if $] < 5.006 |
|
174
|
1 |
6 |
if _checkHashKeys(%moduleInput) |
|
177
|
1 |
5 |
unless $moduleInput{-'ip'} |
|
179
|
1 |
4 |
unless $moduleInput{-'port'} |
|
181
|
0 |
4 |
if _verifyPort($moduleInput{-'port'}) |
|
186
|
0 |
0 |
unless defined $array_IP[0] and defined $array_IP[1] and defined $array_IP[2] and defined $array_IP[3] |
|
197
|
0 |
0 |
unless $server_socket = 'IO::Socket::INET'->new('LocalAddr', $moduleInput{-'ip'} || '127.0.0.1', 'LocalPort', $moduleInput{-'port'}, 'Proto', 'udp', 'Type', 2, 'Broadcast', 1) |
|
201
|
0 |
0 |
if $@ and $@ =~ /Error Creating Socket/ |
|
226
|
0 |
0 |
if ($peer_address) |
|
227
|
0 |
0 |
if ($peer_port) |
|
234
|
0 |
0 |
unless $server_socket->recv($rcv_sntp_packet, 512) |
|
237
|
0 |
0 |
if $@ and $@ =~ /Error Receiving/ |
|
248
|
0 |
0 |
if (not defined $ntpdate_tmp[0] or index($ntpdate_tmp[0], 'ntpdc') != -1) { } |
|
277
|
0 |
0 |
unless $server_socket->send($send_sntp_packet) |
|
280
|
0 |
0 |
if $@ and $@ =~ /Error Sending/ |
|
342
|
1 |
6 |
if (@differendKeys) { } |
|
354
|
0 |
4 |
unless defined $port |
|
355
|
4 |
0 |
unless (_verifyNumericInput($port)) |
|
356
|
4 |
0 |
if ($port >= 1 and 65535 >= $port) |
|
365
|
0 |
4 |
unless defined $numericInput |
|
366
|
4 |
0 |
if (defined $numericInput and $numericInput =~ /^[0-9]+$/ and $numericInput > 0) |