提交 60f9f1e1 编写于 作者: R Richard Levitte

VMS perl doesn't implement fork(), so don't run the TLSProxy tests there

Reviewed-by: NViktor Dukhovni <viktor@openssl.org>
上级 bdb1d0c2
...@@ -59,6 +59,9 @@ use TLSProxy::Proxy; ...@@ -59,6 +59,9 @@ use TLSProxy::Proxy;
my $test_name = "test_sslcertstatus"; my $test_name = "test_sslcertstatus";
setup($test_name); setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^VMS$/;
plan skip_all => "$test_name can only be performed with OpenSSL configured shared" plan skip_all => "$test_name can only be performed with OpenSSL configured shared"
unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ } unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ }
grep { /^SHARED_LIBS=/ } grep { /^SHARED_LIBS=/ }
......
...@@ -59,6 +59,9 @@ use TLSProxy::Proxy; ...@@ -59,6 +59,9 @@ use TLSProxy::Proxy;
my $test_name = "test_sslextension"; my $test_name = "test_sslextension";
setup($test_name); setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^VMS$/;
plan skip_all => "$test_name can only be performed with OpenSSL configured shared" plan skip_all => "$test_name can only be performed with OpenSSL configured shared"
unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ } unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ }
grep { /^SHARED_LIBS=/ } grep { /^SHARED_LIBS=/ }
......
...@@ -60,6 +60,9 @@ use File::Temp qw(tempfile); ...@@ -60,6 +60,9 @@ use File::Temp qw(tempfile);
my $test_name = "test_sslsessiontick"; my $test_name = "test_sslsessiontick";
setup($test_name); setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^VMS$/;
plan skip_all => "$test_name can only be performed with OpenSSL configured shared" plan skip_all => "$test_name can only be performed with OpenSSL configured shared"
unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ } unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ }
grep { /^SHARED_LIBS=/ } grep { /^SHARED_LIBS=/ }
......
...@@ -60,6 +60,9 @@ use TLSProxy::Proxy; ...@@ -60,6 +60,9 @@ use TLSProxy::Proxy;
my $test_name = "test_sslskewith0p"; my $test_name = "test_sslskewith0p";
setup($test_name); setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^VMS$/;
plan skip_all => "$test_name can only be performed with OpenSSL configured shared" plan skip_all => "$test_name can only be performed with OpenSSL configured shared"
unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ } unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ }
grep { /^SHARED_LIBS=/ } grep { /^SHARED_LIBS=/ }
......
...@@ -59,6 +59,9 @@ use TLSProxy::Proxy; ...@@ -59,6 +59,9 @@ use TLSProxy::Proxy;
my $test_name = "test_sslextension"; my $test_name = "test_sslextension";
setup($test_name); setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^VMS$/;
plan skip_all => "$test_name can only be performed with OpenSSL configured shared" plan skip_all => "$test_name can only be performed with OpenSSL configured shared"
unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ } unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ }
grep { /^SHARED_LIBS=/ } grep { /^SHARED_LIBS=/ }
......
...@@ -60,6 +60,9 @@ use File::Temp qw(tempfile); ...@@ -60,6 +60,9 @@ use File::Temp qw(tempfile);
my $test_name = "test_tlsextms"; my $test_name = "test_tlsextms";
setup($test_name); setup($test_name);
plan skip_all => "TLSProxy isn't usable on $^O"
if $^O =~ /^VMS$/;
plan skip_all => "$test_name can only be performed with OpenSSL configured shared" plan skip_all => "$test_name can only be performed with OpenSSL configured shared"
unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ } unless (map { s/\R//; s/^SHARED_LIBS=\s*//; $_ }
grep { /^SHARED_LIBS=/ } grep { /^SHARED_LIBS=/ }
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册