Branch Coverage

blib/lib/VOMS/Lite/AC.pm
Criterion Covered Total %
branch 47 220 21.3


line true false branch
23 0 0 unless defined $dataref
27 0 0 if @ASN1Index == 0
39 0 0 if ($HEADSTART < $ignoreuntil) { }
57 0 0 if ($HEADSTART < $ignoreuntil) { }
0 0 elsif ($HEADSTART >= $ignoreafter) { }
60 0 0 if ($index == 0) { }
0 0 elsif ($index == 1) { }
0 0 elsif ($index == 2) { }
0 0 elsif ($index == 3) { }
0 0 elsif ($index == 4) { }
0 0 elsif ($index == 5) { }
0 0 elsif ($index == 6) { }
0 0 elsif ($index == 7) { }
0 0 elsif ($index == 8 and $HEADSTART < $SIGSTART) { }
0 0 elsif ($index == 8) { }
0 0 elsif ($index == 9) { }
0 0 elsif ($index == 10) { }
79 0 0 if (defined $Values{'TBSAC'})
80 0 0 if (defined $Values{'ACversion'})
81 0 0 if (defined $Values{'ACholder'})
82 0 0 if (defined $Values{'ACissuer'})
83 0 0 if (defined $Values{'ACalgorithmId'})
84 0 0 if (defined $Values{'ACSerial'})
85 0 0 if (defined $Values{'ACvalidity'})
86 0 0 if (defined $Values{'ACattribute'})
87 0 0 if (defined $Values{'ACExtensions'})
88 0 0 if (defined $Values{'ACSignatureType'})
89 0 0 if (defined $Values{'ACSignature'})
91 0 0 if ($ACExtensions ne '')
98 0 0 $OSref =~ /\x01\x01[^\0]/ ? :
99 0 0 if $Critical
102 0 0 if ($OIDstr eq '2.5.29.56' and defined $Values{'noRevAvail'})
105 0 0 if ($OIDstr eq '2.5.29.35' and defined $Values{'authorityKeyIdentifier'})
115 0 0 if ($Tag == 0) { }
0 0 elsif ($Tag == 1) { }
0 0 elsif ($Tag == 2) { }
120 0 0 if ($OIDstr eq '1.3.6.1.4.1.8005.100.100.11' and defined $Values{'vOMSTags'})
123 0 0 if ($OIDstr eq '1.3.6.1.4.1.8005.100.100.10' and defined $Values{'vOMSACCertList'} || defined $Values{'Verify'})
137 0 0 if (defined $Values{'Version'})
142 0 0 if (defined $Values{'HolderIssuerDN'} or defined $Values{'HolderSerial'})
162 0 0 if (defined $Values{'IssuerDN'} or defined $Values{'Verify'})
178 0 0 if (defined $Values{'PA'} or defined $Values{'FQANs'})
196 0 0 if (defined $Values{'Start'} or defined $Values{'End'})
200 0 0 if ($st[4] eq '23' and $st[5] =~ /^(..)(..)(..)(..)(..)(..)Z$/) { }
0 0 elsif ($st[4] eq '24' and $st[5] =~ /^(....)(..)(..)(..)(..)(..)Z$/) { }
202 0 0 if ($et[4] eq '23' and $et[5] =~ /^(..)(..)(..)(..)(..)(..)Z$/) { }
0 0 elsif ($et[4] eq '24' and $et[5] =~ /^(....)(..)(..)(..)(..)(..)Z$/) { }
207 0 0 if (defined $Values{'SignatureValue'} or defined $Values{'SignatureType'} or defined $Values{'Verify'})
210 0 0 if ($HexACSignature eq '300d06092a864886f70d0101040500') { }
0 0 elsif ($HexACSignature eq '300d06092a864886f70d0101050500') { }
0 0 elsif ($HexACSignature eq '300d06092a864886f70d0101030500') { }
0 0 elsif ($HexACSignature eq '300d06092a864886f70d0101020500') { }
218 0 0 if (defined $Values{'Verify'})
220 0 0 unless (defined $Values{'VOMSDIR'})
221 0 0 if (-d $Values{'VOMSDIR'})
223 0 0 if /^[^.]/
232 0 0 if ($II == -1) { }
233 0 0 unless defined $LocalValues{'vOMSACCertList'}
246 0 0 if @{shift @{$Chain{'Errors'};};}
247 0 0 unless ${$Chain{'TrustedCA'};}[-1]
248 0 0 if $Chain{'EndEntityDN'} ne $LocalValues{'IssuerDN'}
250 0 0 if (VOMS::Lite::CertKeyHelper::verifySignature($LocalValues{'SignatureType'}, $LocalValues{'EncSignatureValue'}, $TBSAC, Hex(${$X509REF;}{'KeypublicExponent'}), Hex(${$X509REF;}{'Keymodulus'})))
279 0 1 unless (defined $context{'Cert'})
280 0 1 unless (defined $context{'VOMSCert'})
281 0 1 unless (defined $context{'VOMSKey'})
282 0 1 unless (defined $context{'Lifetime'})
283 0 1 unless (defined $context{'Server'})
284 0 1 unless (defined $context{'Port'})
285 0 1 unless (defined $context{'Serial'})
286 0 1 unless (defined $context{'Code'})
287 0 1 unless (defined $context{'Attribs'})
290 0 1 if (@error > 0)
293 1 0 $context{'Cert'} =~ /^(\060.*)$/s ? :
294 1 0 $context{'VOMSCert'} =~ /^(\060.+)$/s ? :
295 1 0 $context{'VOMSKey'} =~ /^(\060.+)$/s ? :
296 1 0 if (defined $CertInfoRef) { }
297 1 0 if (defined $VCertInfoRef) { }
298 1 0 if (defined $VKeyInfoRef) { }
299 0 1 if (@error > 0)
301 1 0 $context{'Lifetime'} =~ /^([0-9]+)$/ ? :
302 1 0 $context{'Server'} =~ /^([a-z0-9_.-]+)$/ ? :
303 1 0 $context{'Port'} =~ /^([0-9]{1,5})$/ && $context{'Port'} < 65536 ? :
304 1 0 $context{'Serial'} =~ /^([0-9a-f]+)$/ ? :
305 1 0 $context{'Code'} =~ /^([0-9]+)$/ ? :
313 1 0 if (m[(/Capability=[\w.-]+)$])
314 1 0 if (m[(/Role=[\w.-]+)$cap$])
315 1 0 if (m[^((?:/[\w.-]+)+$rl$cap)$])
320 0 1 if (defined $context{'Targets'} and $context{'Targets'} =~ /^ARRAY/)
322 0 0 if (m[^([a-zA-Z0-9()'*~!._;/?:\@&=+\$,#-]|%[a-fA-F0-9]{2})+$]) { }
329 0 1 unless (defined $Lifetime)
330 0 1 unless (defined $Server)
331 0 1 unless (defined $Port)
332 0 1 unless (defined $Serial)
333 0 1 unless (defined $Code)
334 0 1 unless (defined $CERTINFO{'X509issuer'})
335 0 1 unless (defined $CERTINFO{'X509serial'})
336 0 1 unless (defined $CERTINFO{'X509subject'})
337 0 1 unless (defined $VCERTINFO{'X509issuer'})
338 0 1 unless (defined $VCERTINFO{'subjectKeyIdentifier'})
339 0 1 unless (defined $VCERTINFO{'X509subject'})
340 0 1 unless (defined $VKEYINFO{'Keymodulus'})
341 0 1 unless (defined $VKEYINFO{'KeyprivateExponent'})
342 0 1 if ($#Attribs < 0)
345 0 1 if (@error > 0)
351 1 0 $Attribs[0] =~ m[^/?([^/]+)] ? :
352 0 1 unless (defined $Group)
353 0 1 if (@error > 0)
372 1 0 defined $Broken && $Broken ? :
386 0 1 if (length $SN > 80)
415 0 1 if ($ACTargets ne '')