Blame test/ssl-tests/ssltests_base.pm

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