/*

* Copyright (c) 2007-2010 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: 

* Example CTestStep derived implementation

*

*/

/**

 @file

 @internalTechnology

*/

#include "hmacincrementalhmacstep.h"

#include <cryptospi/cryptohashapi.h>

#include <cryptospi/keys.h>

#include <cryptospi/plugincharacteristics.h>

using namespace CryptoSpi;

CHmacIncrementalHmacStep::~CHmacIncrementalHmacStep()

	{

	}

CHmacIncrementalHmacStep::CHmacIncrementalHmacStep()

	{

	SetTestStepName(KHmacIncrementalHmacStep);

	}

TVerdict CHmacIncrementalHmacStep::doTestStepPreambleL()

	{

	SetTestStepResult(EPass);

	return TestStepResult();

	}

TVerdict CHmacIncrementalHmacStep::doTestStepL()

	{

	if (TestStepResult()==EPass)

		{

		//Assume faliure, unless all is successful

		SetTestStepResult(EFail);

		INFO_PRINTF1(_L("*** Hmac - Incremental Hash ***"));

		INFO_PRINTF2(_L("HEAP CELLS: %d"), User::CountAllocCells());

		TVariantPtrC algorithmUid;

		TVariantPtrC operationModeUid;

		TPtrC sourcePath;

		TPtrC expectedHash;

		TPtrC encryptKey;

		TVariantPtrC keyType;

		//Extract the Test Case ID parameter from the specified INI file

		if(!GetStringFromConfig(ConfigSection(),KConfigAlgorithmUid,algorithmUid) ||

			!GetStringFromConfig(ConfigSection(),KConfigOperationMode,operationModeUid) ||

			!GetStringFromConfig(ConfigSection(),KConfigSourcePath,sourcePath) ||

			!GetStringFromConfig(ConfigSection(),KConfigExHashHmacValue,expectedHash) ||

			!GetStringFromConfig(ConfigSection(),KConfigEncryptKey,encryptKey) ||

			!GetStringFromConfig(ConfigSection(),KConfigEncryptKeyType,keyType))

			{

			ERR_PRINTF1(_L("** Error: Failed to Load Configuration Parameters **"));

			SetTestStepResult(EFail);

			}

		else

			{

			//Create a pointer for the Hash + Key (Hamc) Implementation Object

			CHash* hmacImpl = NULL;

			//Convert encryption key to an 8 Bit Descriptor

			HBufC8* keyStr = HBufC8::NewLC(encryptKey.Length());

			TPtr8 keyStrPtr = keyStr->Des();

			keyStrPtr.Copy(encryptKey);

			//Create an new CryptoParams object to encapsulate the key type and secret key string

			CCryptoParams* keyParams = CCryptoParams::NewL();

			CleanupStack::PushL(keyParams);

			keyParams->AddL(*keyStr,keyType);

			//Create Key Object

			TKeyProperty keyProperty;

			CKey* key=CKey::NewL(keyProperty,*keyParams);

			CleanupStack::PushL(key);

			//Retrieve a Hmac Factory Object		

			TRAPD(err,CHashFactory::CreateHashL(hmacImpl,

												algorithmUid,

												operationModeUid,

												key,

												NULL));										

			if(hmacImpl && (err == KErrNone))

				{

				//Push the Hmac Implementation Object onto the Cleanup Stack

				CleanupStack::PushL(hmacImpl);

				RFs fsSession;

				//Create a connection to the file server	

				err = fsSession.Connect();

				if(err != KErrNone)

					{

					ERR_PRINTF2(_L("*** Error: File Server Connection - %d ***"), err);

					SetTestStepResult(EFail);

					}	

				else

					{

					RFile sourceFile;

					CleanupClosePushL(sourceFile);

	    			//Open the specified source file		

	    			err = sourceFile.Open(fsSession,sourcePath, EFileRead);

	    			if(err != KErrNone)

						{

						ERR_PRINTF2(_L("*** Error: Opening Source File - %d ***"), err);

						SetTestStepResult(EFail);

						}

					else

						{

						TInt sourceLength = 0;

						TInt readPosition = 0;

						TInt readIncrement = 0;

						TBool hashComplete = EFalse;

						TPtrC8 hashStr;

						User::LeaveIfError(sourceFile.Size(sourceLength));

						//Divide the total size of the source file up into individual equal sized blocks to read

						//over several increments

						readIncrement = sourceLength/KDataReadBlocks;

						do 

							{

							//Create a heap based descriptor to store the data

							HBufC8* sourceData = HBufC8::NewL(readIncrement);

							CleanupStack::PushL(sourceData);

							TPtr8 sourcePtr = sourceData->Des();

							//Read in a block of data from the source file from the current position

							err = sourceFile.Read(readPosition,sourcePtr,readIncrement);

							//Update the read position by adding the number of bytes read

							readPosition += readIncrement;

							if(readPosition == readIncrement)

								{

								//Read in the first block from the data file into the Hmac implementation object

								hmacImpl->Hash(*sourceData);

								INFO_PRINTF2(_L("Intial Hmac - Bytes Read: %d"), readPosition);

								}

							else if(readPosition >= sourceLength)

								{

								//Reading in the final block, constructs the complete hash value and returns it within a TPtrC8

								hashStr.Set(hmacImpl->Final(*sourceData));

								//Sets the Complete Flag to ETrue in order to drop out of the loop

								hashComplete = ETrue;

								TInt totalRead = (readPosition - readIncrement) + (*sourceData).Length();

								INFO_PRINTF2(_L("Final Hmac - Bytes Read: %d"),totalRead);

								}

							else

								{

								//Update the message data within the Hmac object with the new block

								hmacImpl->Update(*sourceData);

								INFO_PRINTF2(_L("Hmac Update - Bytes Read: %d"), readPosition);

								}

							CleanupStack::PopAndDestroy(sourceData);

							}while(hashComplete == EFalse);

						//Create a NULL TCharacteristics pointer

						const TCharacteristics* charsPtr(NULL);

						//Retrieve the characteristics for the hash implementation object

						TRAP_LOG(err, hmacImpl->GetCharacteristicsL(charsPtr));

						//Static cast the characteristics to type THashCharacteristics

						const THashCharacteristics* hashCharsPtr = static_cast<const THashCharacteristics*>(charsPtr);

						//The hash output size is returned in Bits, divide by 8 to get the Byte size

						TInt hashSize = hashCharsPtr->iOutputSize/8;

						//Retrieve the final 8bit hash value and convert to 16bit												

						HBufC* hashData = HBufC::NewLC(hashSize);

						TPtr hashPtr = hashData->Des();

						hashPtr.Copy(hashStr);

						//Take the 16bit descriptor and convert the string to hexadecimal

						TVariantPtrC convertHash;

						convertHash.Set(hashPtr);

						HBufC* hmacResult = convertHash.HexStringLC();								

						INFO_PRINTF2(_L("*** Hashed Data: %S ***"),&*hmacResult);

						INFO_PRINTF2(_L("*** Expected Hash: %S ***"),&expectedHash);

						//If the returned hash value matches the expected hash, Pass the test	

						if(*hmacResult == expectedHash)

							{

							INFO_PRINTF1(_L("*** Hmac - Incremental Hash : PASS ***"));

							SetTestStepResult(EPass);	

							}

						else

							{

							ERR_PRINTF2(_L("*** FAIL: Hashed and Expected Value Mismatch  ***"), err);

							SetTestStepResult(EFail);	

							}				

						CleanupStack::PopAndDestroy(hmacResult);

						CleanupStack::PopAndDestroy(hashData);

						}

					//Cleanup the Source RFile	

					CleanupStack::PopAndDestroy();	

					}

				fsSession.Close();

				CleanupStack::PopAndDestroy(hmacImpl);	

				}

			else

				{

				ERR_PRINTF2(_L("*** FAIL: Failed to Create Hmac Object - %d ***"), err);

				SetTestStepResult(EFail);	

				}

			CleanupStack::PopAndDestroy(key);

			CleanupStack::PopAndDestroy(keyParams);

			CleanupStack::PopAndDestroy(keyStr);	

			}

		}

	INFO_PRINTF2(_L("HEAP CELLS: %d"), User::CountAllocCells());

	return TestStepResult();

	}

TVerdict CHmacIncrementalHmacStep::doTestStepPostambleL()

	{

	return TestStepResult();

	}