Branch Coverage

blib/lib/Cisco/SNMP/Config.pm
Criterion Covered Total %
branch 0 104 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)$/) { }
81 0 0 if ($args{$_} =~ /^(?:(?:(:?ip)?v?4)|${\2;})$/) { }
91 0 0 if ($args{$_} =~ /^run(?:ning)?(?:-config)?$/i) { }
0 0 elsif ($args{$_} =~ /^start(?:up)?(?:-config)?$/i) { }
101 0 0 if ($args{$_} =~ /^run(?:ning)?(?:-config)?$/i) { }
0 0 elsif ($args{$_} =~ /^start(?:up)?(?:-config)?$/i) { }
116 0 0 if ($params{'source'} == $params{'dest'})
122 0 0 if ($params{'op'} ne 'wr' and not defined $params{'server'})
127 0 0 unless (defined $params{'family'})
131 0 0 if ($params{'catos'} and $params{'protocol'} ne 'tftp')
137 0 0 if (defined $params{'server'})
138 0 0 if (defined(my $ret = Cisco::SNMP::_resolv($params{'server'}, $params{'family'}))) { }
148 0 0 if ($params{'catos'} and $params{'family'} == $AF_INET6)
169 0 0 if ($params{'op'} eq 'wr') { }
170 0 0 if ($params{'catos'})
182 0 0 unless (defined $response)
187 0 0 if (defined $response) { }
211 0 0 if ($response == 0) { }
0 0 elsif ($response == -1) { }
228 0 0 unless (defined $response)
239 0 0 unless (defined $response)
244 0 0 if ($loop++ == $params{'timeout'})
253 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) { }
335 0 0 if ($params->{'catos'}) { }
344 0 0 if ($params->{'op'} eq 'put') { }
355 0 0 if (defined($response = $session->get_request('1.3.6.1.4.1.9.5.1.5.5.0'))) { }
362 0 0 if ($loop++ == $params->{'timeout'})
375 0 0 if ($response->{'1.3.6.1.4.1.9.5.1.5.5.0'} == 2) { }
402 0 0 unless (defined $response)
405 0 0 if ($params->{'protocol'} ne 'tftp')
410 0 0 if ($params->{'family'} == $AF_INET6)
415 0 0 if ($params->{'op'} eq 'put') { }
426 0 0 if (defined $response) { }
435 0 0 if ($params->{'protocol'} ne 'tftp')
440 0 0 if ($params->{'protocol'} ne 'rcp')
450 0 0 if ($params->{'op'} eq 'put') { }
475 0 0 $params->{'family'} == 2 ? :
477 0 0 if (defined $response) { }
488 0 0 if ($params->{'family'} == $AF_INET6)