summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorRichard Levitte <levitte@openssl.org>2021-04-06 15:30:38 +0200
committerRichard Levitte <levitte@openssl.org>2021-04-07 22:09:58 +0200
commit41385f2708d08155d56ce08dce494152e225069e (patch)
tree8ef96dc14f1a9ccd95def9708dd45edff5313383 /test
parent014498fff9ee2e71dfdd82978b8896b05c9c8cb0 (diff)
downloadopenssl-new-41385f2708d08155d56ce08dce494152e225069e.tar.gz
test/recipes/02-test_errstr.t: Do not test negative system error codes
It's been deemed unlikely that these will end up in OpenSSL error records, so we simply don't test them if they happen to be among the error codes that perl has support for. Fixes #14763 Reviewed-by: Tomas Mraz <tomas@openssl.org> Reviewed-by: Paul Dale <pauli@openssl.org> (Merged from https://github.com/openssl/openssl/pull/14779)
Diffstat (limited to 'test')
-rw-r--r--test/recipes/02-test_errstr.t4
1 files changed, 4 insertions, 0 deletions
diff --git a/test/recipes/02-test_errstr.t b/test/recipes/02-test_errstr.t
index 6bc07f6d65..3bbf530c28 100644
--- a/test/recipes/02-test_errstr.t
+++ b/test/recipes/02-test_errstr.t
@@ -69,6 +69,10 @@ foreach my $errname (@Errno::EXPORT_OK) {
# is to skip this errcode.
skip "perl error strings and ssystem error strings for errcode 0 differ", 1
if $errcode == 0;
+ # On some systems (for example Hurd), there are negative error codes.
+ # These are currently unsupported in OpenSSL error reports.
+ skip "negative error codes are not supported in OpenSSL", 1
+ if $errcode < 0;
&ok(match_syserr_reason($errcode));
}