Blame SOURCES/libgcrypt-1.10.0-fips-disable-oaep.patch

25c200
From 34d8fc576b3a06dd205f45327a971eb6771e808c Mon Sep 17 00:00:00 2001
25c200
From: Jakub Jelen <jjelen@redhat.com>
25c200
Date: Wed, 17 Aug 2022 09:01:44 +0200
25c200
Subject: [PATCH 1/2] Disable RSA-OAEP padding in FIPS mode
25c200
25c200
* cipher/pubkey-util.c (_gcry_pk_util_data_to_mpi): Block OAEP padding
25c200
  in FIPS mode for encryption
25c200
* cipher/rsa.c (rsa_decrypt): Block OAEP padding in FIPS mode for
25c200
  decryption
25c200
---
25c200
25c200
Signed-off-by: Jakub Jelen <jjelen@redhat.com>
25c200
---
25c200
 cipher/pubkey-util.c | 5 ++++-
25c200
 cipher/rsa.c         | 3 ++-
25c200
 2 files changed, 6 insertions(+), 2 deletions(-)
25c200
25c200
diff --git a/cipher/pubkey-util.c b/cipher/pubkey-util.c
25c200
index 4953caf3..244dd5d4 100644
25c200
--- a/cipher/pubkey-util.c
25c200
+++ b/cipher/pubkey-util.c
25c200
@@ -1092,7 +1092,10 @@ _gcry_pk_util_data_to_mpi (gcry_sexp_t input, gcry_mpi_t *ret_mpi,
25c200
       const void * value;
25c200
       size_t valuelen;
25c200
 
25c200
-      if ( !(value=sexp_nth_data (lvalue, 1, &valuelen)) || !valuelen )
25c200
+      /* The RSA OAEP encryption requires some more assurances in FIPS */
25c200
+      if (fips_mode ())
25c200
+        rc = GPG_ERR_INV_FLAG;
25c200
+      else if ( !(value=sexp_nth_data (lvalue, 1, &valuelen)) || !valuelen )
25c200
 	rc = GPG_ERR_INV_OBJ;
25c200
       else
25c200
 	{
25c200
diff --git a/cipher/rsa.c b/cipher/rsa.c
25c200
index 96dba090..87f57b55 100644
25c200
--- a/cipher/rsa.c
25c200
+++ b/cipher/rsa.c
25c200
@@ -1457,7 +1457,8 @@ rsa_decrypt (gcry_sexp_t *r_plain, gcry_sexp_t s_data, gcry_sexp_t keyparms)
25c200
       rc = GPG_ERR_INV_DATA;
25c200
       goto leave;
25c200
     }
25c200
-  if (fips_mode () && (ctx.encoding == PUBKEY_ENC_PKCS1))
25c200
+  if (fips_mode () && (ctx.encoding == PUBKEY_ENC_PKCS1 ||
25c200
+                       ctx.encoding == PUBKEY_ENC_OAEP))
25c200
     {
25c200
       rc = GPG_ERR_INV_FLAG;
25c200
       goto leave;
25c200
-- 
25c200
2.37.1
25c200
25c200
25c200
From c6d64e697c2748a49e875060aa753fc568c5f772 Mon Sep 17 00:00:00 2001
25c200
From: Jakub Jelen <jjelen@redhat.com>
25c200
Date: Wed, 17 Aug 2022 10:31:19 +0200
25c200
Subject: [PATCH 2/2] tests: Expect the OEAP tests to fail in FIPS mode
25c200
25c200
* tests/basic.c (check_pubkey_crypt): Expect the OAEP padding encryption
25c200
  to fail in FIPS mode
25c200
* tests/pkcs1v2.c (check_oaep): Expect the OAEP tests to fail in FIPS
25c200
  mode
25c200
---
25c200
25c200
Signed-off-by: Jakub Jelen <jjelen@redhat.com>
25c200
---
25c200
 tests/basic.c   | 14 +++++++++-----
25c200
 tests/pkcs1v2.c | 13 +++++++++++++
25c200
 2 files changed, 22 insertions(+), 5 deletions(-)
25c200
25c200
diff --git a/tests/basic.c b/tests/basic.c
25c200
index 26980e15..b4102c9f 100644
25c200
--- a/tests/basic.c
25c200
+++ b/tests/basic.c
25c200
@@ -16892,21 +16892,24 @@ check_pubkey_crypt (int n, gcry_sexp_t skey, gcry_sexp_t pkey, int algo,
25c200
 	"(flags oaep)",
25c200
 	1,
25c200
 	0,
25c200
-	0 },
25c200
+	0,
25c200
+	FLAG_NOFIPS },
25c200
       { GCRY_PK_RSA,
25c200
         "(data\n (flags oaep)\n (hash-algo sha1)\n"
25c200
 	" (value #11223344556677889900AA#))\n",
25c200
 	"(flags oaep)(hash-algo sha1)",
25c200
 	1,
25c200
 	0,
25c200
-	0 },
25c200
+	0,
25c200
+	FLAG_NOFIPS },
25c200
       { GCRY_PK_RSA,
25c200
         "(data\n (flags oaep)\n (hash-algo sha1)\n (label \"test\")\n"
25c200
 	" (value #11223344556677889900AA#))\n",
25c200
 	"(flags oaep)(hash-algo sha1)(label \"test\")",
25c200
 	1,
25c200
 	0,
25c200
-	0 },
25c200
+	0,
25c200
+	FLAG_NOFIPS },
25c200
       { GCRY_PK_RSA,
25c200
         "(data\n (flags oaep)\n (hash-algo sha1)\n (label \"test\")\n"
25c200
 	" (value #11223344556677889900AA#)\n"
25c200
@@ -16914,7 +16917,8 @@ check_pubkey_crypt (int n, gcry_sexp_t skey, gcry_sexp_t pkey, int algo,
25c200
 	"(flags oaep)(hash-algo sha1)(label \"test\")",
25c200
 	1,
25c200
 	0,
25c200
-	0 },
25c200
+	0,
25c200
+	FLAG_NOFIPS },
25c200
       {	0,
25c200
         "(data\n (flags )\n" " (value #11223344556677889900AA#))\n",
25c200
 	NULL,
25c200
@@ -16960,7 +16964,7 @@ check_pubkey_crypt (int n, gcry_sexp_t skey, gcry_sexp_t pkey, int algo,
25c200
 	"(flags pkcs1)",
25c200
 	1,
25c200
 	0,
25c200
-	GPG_ERR_ENCODING_PROBLEM, FLAG_SPECIAL },
25c200
+	GPG_ERR_ENCODING_PROBLEM, FLAG_SPECIAL | FLAG_NOFIPS },
25c200
       {	0,
25c200
         "(data\n (flags pss)\n"
25c200
 	" (value #11223344556677889900AA#))\n",
25c200
diff --git a/tests/pkcs1v2.c b/tests/pkcs1v2.c
25c200
index 6c7f3d81..2fd495d5 100644
25c200
--- a/tests/pkcs1v2.c
25c200
+++ b/tests/pkcs1v2.c
25c200
@@ -186,11 +186,24 @@ check_oaep (void)
25c200
           err = gcry_pk_encrypt (&ciph, plain, pub_key);
25c200
           if (err)
25c200
             {
25c200
+              if (in_fips_mode)
25c200
+                {
25c200
+                  gcry_sexp_release (plain);
25c200
+                  plain = NULL;
25c200
+                  continue;
25c200
+                }
25c200
               show_sexp ("plain:\n", ciph);
25c200
               fail ("gcry_pk_encrypt failed: %s\n", gpg_strerror (err));
25c200
             }
25c200
           else
25c200
             {
25c200
+              if (in_fips_mode)
25c200
+                {
25c200
+                  fail ("The OAEP encryption unexpectedly worked in FIPS mode\n");
25c200
+                  gcry_sexp_release (plain);
25c200
+                  plain = NULL;
25c200
+                  continue;
25c200
+                }
25c200
               if (extract_cmp_data (ciph, "a", tbl[tno].m[mno].encr,
25c200
                                     tbl[tno].m[mno].desc))
25c200
                 {
25c200
-- 
25c200
2.37.1
25c200