(rsa_keypair_from_sexp): Bugfix: Call

rsa_prepare_public_key and rsa_prepare_private_key.

Rev: src/nettle/sexp2rsa.c:1.2

1 files changed, 6 insertions, 0 deletions

diff --git a/sexp2rsa.c b/sexp2rsa.c
index 1027765a..940296c2 100644
--- a/sexp2rsa.c
+++ b/sexp2rsa.c
@@ -102,12 +102,18 @@ rsa_keypair_from_sexp(struct rsa_public_key *pub,
       GET(priv->a, &values[5]);
       GET(priv->b, &values[6]);
       GET(priv->c, &values[7]);
+
+      if (!rsa_prepare_private_key(priv))
+	return 0;
     }
 
   if (pub)
     {
       GET(pub->n, &values[0]);
       GET(pub->e, &values[1]);
+
+      if (!rsa_prepare_public_key(pub))
+	return 0;
     }
     
   return 1;