michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-03-20 08:40:24 +00:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

There could be multiple CA paths

Browse Source
This commit is contained in:
Jamie Cameron
2024-11-08 15:16:40 -08:00
parent 8dd0d03018
commit 444307c58a
1 changed files with 9 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
web-lib-funcs.pl
View File

@@ -9107,13 +9107,15 @@ if ($ssl) {
if ($certreqs && $certreqs->{'capath'}) {
# Require that remote cert be signed by a valid CA
$main::last_set_verify_err = undef;
if (-d $certreqs->{'capath'}) {
Net::SSLeay::CTX_load_verify_locations(
$rv->{'ssl_ctx'}, "", $certreqs->{'capath'});
}
else {
Net::SSLeay::CTX_load_verify_locations(
$rv->{'ssl_ctx'}, $certreqs->{'capath'}, "");
foreach my $capath (split(/\s+/, $certreqs->{'capath'})) {
if (-d $capath) {
Net::SSLeay::CTX_load_verify_locations(
$rv->{'ssl_ctx'}, "", $capath);
}
else {
Net::SSLeay::CTX_load_verify_locations(
$rv->{'ssl_ctx'}, $capath, "");
}
}
Net::SSLeay::CTX_set_verify(
$rv->{'ssl_ctx'}, &Net::SSLeay::VERIFY_PEER,