mirrors/meta-openembedded
1
0
Fork 0
mirror of https://github.com/openembedded/meta-openembedded.git synced 2026-09-23 11:21:11 +00:00
Code Issues Projects Releases Wiki Activity

libnet-ssleay-perl: fix client hello ptest with OpenSSL 4

Browse Source 
OpenSSL 4.0 removed support for SSLv2 ClientHello, so the canned SSLv2
ClientHello test no longer gets the expected alert:

  not ok 38 - Client: Alert from canned SSLv2 ClientHello
  FAIL: t/local/48_client_hello_callback

Backport the upstream test update for it.

meta-perl-image-ptest-libnet-ssleay-perl on qemux86-64 now passes
37 tests with none failing.

AI-Generated: Uses Claude Code
Signed-off-by: Khem Raj <khem.raj@oss.qualcomm.com>
This commit is contained in:
Khem Raj
2026-09-21 08:13:48 -07:00
parent 16cc7db7d3
commit 31ad7fe450
2 changed files with 63 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
meta-perl/recipes-perl/libnet/libnet-ssleay-perl/0004-Update-tests-for-removal-of-SSLv2-Client-Hello-suppo.patch
+62
View File
@@ -0,0 +1,62 @@
From 1a5837fa489836f0dfc411d3a0c4d955ce8fab8c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Michal=20Josef=20=C5=A0pa=C4=8Dek?= <mspacek@redhat.com>
Date: Tue, 14 Apr 2026 14:48:51 +0200
Subject: [PATCH] Update tests for removal of SSLv2 Client Hello support in
OpenSSL 4.0.0
Upstream-Status: Backport [https://github.com/radiator-software/p5-net-ssleay/commit/1a5837fa489836f0dfc411d3a0c4d955ce8fab8c]
Signed-off-by: Khem Raj <khem.raj@oss.qualcomm.com>
---
t/local/48_client_hello_callback.t | 12 +++++++-----
1 file changed, 7 insertions(+), 5 deletions(-)
diff --git a/t/local/48_client_hello_callback.t b/t/local/48_client_hello_callback.t
index d99122c8..110d769a 100644
--- a/t/local/48_client_hello_callback.t
+++ b/t/local/48_client_hello_callback.t
@@ -5,13 +5,15 @@ use Test::Net::SSLeay qw(
can_fork data_file_path initialise_libssl new_ctx tcp_socket
);
+my $has_sslv2_hello;
BEGIN {
if (not defined &Net::SSLeay::CTX_set_client_hello_cb) {
plan skip_all => "No SSL_CTX_set_client_hello_cb()";
} elsif (not can_fork()) {
plan skip_all => "fork() not supported on this system";
} else {
- plan tests => 41;
+ $has_sslv2_hello = Net::SSLeay::SSLeay() < 0x40000000;
+ plan tests => $has_sslv2_hello ? 41 : 30;
}
}
@@ -172,7 +174,7 @@ my @cb_tests = (
# argument passed to the callback
# true if the callback function triggers croak()
# true if the client needs to test that ALPN alert (120) is received
- [ \&client_hello_cb_v2hello_detection, undef, 0 ],
+ ($has_sslv2_hello ? [ \&client_hello_cb_v2hello_detection, undef, 0 ] : ()),
[ \&client_hello_cb_getters, undef, 0 ],
[ \&client_hello_cb_value_passing, \$cb_test_arg, 0 ],
[ \&client_hello_cb_alert_alpn, undef, 0, 'alerts'],
@@ -248,8 +250,8 @@ my @results;
};
# Start with SSLv2 ClientHello detection test. Send a canned SSLv2
- # ClientHello.
- {
+ # ClientHello. Removed in OpenSSL 4.0.0.
+ if ($has_sslv2_hello) {
my $s_clientv2 = $server->connect();
my $clientv2_hello = get_sslv2_hello();
syswrite($s_clientv2, $clientv2_hello, length $clientv2_hello);
@@ -306,7 +308,7 @@ my @results;
waitpid $pid, 0;
push @results, [$? == 0, 'Client: server exited with 0'];
END {
- Test::More->builder->current_test(37);
+ Test::More->builder->current_test($has_sslv2_hello ? 37 : 27);
ok( $_->[0], $_->[1] ) for (@results);
}
meta-perl/recipes-perl/libnet/libnet-ssleay-perl_1.96.bb
+1
View File
@@ -28,6 +28,7 @@ SRC_URI = "${CPAN_MIRROR}/authors/id/C/CH/CHRISN/Net-SSLeay-${PV}.tar.gz \
file://0001-Fix-SSLv3-in-OpenSSL-4.0.0.patch \
file://0002-OpenSSL-4.0.0-remove-support-for-some-TLS-functions.patch \
file://0003-Fix-Net-SSLeay-to-support-opaque-ASN1_STRING.patch \
file://0004-Update-tests-for-removal-of-SSLv2-Client-Hello-suppo.patch \
"
SRC_URI[sha256sum] = "ab213691685fb2a576c669cbc8d9266f8165a31563ad15b7c4030b94adfc0753"