Branch Coverage

Verify.xs
Criterion Covered Total %
branch 53 98 54.0


line true false branch
133 0 8 PUSHMARK(SP);
134 0 8 EXTEND(SP, 2);
143 0 8 if (count != 1)
146 8 0 i = POPi; // Get the return code from Perl verify_callback()
148 8 0 FREETMPS;
178 7 0 if (!SvROK(sv) || SvTYPE(SvRV(sv)) != SVt_PVHV)
0 7 if (!SvROK(sv) || SvTYPE(SvRV(sv)) != SVt_PVHV)
188 0 12 if (!store)
225 8 0 if (callback == (SV *) NULL)
228 0 0 SvSetSV(callback, fn);
275 13 0 if (items > 1) {
276 13 0 if (ST(1) != NULL) {
279 13 0 if (strlen(SvPV_nolen(CAfile)) == 0) {
0 13 if (strlen(SvPV_nolen(CAfile)) == 0) {
284 7 6 if (items > 2)
289 4 9 if (hv_exists(options, "noCAfile", strlen("noCAfile"))) {
291 4 0 if (SvIOKp(*svp)) {
292 4 0 noCAfile = SvIV(*svp);
296 6 7 if (hv_exists(options, "CApath", strlen("CApath"))) {
301 0 13 if (hv_exists(options, "noCApath", strlen("noCApath"))) {
303 0 0 if (SvIOKp(*svp)) {
304 0 0 noCApath = SvIV(*svp);
308 3 10 if (hv_exists(options, "strict_certs", strlen("strict_certs"))) {
310 3 0 if (SvIOKp(*svp)) {
311 3 0 strict_certs = SvIV(*svp);
317 0 13 if (x509_store == NULL) {
322 2 11 if (!strict_certs)
325 0 13 if (CAfile != NULL || !noCAfile) {
0 0 if (CAfile != NULL || !noCAfile) {
327 0 13 if (cafile_lookup == NULL) {
331 13 0 if (CAfile != NULL) {
332 13 0 if (!X509_LOOKUP_load_file(cafile_lookup, SvPV_nolen(CAfile), X509_FILETYPE_PEM)) {
1 12 if (!X509_LOOKUP_load_file(cafile_lookup, SvPV_nolen(CAfile), X509_FILETYPE_PEM)) {
334 1 0 croak("Error loading file %s: %s\n", SvPV_nolen(CAfile),
342 6 6 if (CApath != NULL || !noCApath) {
6 0 if (CApath != NULL || !noCApath) {
344 0 12 if (cadir_lookup == NULL) {
348 6 6 if (CApath != NULL) {
349 6 0 if (!X509_LOOKUP_add_dir(cadir_lookup, SvPV_nolen(CApath), X509_FILETYPE_PEM)) {
0 6 if (!X509_LOOKUP_add_dir(cadir_lookup, SvPV_nolen(CApath), X509_FILETYPE_PEM)) {
351 0 0 croak("Error loading directory %s\n", SvPV_nolen(CApath));
365 0 12 if((hv_store(attributes, "STORE", 5, store, 0)) == NULL)
443 0 8 if (x509 == NULL)
447 0 8 if (csc == NULL)
450 0 8 if (!hv_exists(self, "STORE", strlen("STORE")))
455 8 0 if (!SvMAGICAL(*svp) || (mg = mg_findext(*svp, PERL_MAGIC_ext, &store_magic)) == NULL)
0 8 if (!SvMAGICAL(*svp) || (mg = mg_findext(*svp, PERL_MAGIC_ext, &store_magic)) == NULL)
462 0 8 if (!X509_STORE_CTX_init(csc, store, x509, NULL)) {
503 3 5 if (!RETVAL)