File perl-Crypt-OpenSSL-RSA-RSA_SSLV23_PADDING.patch of Package perl-Crypt-OpenSSL-RSA

From fb10b11a3c6e416a8379ea2a16e3a42ee59cb8bd Mon Sep 17 00:00:00 2001
From: kambe-mikb <77083885+kambe-mikb@users.noreply.github.com>
Date: Tue, 28 Sep 2021 17:40:18 +1000
Subject: [PATCH] Fix for Issue 31

Fix Issue 31 by removing reference to RSA_SSLV23_PADDING (removed from OpenSSL starting from v3.0.0)
---
 RSA.pm | 3 ++-
 RSA.xs | 4 ++++
 2 files changed, 6 insertions(+), 1 deletion(-)

Index: Crypt-OpenSSL-RSA-0.28/RSA.pm
===================================================================
--- Crypt-OpenSSL-RSA-0.28.orig/RSA.pm
+++ Crypt-OpenSSL-RSA-0.28/RSA.pm
@@ -33,7 +33,6 @@ Crypt::OpenSSL::RSA - RSA encoding and d
   Crypt::OpenSSL::Random::random_seed($good_entropy);
   Crypt::OpenSSL::RSA->import_random_seed();
   $rsa_pub = Crypt::OpenSSL::RSA->new_public_key($key_string);
-  $rsa_pub->use_sslv23_padding(); # use_pkcs1_oaep_padding is the default
   $ciphertext = $rsa->encrypt($plaintext);
 
   $rsa_priv = Crypt::OpenSSL::RSA->new_private_key($key_string);
@@ -230,6 +229,8 @@ Crypt::OpenSSL::RSA.
 Use PKCS #1 v1.5 padding with an SSL-specific modification that
 denotes that the server is SSL3 capable.
 
+Not available since OpenSSL 3.
+
 =item use_md5_hash
 
 Use the RFC 1321 MD5 hashing algorithm by Ron Rivest when signing and
Index: Crypt-OpenSSL-RSA-0.28/RSA.xs
===================================================================
--- Crypt-OpenSSL-RSA-0.28.orig/RSA.xs
+++ Crypt-OpenSSL-RSA-0.28/RSA.xs
@@ -607,12 +607,16 @@ use_pkcs1_oaep_padding(p_rsa)
   CODE:
     p_rsa->padding = RSA_PKCS1_OAEP_PADDING;
 
+#if OPENSSL_VERSION_NUMBER < 0x30000000L
+
 void
 use_sslv23_padding(p_rsa)
     rsaData* p_rsa;
   CODE:
     p_rsa->padding = RSA_SSLV23_PADDING;
 
+#endif
+
 # Sign text. Returns the signature.
 
 SV*