/*
* 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: 
* Example CTestStep derived implementation
*
*/


/**
 @file
 @internalTechnology
*/
#include "hashbasichashofdatastep.h"

#include <cryptospi/cryptohashapi.h>
#include <cryptospi/plugincharacteristics.h>

using namespace CryptoSpi;


class THashParameters
	{
public:
	~THashParameters();
	TUid iAlgorithmUid;
	TUid iOperationUid;
	CHash* iHash;
	};
	
THashParameters::~THashParameters()
	{
	delete iHash;
	}

TInt CreatorThreadEntryPoint(TAny* aParameters)
	{
	CTrapCleanup* cleanup = CTrapCleanup::New();
	if (!cleanup)
		User::Exit(KErrNoMemory);
	
	ASSERT(aParameters);
	THashParameters* params=static_cast<THashParameters*>(aParameters);

	TRAPD(result,CHashFactory::CreateHashL(params->iHash,
											params->iAlgorithmUid,
											params->iOperationUid,
											NULL,
											NULL));  					
	delete cleanup;
	User::Exit(result);
	return KErrNone;
	}


CHashBasicHashOfDataStep::~CHashBasicHashOfDataStep()
	{
	}


CHashBasicHashOfDataStep::CHashBasicHashOfDataStep()
	{
	SetTestStepName(KHashBasicHashOfDataStep);
	}


TVerdict CHashBasicHashOfDataStep::doTestStepPreambleL()
	{
	SetTestStepResult(EPass);
	return TestStepResult();
	}


TVerdict CHashBasicHashOfDataStep::doTestStepL()
	{
	if (TestStepResult()==EPass)
		{
		
		//Assume faliure, unless all is successful
		SetTestStepResult(EFail);
		
		INFO_PRINTF1(_L("*** Hash - Basic Hash of Data ***"));
		INFO_PRINTF2(_L("HEAP CELLS: %d"), User::CountAllocCells());
		
		TVariantPtrC algorithmUid;
		TVariantPtrC operationModeUid;
		TPtrC sourcePath;
		TPtrC expectedHash;
		
		//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))
			{
			ERR_PRINTF1(_L("** Error: Failed to Load Configuration Parameters **"));
			SetTestStepResult(EFail);
			}
		else
			{
			TPtrC threadName;
			CHash* hashImpl=NULL;
			TInt err=KErrNone;
			THashParameters params;
			RThread creatorThread;
			
			CleanupClosePushL(creatorThread);
			
			if (GetStringFromConfig(ConfigSection(),KConfigThreadName,threadName))
				{
				
				params.iAlgorithmUid=algorithmUid;
				params.iOperationUid=operationModeUid;
				params.iHash=NULL;
		
				
				User::LeaveIfError(creatorThread.Create(threadName, CreatorThreadEntryPoint, KDefaultStackSize, NULL, (TAny*)&params));
				TRequestStatus status=KRequestPending;
				creatorThread.Logon(status);
				creatorThread.Resume();
				User::WaitForRequest(status);
				//creatorThread.Close();
				hashImpl=params.iHash;
				err=status.Int();
				}
			else
				{
				//Retrieve a Hash Factory Object						
				TRAP(err,CHashFactory::CreateHashL(hashImpl,
													algorithmUid,
													operationModeUid,
													NULL,
													NULL));
				params.iHash=hashImpl;
				}
				
			if(hashImpl && (err == KErrNone))
				{
				
				//Push the Hash Implementation Object onto the Cleanup Stack
				//CleanupStack::PushL(hashImpl);
				
				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;
						User::LeaveIfError(sourceFile.Size(sourceLength));
						
						//Create a heap based descriptor to store the data
						HBufC8* sourceData = HBufC8::NewL(sourceLength);						
						CleanupStack::PushL(sourceData);
						TPtr8 sourcePtr = sourceData->Des();
						
						sourceFile.Read(sourcePtr);
							
						if(sourcePtr.Length() != sourceLength)
							{
							ERR_PRINTF1(_L("*** Error: Reading Source File ***"));
							SetTestStepResult(EFail);	
							}
						else
							{
							//Create a NULL TCharacteristics pointer
							const TCharacteristics* charsPtr(NULL);
							
							//Retrieve the characteristics for the hash implementation object
							TRAP_LOG(err, hashImpl->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();
							
							//Copy the hashed content into the heap based descriptor
							hashPtr.Copy(hashImpl->Hash(*sourceData));
							
						 	//Take the 16bit descriptor and convert the string to hexadecimal
							TVariantPtrC convertHash;
							convertHash.Set(hashPtr);
							HBufC* hashResult = convertHash.HexStringLC();							
							
							INFO_PRINTF2(_L("*** Hashed Data: %S ***"),&*hashResult);
							INFO_PRINTF2(_L("*** Expected Hash: %S ***"),&expectedHash);
							
							//If the returned hash value matches the expected hash, Pass the test				
							if(*hashResult == expectedHash)
								{
								INFO_PRINTF1(_L("*** Hash - Basic Hash of Data : PASS ***"));
								SetTestStepResult(EPass);	
								}
							else
								{
								ERR_PRINTF2(_L("*** FAIL: Hashed and Expected Value Mismatch  ***"), err);
								SetTestStepResult(EFail);	
								}
							
							CleanupStack::PopAndDestroy(hashResult);
							CleanupStack::PopAndDestroy(hashData);
							CleanupStack::PopAndDestroy(sourceData);					
							}
						}
						
					//Cleanup the Source RFile	
					CleanupStack::PopAndDestroy();	
					}
					
				fsSession.Close();	
				
				//CleanupStack::PopAndDestroy(hashImpl);
				}
			else
				{
				ERR_PRINTF2(_L("*** FAIL: Failed to Create Hash Object - %d ***"), err);
				SetTestStepResult(EFail);	
				}
			
			CleanupStack::PopAndDestroy(&creatorThread);
			}
		}
		
	INFO_PRINTF2(_L("HEAP CELLS: %d"), User::CountAllocCells());	
	
	return TestStepResult();
	}


TVerdict CHashBasicHashOfDataStep::doTestStepPostambleL()
	{
	
	return TestStepResult();
	}