From: Martin Willi <martin@revosec.ch>
Date: Mon, 13 Apr 2015 10:12:09 +0000 (+0200)
Subject: gcrypt: Support setting private value and testing of DH backend
X-Git-Tag: 5.3.1dr1~16^2~15
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=41421b85a91bb91b965f241949cf1d7d49b7692e;p=thirdparty%2Fstrongswan.git

gcrypt: Support setting private value and testing of DH backend
---

diff --git a/src/libstrongswan/plugins/gcrypt/gcrypt_dh.c b/src/libstrongswan/plugins/gcrypt/gcrypt_dh.c
index 744ec0bbf0..cee25ea74b 100644
--- a/src/libstrongswan/plugins/gcrypt/gcrypt_dh.c
+++ b/src/libstrongswan/plugins/gcrypt/gcrypt_dh.c
@@ -145,6 +145,24 @@ METHOD(diffie_hellman_t, get_my_public_value, bool,
 	return TRUE;
 }
 
+METHOD(diffie_hellman_t, set_private_value, bool,
+	private_gcrypt_dh_t *this, chunk_t value)
+{
+	gcry_error_t err;
+	gcry_mpi_t xa;
+
+	err = gcry_mpi_scan(&xa, GCRYMPI_FMT_USG, value.ptr, value.len, NULL);
+	if (!err)
+	{
+		gcry_mpi_release(this->xa);
+		this->xa = xa;
+		gcry_mpi_powm(this->ya, this->g, this->xa, this->p);
+		gcry_mpi_release(this->zz);
+		this->zz = NULL;
+	}
+	return !err;
+}
+
 METHOD(diffie_hellman_t, get_shared_secret, bool,
 	private_gcrypt_dh_t *this, chunk_t *secret)
 {
@@ -191,6 +209,7 @@ gcrypt_dh_t *create_generic(diffie_hellman_group_t group, size_t exp_len,
 				.get_shared_secret = _get_shared_secret,
 				.set_other_public_value = _set_other_public_value,
 				.get_my_public_value = _get_my_public_value,
+				.set_private_value = _set_private_value,
 				.get_dh_group = _get_dh_group,
 				.destroy = _destroy,
 			},