| 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) |
|
227
|
8 |
0 |
if (callback == (SV *) NULL) |
|
230
|
0 |
0 |
SvSetSV(callback, fn); |
|
277
|
13 |
0 |
if (items > 1) { |
|
278
|
13 |
0 |
if (ST(1) != NULL) { |
|
281
|
13 |
0 |
if (strlen(SvPV_nolen(CAfile)) == 0) { |
|
|
0 |
13 |
if (strlen(SvPV_nolen(CAfile)) == 0) { |
|
286
|
7 |
6 |
if (items > 2) |
|
291
|
4 |
9 |
if (hv_exists(options, "noCAfile", strlen("noCAfile"))) { |
|
293
|
4 |
0 |
if (SvIOKp(*svp)) { |
|
294
|
4 |
0 |
noCAfile = SvIV(*svp); |
|
298
|
6 |
7 |
if (hv_exists(options, "CApath", strlen("CApath"))) { |
|
303
|
0 |
13 |
if (hv_exists(options, "noCApath", strlen("noCApath"))) { |
|
305
|
0 |
0 |
if (SvIOKp(*svp)) { |
|
306
|
0 |
0 |
noCApath = SvIV(*svp); |
|
310
|
3 |
10 |
if (hv_exists(options, "strict_certs", strlen("strict_certs"))) { |
|
312
|
3 |
0 |
if (SvIOKp(*svp)) { |
|
313
|
3 |
0 |
strict_certs = SvIV(*svp); |
|
319
|
0 |
13 |
if (x509_store == NULL) { |
|
324
|
2 |
11 |
if (!strict_certs) |
|
327
|
0 |
13 |
if (CAfile != NULL || !noCAfile) { |
|
|
0 |
0 |
if (CAfile != NULL || !noCAfile) { |
|
329
|
0 |
13 |
if (cafile_lookup == NULL) { |
|
333
|
13 |
0 |
if (CAfile != NULL) { |
|
334
|
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)) { |
|
336
|
1 |
0 |
croak("Error loading file %s: %s\n", SvPV_nolen(CAfile), |
|
344
|
6 |
6 |
if (CApath != NULL || !noCApath) { |
|
|
6 |
0 |
if (CApath != NULL || !noCApath) { |
|
346
|
0 |
12 |
if (cadir_lookup == NULL) { |
|
350
|
6 |
6 |
if (CApath != NULL) { |
|
351
|
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)) { |
|
353
|
0 |
0 |
croak("Error loading directory %s\n", SvPV_nolen(CApath)); |
|
367
|
0 |
12 |
if((hv_store(attributes, "STORE", 5, store, 0)) == NULL) |
|
445
|
0 |
8 |
if (x509 == NULL) |
|
449
|
0 |
8 |
if (csc == NULL) |
|
452
|
0 |
8 |
if (!hv_exists(self, "STORE", strlen("STORE"))) |
|
457
|
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) |
|
464
|
0 |
8 |
if (!X509_STORE_CTX_init(csc, store, x509, NULL)) { |
|
505
|
3 |
5 |
if (!RETVAL) |