Branch Coverage

blib/lib/Cisco/SNMP/Config.pm
Criterion Covered Total %
branch 0 102 0.0


line true false branch
53 0 0 if (@_ == 1) { }
59 0 0 if (/^-?(?:tftp)?server$/i or /^-?tftp$/) { }
0 0 elsif (/^-?catos$/i) { }
0 0 elsif (/^-?user(?:name)?$/i) { }
0 0 elsif (/^-?pass(?:word)?$/i) { }
0 0 elsif (/^-?timeout$/i) { }
0 0 elsif (/^-?proto(?:col)?$/i) { }
0 0 elsif (/^-?family$/i) { }
0 0 elsif (/^-?source$/i) { }
0 0 elsif (/^-?dest(?:ination)?$/i) { }
62 0 0 if ($args{$_} == 1)
72 0 0 if (exists $PROTO{lc $args{$_}}) { }
79 0 0 if ($args{$_} =~ /^(?:(?:(:?ip)?v?(?:4|6))|${\2;}|$AF_INET6)$/) { }
80 0 0 if ($args{$_} =~ /^(?:(?:(:?ip)?v?4)|${\2;})$/) { }
90 0 0 if ($args{$_} =~ /^run(?:ning)?(?:-config)?$/i) { }
0 0 elsif ($args{$_} =~ /^start(?:up)?(?:-config)?$/i) { }
100 0 0 if ($args{$_} =~ /^run(?:ning)?(?:-config)?$/i) { }
0 0 elsif ($args{$_} =~ /^start(?:up)?(?:-config)?$/i) { }
115 0 0 if ($params{'source'} == $params{'dest'})
121 0 0 if ($params{'op'} ne 'wr' and not defined $params{'server'})
126 0 0 unless (defined $params{'family'})
130 0 0 if ($params{'catos'} and $params{'protocol'} != 'tftp')
136 0 0 if (defined $params{'server'})
137 0 0 if (defined(my $ret = Cisco::SNMP::_resolv($params{'server'}, $params{'family'}))) { }
143 0 0 if ($params{'catos'} and $params{'family'} == $AF_INET6)
164 0 0 if ($params{'op'} eq 'wr') { }
165 0 0 if ($params{'catos'})
172 0 0 unless (defined $response)
175 0 0 if (defined $response) { }
191 0 0 if ($response == 0) { }
0 0 elsif ($response == -1) { }
204 0 0 unless (defined $response)
213 0 0 unless (defined $response)
217 0 0 if ($loop++ == $params{'timeout'})
225 0 0 if ($$response{'1.3.6.1.4.1.9.9.96.1.1.1.1.10.' . $instance} == 3) { }
0 0 elsif ($$response{'1.3.6.1.4.1.9.9.96.1.1.1.1.10.' . $instance} == 4) { }
295 0 0 if ($params->{'catos'}) { }
299 0 0 if ($params->{'op'} eq 'put') { }
310 0 0 if ($loop++ == $params->{'timeout'})
317 0 0 if ($response->{'1.3.6.1.4.1.9.5.1.5.5.0'} == 2) { }
333 0 0 unless (defined $response)
335 0 0 if ($params->{'protocol'} ne 'tftp')
339 0 0 if ($params->{'family'} == $AF_INET6)
343 0 0 if ($params->{'op'} eq 'put') { }
348 0 0 if (defined $response) { }
356 0 0 if ($params->{'protocol'} ne 'tftp')
358 0 0 if ($params->{'protocol'} ne 'rcp')
365 0 0 if ($params->{'op'} eq 'put') { }
374 0 0 $params->{'family'} == 2 ? :
376 0 0 if (defined $response) { }
382 0 0 if ($params->{'family'} == $AF_INET6)