mirror/openssl
2
0
Fork 0
mirror of https://github.com/openssl/openssl.git synced 2025-02-23 14:42:15 +08:00
Code Issues Packages Projects Releases Wiki Activity

test/recipes/02-test_errstr.t: Do not test negative system error codes

Browse Source 
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)
This commit is contained in:
Richard Levitte 2021-04-06 15:30:38 +02:00
parent 014498fff9
commit 41385f2708
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
test/recipes/02-test_errstr.t
View File

@ -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));
}