sergot / openssl

OpenSSL bindings for Perl 6
MIT License
14 stars 31 forks source link

Help Needed: SSL_set_verify_cb #57

Open ufobat opened 6 years ago

ufobat commented 6 years ago

I am trying to implement something that I am currently doing with Perl5 with AnyEvent::TLS and Net::SSLeay.

AnyEvent::TLS sets a verfiy_callback: https://metacpan.org/source/MLEHMANN/AnyEvent-7.14/lib/AnyEvent/TLS.pm#L807. This part of the PR is working. And then I want to get access to the X509 Certificate. E.g https://metacpan.org/source/MIKEM/Net-SSLeay-1.85/SSLeay.xs#L3993. This Part is not working and I have no clue why. This is done in the test here: https://github.com/sergot/openssl/pull/57/files#diff-c19cb85aa48fb2d5486b2e53770f1003R34

I'd appreciate some help :-)