/*

* Copyright (c) 2007-2009 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of the License "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description: 

*

*/

#include "rsakeypairshim.h"

#include "cryptokeypairgeneratorapi.h"

#include "keypair.h"

#include <cryptospi/cryptoparams.h>

#include <cryptospi/cryptospidef.h>

using namespace CryptoSpi;

/* CRSAKeyPair */

const TUint KFermat4 = 65537;

CRSAKeyPairShim* CRSAKeyPairShim::NewLC(TUint aModulusBits, TRSAPrivateKeyType aKeyType)

	{

	CRSAKeyPairShim* self = new(ELeave) CRSAKeyPairShim();

	CleanupStack::PushL(self);

	self->ConstructL(aModulusBits, aKeyType, KFermat4);

	return self;

	}

CRSAKeyPairShim::~CRSAKeyPairShim(void)

	{

	}

CRSAKeyPairShim::CRSAKeyPairShim(void)

	{

	}

void CRSAKeyPairShim::ConstructL(TUint aModulusBits, TRSAPrivateKeyType aKeyType, TInt aPublicExponent)

	{

	CKeyPairGenerator* keyPairGeneratorImpl=NULL;

	CKeyPairGeneratorFactory::CreateKeyPairGeneratorL(

											keyPairGeneratorImpl,

											KRSAKeyPairGeneratorUid,

											NULL);

	CleanupStack::PushL(keyPairGeneratorImpl);

	// put the RSA parameters into an array

	CCryptoParams* keyParameters = CCryptoParams::NewLC();

	keyParameters->AddL(aPublicExponent, KRsaKeyParameterEUid);

	if (aKeyType == EStandard)

		{

		keyParameters->AddL(KRsaPrivateKeyStandard, KRsaKeyTypeUid);

		}

	else if (aKeyType == EStandardCRT)

		{

		keyParameters->AddL(KRsaPrivateKeyCRT, KRsaKeyTypeUid);

		}

	// call the api to create an RSA key pair

	CKeyPair* keyPair = 0;

	keyPairGeneratorImpl->GenerateKeyPairL(aModulusBits, *keyParameters, keyPair);

	CleanupStack::PushL(keyPair);

	/* 

	 * Convert the CKeyPair to CRSAPrivateKey{CRT/Standard} and CRSAPublicKey

	 * The public key becomes the owner of n and e RIntegers

	 */

	RInteger n = RInteger::NewL(keyPair->PublicKey().GetBigIntL(KRsaKeyParameterNUid));

	CleanupClosePushL(n);

	RInteger e = RInteger::NewL(keyPair->PublicKey().GetBigIntL(KRsaKeyParameterEUid));

	CleanupClosePushL(e);

	iPublic = CRSAPublicKey::NewL(n, e);

	if (aKeyType == EStandard)

		{

		RInteger n = RInteger::NewL(keyPair->PrivateKey().GetBigIntL(KRsaKeyParameterNUid));

		CleanupClosePushL(n);

		RInteger d = RInteger::NewL(keyPair->PrivateKey().GetBigIntL(KRsaKeyParameterDUid));

		CleanupClosePushL(d);

		iPrivate = CRSAPrivateKeyStandard::NewL(n, d);

		CleanupStack::Pop(2, &n);

		}

	else if (aKeyType == EStandardCRT)

		{

		RInteger n = RInteger::NewL(keyPair->PrivateKey().GetBigIntL(KRsaKeyParameterNUid));

		CleanupClosePushL(n);

		RInteger p = RInteger::NewL(keyPair->PrivateKey().GetBigIntL(KRsaKeyParameterPUid));

		CleanupClosePushL(p);

		RInteger q = RInteger::NewL(keyPair->PrivateKey().GetBigIntL(KRsaKeyParameterQUid));

		CleanupClosePushL(q);

		RInteger dp = RInteger::NewL(keyPair->PrivateKey().GetBigIntL(KRsaKeyParameterDPUid));

		CleanupClosePushL(p);

		RInteger dq = RInteger::NewL(keyPair->PrivateKey().GetBigIntL(KRsaKeyParameterDQUid));

		CleanupClosePushL(q);

		RInteger qinv = RInteger::NewL(keyPair->PrivateKey().GetBigIntL(KRsaKeyParameterQInvUid));

		CleanupClosePushL(qinv);

		iPrivate = CRSAPrivateKeyCRT::NewL(n, p, q, dp, dq, qinv);

		CleanupStack::Pop(6, &n);

		}

	/*

	 * cleanup stack - it should contain keyPairGeneratorImpl, keyParameters, keyPair, n, e

	 */

	CleanupStack::Pop(2, &n);

	CleanupStack::PopAndDestroy(3, keyPairGeneratorImpl);

	}