31 lines
812 B
Perl
31 lines
812 B
Perl
# -*- mode: perl; -*-
|
|
# Copyright 2016 The OpenSSL Project Authors. All Rights Reserved.
|
|
#
|
|
# Licensed under the OpenSSL license (the "License"). You may not use
|
|
# this file except in compliance with the License. You can obtain a copy
|
|
# in the file LICENSE in the source distribution or at
|
|
# https://www.openssl.org/source/license.html
|
|
|
|
## SSL test configurations
|
|
|
|
package ssltests;
|
|
|
|
sub test_pem
|
|
{
|
|
my ($file) = @_;
|
|
my $dir_sep = $^O ne "VMS" ? "/" : "";
|
|
return "\${ENV::TEST_CERTS_DIR}" . $dir_sep . $file,
|
|
}
|
|
|
|
our %base_server = (
|
|
"Certificate" => test_pem("servercert.pem"),
|
|
"PrivateKey" => test_pem("serverkey.pem"),
|
|
"CipherString" => "DEFAULT",
|
|
);
|
|
|
|
our %base_client = (
|
|
"VerifyCAFile" => test_pem("rootcert.pem"),
|
|
"VerifyMode" => "Peer",
|
|
"CipherString" => "DEFAULT",
|
|
);
|