fix ISC export for Botan; this fixes Botan/Polar interaction. Thanks to Paul Bakker...

git-svn-id: svn://svn.powerdns.com/pdns/trunk/pdns@2720 d19b8d6e-7fed-0310-83ef-9ca221ded41b

diff --git a/pdns/botansigners.cc b/pdns/botansigners.cc
index 2974a6b73da1f36c05d3b6486a0ec5eb9facd8f1..78b756dc172f1297df4f76c428e79d6d7d2f62f2 100644 (file)
--- a/pdns/botansigners.cc
+++ b/pdns/botansigners.cc
@@ -6,6 +6,7 @@
 #include <botan/rsa.h>
 #include <botan/pubkey.h>
 #include <botan/look_pk.h>
+#include <botan/numthry.h>
 #include "dnssecinfra.hh"
 
 using namespace Botan;
@@ -92,13 +93,15 @@ DNSCryptoKeyEngine::storvector_t BotanRSADNSCryptoKeyEngine::convertToISCVector(
 #if BOTAN_VERSION_CODE < BOTAN_VERSION_CODE_FOR(1,9,0)  
   BigInt d1 = d_key->get_d() % (d_key->get_p() - 1);
   BigInt d2 = d_key->get_d() % (d_key->get_q() - 1);
+  BigInt c = inverse_mod(d_key->get_q(), d_key->get_p());
 #else
   BigInt d1 = d_key->get_d1();
   BigInt d2 = d_key->get_d2();
+  BigInt c = d_key->get_c();
 #endif
   storvect.push_back(make_pair("Exponent1", asRaw(d1)));
   storvect.push_back(make_pair("Exponent2", asRaw(d2)));
-  storvect.push_back(make_pair("Coefficient", asRaw(d_key->get_q())));
+  storvect.push_back(make_pair("Coefficient", asRaw(c)));
   return storvect;
 }