Branch Coverage

blib/lib/Crypt/PKCS11/Session.pm
Criterion Covered Total %
branch 380 384 98.9


line true false branch
45 2 4 unless (blessed($$self{'pkcs11xs'} = shift()) and $$self{'pkcs11xs'}->isa('Crypt::PKCS11::XSPtr'))
49 1 3 unless (defined($$self{'session'} = shift()))
59 1 4 if (exists $_[0]{'session'} and defined $_[0]{'pkcs11xs'})
67 1 5 unless (exists $$self{'session'})
70 3 2 if (defined $pin)
72 1 2 unless (length $pin)
78 1 3 $$self{'rv'} == 0 ? :
84 1 8 unless (exists $$self{'session'})
87 6 2 if (defined $oldPin)
89 1 5 unless (length $oldPin)
93 3 4 if (defined $newPin)
95 1 2 unless (length $newPin)
101 1 5 $$self{'rv'} == 0 ? :
107 1 1 unless (exists $$self{'session'})
112 0 1 if ($$self{'rv'} == 0)
115 0 1 $$self{'rv'} == 0 ? :
122 1 4 unless (exists $$self{'session'})
128 1 3 unless (ref $info eq 'HASH')
132 1 1 wantarray ? :
2 1 $$self{'rv'} == 0 ? :
139 1 3 unless (exists $$self{'session'})
144 1 2 $$self{'rv'} == 0 ? :
150 1 10 unless (exists $$self{'session'})
153 1 9 unless (defined $operationState)
156 6 3 if (defined $encryptionKey)
157 2 4 unless (blessed $encryptionKey and $encryptionKey->isa('Crypt::PKCS11::Object'))
161 4 3 if (defined $authenticationKey)
162 2 2 unless (blessed $authenticationKey and $authenticationKey->isa('Crypt::PKCS11::Object'))
167 2 3 $encryptionKey ? :
2 3 $authenticationKey ? :
168 1 4 $$self{'rv'} == 0 ? :
174 1 2 unless (exists $$self{'session'})
177 1 1 unless (defined $userType)
182 0 1 $$self{'rv'} == 0 ? :
188 1 2 unless (exists $$self{'session'})
193 1 1 $$self{'rv'} == 0 ? :
200 1 8 unless (exists $$self{'session'})
203 6 2 unless (blessed $template and $template->isa('Crypt::PKCS11::Attributes'))
208 1 1 $$self{'rv'} == 0 ? :
215 1 8 unless (exists $$self{'session'})
218 3 5 unless (blessed $object and $object->isa('Crypt::PKCS11::Object'))
221 3 2 unless (blessed $template and $template->isa('Crypt::PKCS11::Attributes'))
226 1 1 $$self{'rv'} == 0 ? :
232 1 4 unless (exists $$self{'session'})
235 3 1 unless (blessed $object and $object->isa('Crypt::PKCS11::Object'))
240 0 1 $$self{'rv'} == 0 ? :
247 1 5 unless (exists $$self{'session'})
250 3 2 unless (blessed $object and $object->isa('Crypt::PKCS11::Object'))
255 1 1 $$self{'rv'} == 0 ? :
262 1 10 unless (exists $$self{'session'})
265 3 7 unless (blessed $object and $object->isa('Crypt::PKCS11::Object'))
268 3 4 unless (blessed $template and $template->isa('Crypt::PKCS11::Attributes'))
274 3 1 if ($$self{'rv'} == 0)
276 1 1 wantarray ? :
285 1 9 unless (exists $$self{'session'})
288 3 6 unless (blessed $object and $object->isa('Crypt::PKCS11::Object'))
291 3 3 unless (blessed $template and $template->isa('Crypt::PKCS11::Attributes'))
296 2 1 $$self{'rv'} == 0 ? :
302 1 6 unless (exists $$self{'session'})
305 3 3 unless (blessed $template and $template->isa('Crypt::PKCS11::Attributes'))
310 2 1 $$self{'rv'} == 0 ? :
318 1 6 unless (exists $$self{'session'})
321 1 5 unless (defined $maxObjectCount)
327 1 4 unless (ref $objects eq 'ARRAY')
335 2 1 wantarray ? :
3 1 $$self{'rv'} == 0 ? :
341 1 2 unless (exists $$self{'session'})
346 1 1 $$self{'rv'} == 0 ? :
352 1 8 unless (exists $$self{'session'})
355 3 5 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
358 3 2 unless (blessed $key and $key->isa('Crypt::PKCS11::Object'))
363 1 1 $$self{'rv'} == 0 ? :
370 1 3 unless (exists $$self{'session'})
373 1 2 unless (defined $data)
378 1 1 $$self{'rv'} == 0 ? :
385 1 3 unless (exists $$self{'session'})
388 1 2 unless (defined $part)
393 1 1 $$self{'rv'} == 0 ? :
400 1 2 unless (exists $$self{'session'})
405 1 1 $$self{'rv'} == 0 ? :
411 1 8 unless (exists $$self{'session'})
414 3 5 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
417 3 2 unless (blessed $key and $key->isa('Crypt::PKCS11::Object'))
422 1 1 $$self{'rv'} == 0 ? :
429 1 3 unless (exists $$self{'session'})
432 1 2 unless (defined $encryptedData)
437 1 1 $$self{'rv'} == 0 ? :
444 1 3 unless (exists $$self{'session'})
447 1 2 unless (defined $encryptedPart)
452 1 1 $$self{'rv'} == 0 ? :
459 1 2 unless (exists $$self{'session'})
464 1 1 $$self{'rv'} == 0 ? :
470 1 5 unless (exists $$self{'session'})
473 3 2 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
478 1 1 $$self{'rv'} == 0 ? :
485 1 3 unless (exists $$self{'session'})
488 1 2 unless (defined $data)
493 1 1 $$self{'rv'} == 0 ? :
499 1 3 unless (exists $$self{'session'})
502 1 2 unless (defined $part)
507 1 1 $$self{'rv'} == 0 ? :
513 1 5 unless (exists $$self{'session'})
516 3 2 unless (blessed $key and $key->isa('Crypt::PKCS11::Object'))
521 1 1 $$self{'rv'} == 0 ? :
528 1 2 unless (exists $$self{'session'})
533 1 1 $$self{'rv'} == 0 ? :
539 1 8 unless (exists $$self{'session'})
542 3 5 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
545 3 2 unless (blessed $key and $key->isa('Crypt::PKCS11::Object'))
550 1 1 $$self{'rv'} == 0 ? :
557 1 3 unless (exists $$self{'session'})
560 1 2 unless (defined $data)
565 1 1 $$self{'rv'} == 0 ? :
571 1 3 unless (exists $$self{'session'})
574 1 2 unless (defined $part)
579 1 1 $$self{'rv'} == 0 ? :
586 1 2 unless (exists $$self{'session'})
591 1 1 $$self{'rv'} == 0 ? :
597 1 8 unless (exists $$self{'session'})
600 3 5 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
603 3 2 unless (blessed $key and $key->isa('Crypt::PKCS11::Object'))
608 1 1 $$self{'rv'} == 0 ? :
615 1 3 unless (exists $$self{'session'})
618 1 2 unless (defined $data)
623 1 1 $$self{'rv'} == 0 ? :
629 1 8 unless (exists $$self{'session'})
632 3 5 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
635 3 2 unless (blessed $key and $key->isa('Crypt::PKCS11::Object'))
640 1 1 $$self{'rv'} == 0 ? :
646 1 4 unless (exists $$self{'session'})
649 1 3 unless (defined $data)
652 1 2 unless (defined $signature)
657 1 1 $$self{'rv'} == 0 ? :
663 1 3 unless (exists $$self{'session'})
666 1 2 unless (defined $part)
671 1 1 $$self{'rv'} == 0 ? :
677 1 3 unless (exists $$self{'session'})
680 1 2 unless (defined $signature)
685 1 1 $$self{'rv'} == 0 ? :
691 1 8 unless (exists $$self{'session'})
694 3 5 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
697 3 2 unless (blessed $key and $key->isa('Crypt::PKCS11::Object'))
702 1 1 $$self{'rv'} == 0 ? :
709 1 3 unless (exists $$self{'session'})
712 1 2 unless (defined $signature)
717 1 1 $$self{'rv'} == 0 ? :
724 1 3 unless (exists $$self{'session'})
727 1 2 unless (defined $part)
732 1 1 $$self{'rv'} == 0 ? :
739 1 3 unless (exists $$self{'session'})
742 1 2 unless (defined $encryptedPart)
747 1 1 $$self{'rv'} == 0 ? :
754 1 3 unless (exists $$self{'session'})
757 1 2 unless (defined $part)
762 1 1 $$self{'rv'} == 0 ? :
769 1 3 unless (exists $$self{'session'})
772 1 2 unless (defined $encryptedPart)
777 1 1 $$self{'rv'} == 0 ? :
784 1 8 unless (exists $$self{'session'})
787 3 5 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
790 3 2 unless (blessed $template and $template->isa('Crypt::PKCS11::Attributes'))
795 1 1 $$self{'rv'} == 0 ? :
803 1 12 unless (exists $$self{'session'})
806 3 9 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
809 3 6 unless (blessed $publicKeyTemplate and $publicKeyTemplate->isa('Crypt::PKCS11::Attributes'))
812 3 3 unless (blessed $privateKeyTemplate and $privateKeyTemplate->isa('Crypt::PKCS11::Attributes'))
818 2 1 if ($$self{'rv'} == 0)
823 1 1 wantarray ? :
832 1 11 unless (exists $$self{'session'})
835 3 8 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
838 3 5 unless (blessed $wrappingKey and $wrappingKey->isa('Crypt::PKCS11::Object'))
841 3 2 unless (blessed $key and $key->isa('Crypt::PKCS11::Object'))
846 1 1 $$self{'rv'} == 0 ? :
853 1 12 unless (exists $$self{'session'})
856 3 9 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
859 3 6 unless (blessed $unwrappingKey and $unwrappingKey->isa('Crypt::PKCS11::Object'))
862 1 5 unless (defined $wrappedKey)
865 3 2 unless (blessed $template and $template->isa('Crypt::PKCS11::Attributes'))
870 1 1 $$self{'rv'} == 0 ? :
877 1 11 unless (exists $$self{'session'})
880 3 8 unless (blessed $mechanism and $mechanism->isa('Crypt::PKCS11::CK_MECHANISMPtr'))
883 3 5 unless (blessed $baseKey and $baseKey->isa('Crypt::PKCS11::Object'))
886 3 2 unless (blessed $template and $template->isa('Crypt::PKCS11::Attributes'))
891 1 1 $$self{'rv'} == 0 ? :
898 1 3 unless (exists $$self{'session'})
901 1 2 unless (defined $seed)
906 1 1 $$self{'rv'} == 0 ? :
913 1 3 unless (exists $$self{'session'})
916 1 2 unless (defined $randomLen)
921 1 1 $$self{'rv'} == 0 ? :
927 1 1 unless (exists $$self{'session'})
938 1 1 unless (exists $$self{'session'})