use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_certtypeext";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test::Utils;
use File::Temp qw(tempfile);
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_comp";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
use File::Temp qw(tempfile);
+use Cwd qw(abs_path);
use constant {
LOOK_ONLY => 0,
my $test_name = "test_key_share";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
# https://www.openssl.org/source/license.html
use strict;
-use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file/;
+use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
-
+use Cwd qw(abs_path);
use TLSProxy::Proxy;
my $test_name = "test_npn";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_renegotiation";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_sslcbcpadding";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_sslcertstatus";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_sslextension";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use File::Temp qw(tempfile);
use TLSProxy::Proxy;
use checkhandshake qw(checkhandshake @handmessages @extensions);
+use Cwd qw(abs_path);
my $test_name = "test_sslmessages";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
use TLSProxy::Message;
+use Cwd qw(abs_path);
my $test_name = "test_sslrecords";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
use File::Temp qw(tempfile);
+use Cwd qw(abs_path);
my $test_name = "test_sslsessiontick";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_sslsigalgs";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_sslsignature";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_sslskewith0p";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "dh is not supported by this OpenSSL build"
if disabled("dh");
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
use File::Temp qw(tempfile);
+use Cwd qw(abs_path);
use constant {
REVERSE_ORDER_VERSIONS => 1,
my $test_name = "test_sslversions";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_sslvertol";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_tls13alerts";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use File::Temp qw(tempfile);
use TLSProxy::Proxy;
use checkhandshake qw(checkhandshake @handmessages @extensions);
+use Cwd qw(abs_path);
my $test_name = "test_tls13certcomp";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_tls13cookie";
setup($test_name);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file bldtop_dir/;
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_tls13downgrade";
setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
if disabled("tls1_3") || disabled("tls1_2")
|| (disabled("ec") && disabled("dh"));
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
my $proxy = TLSProxy::Proxy->new(
undef,
cmdstr(app(["openssl"]), display => 1),
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
use TLSProxy::Message;
+use Cwd qw(abs_path);
my $test_name = "test_tls13hrr";
setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
plan skip_all => "$test_name needs TLS1.3 enabled"
if disabled("tls1_3") || (disabled("ec") && disabled("dh"));
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
my $proxy = TLSProxy::Proxy->new(
undef,
cmdstr(app(["openssl"]), display => 1),
use File::Temp qw(tempfile);
use TLSProxy::Proxy;
use checkhandshake qw(checkhandshake @handmessages @extensions);
+use Cwd qw(abs_path);
my $test_name = "test_tls13kexmodes";
setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
BOTH_KEX_MODES => 5
};
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
my $proxy = TLSProxy::Proxy->new(
undef,
cmdstr(app(["openssl"]), display => 1),
use File::Temp qw(tempfile);
use TLSProxy::Proxy;
use checkhandshake qw(checkhandshake @handmessages @extensions);
+use Cwd qw(abs_path);
my $test_name = "test_tls13messages";
setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
[0,0,0,0]
);
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
my $proxy = TLSProxy::Proxy->new(
undef,
cmdstr(app(["openssl"]), display => 1),
use OpenSSL::Test::Utils;
use File::Temp qw(tempfile);
use TLSProxy::Proxy;
+use Cwd qw(abs_path);
my $test_name = "test_tls13psk";
setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
plan skip_all => "$test_name needs TLSv1.3 enabled"
if disabled("tls1_3") || (disabled("ec") && disabled("dh"));
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
my $proxy = TLSProxy::Proxy->new(
undef,
cmdstr(app(["openssl"]), display => 1),
use OpenSSL::Test::Utils;
use TLSProxy::Proxy;
use File::Temp qw(tempfile);
+use Cwd qw(abs_path);
my $test_name = "test_tlsextms";
setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^(VMS)$/;
-plan skip_all => "$test_name needs the dynamic engine feature enabled"
- if disabled("engine") || disabled("dynamic-engine");
+plan skip_all => "$test_name needs the module feature enabled"
+ if disabled("module");
plan skip_all => "$test_name needs the sock feature enabled"
if disabled("sock");
my $sextms = 0;
my $fullhand = 0;
+$ENV{OPENSSL_MODULES} = abs_path(bldtop_dir("test"));
+
my $proxy = TLSProxy::Proxy->new(
\&extms_filter,
cmdstr(app(["openssl"]), display => 1),
}
my $execcmd = $self->execute
- ." s_server -no_comp -engine ossltest -state"
+ ." s_server -no_comp -provider=p_ossltest -provider=default -propquery ?provider=p_ossltest -state"
#In TLSv1.3 we issue two session tickets. The default session id
#callback gets confused because the ossltest engine causes the same
#session id to be created twice due to the changed random number
if ($self->execute) {
my $pid;
my $execcmd = $self->execute
- ." s_client -engine ossltest"
+ ." s_client -provider=p_ossltest -provider=default -propquery ?provider=p_ossltest"
." -connect $self->{proxy_addr}:$self->{proxy_port}";
if ($self->{isdtls}) {
$execcmd .= " -dtls -max_protocol DTLSv1.2"