/*

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

* Implementation for testing object identifier encoding/decoding

*

*/

#include "testoid.h"

#include "tasn1normaltest.h"

#include <asn1enc.h>

#include <asn1dec.h>

#include <e32cons.h>

#include <e32math.h>

const TInt KMinOIDTerms = 2;

const TInt KMaxOIDTerms = KNumberOfIDs;

const TInt KMaxTermSize = 999999;

const TInt KMaxTermDigits = 6;

const TInt KMaxTermBits = 20;       // Bits in KMaxTermsSize

const TInt KMaxBufSize = (KMaxTermDigits * (KMaxOIDTerms - 2)) + 2 + KMaxOIDTerms;

CTestOID* CTestOID::NewL(CASN1NormalTest &aASN1Action)

	{

	CTestOID* test = new (ELeave) CTestOID(aASN1Action);

	return test;

	}

CTestOID::CTestOID(CASN1NormalTest &aASN1Action) : CTestBase(aASN1Action)

	{

	};

void CTestOID::GetName(TDes& aBuf)

	{

	aBuf.Copy(_L("Test Object Identifier"));

	}

void CTestOID::FillParameterArray(void)

	{

	iParameters->Append(CTestParameter::EString);

	}

TBool CTestOID::PerformTest(CConsoleBase& aConsole, HBufC &aTest, const TInt &aTestNumber, const TInt &aTotalTests)

	{

	// Get data, place in encoder

	CASN1EncObjectIdentifier* encoder = CASN1EncObjectIdentifier::NewLC(aTest);

	// Prepare a buffer

	TInt totalLength = encoder->LengthDER();

	HBufC8* buf = HBufC8::NewMaxLC(totalLength);

	TPtr8 tBuf = buf->Des();

	// Write into the buffer

	TUint writeLength = 0;

	encoder->WriteDERL(tBuf, writeLength);

	// Read it out again + check lengths

	TASN1DecObjectIdentifier decoder;

	TInt readLength = 0;

	HBufC* decodedData = decoder.DecodeDERL(tBuf, readLength);

	CleanupStack::PushL(decodedData);

	if (writeLength != STATIC_CAST(TUint, readLength) || aTest != *decodedData)

		{

		aConsole.Write(_L("ERROR!\nData to encode: "));

		aConsole.Write(aTest);

		aConsole.Write(_L("\nDecoded data: "));

		aConsole.Write(*decodedData);

		aConsole.Write(_L("\n"));

		OutputEncodingL(aConsole, tBuf);

		iASN1Action.ReportProgressL(KErrASN1EncodingError, aTestNumber, aTotalTests);

		CleanupStack::PopAndDestroy(3); // decodedData, buf, encoder

		return(EFalse);

		}

	else

		{

		iASN1Action.ReportProgressL(KErrNone, aTestNumber, aTotalTests);

		CleanupStack::PopAndDestroy(3); // decodedData, buf, encoder

		return(ETrue);

		}

	}

TBool CTestOID::PerformTestsL(CConsoleBase& aConsole)

	{

	CTestParameter* test;

	TInt totalTests, currentTest=0;

	if(!CountTests(totalTests)) return(EFalse);

	for(TInt pos = 0; pos < iValues->Count(); pos++)

		{

		test = (*iValues)[pos];

		switch(test->GetType())

			{

			case CTestParameter::EString :

				{

				CStringTestParameter *testString = REINTERPRET_CAST(CStringTestParameter*, test);

				HBufC* value = HBufC::NewLC(KMaxBufSize);

				TPtr tBuf = value->Des();

				testString->GetValue(tBuf);

				if(PerformTest(aConsole, *value, currentTest, totalTests))

					{

					currentTest++;

					CleanupStack::PopAndDestroy();

					}

				else

					{

					CleanupStack::PopAndDestroy();

					return(EFalse);

					}

				break;

				}

			case CTestParameter::ERandom :

				{

				CRandomTestParameter *testRandom = REINTERPRET_CAST(CRandomTestParameter*, test);

				HBufC* value;

				for(TInt test = 0; test <= testRandom->Interations(); test++)

					{

					value = HBufC::NewLC(KMaxBufSize);

					TPtr tBuf = value->Des();

					tBuf.AppendNum(static_cast<TUint>(Math::Random() % 3), EDecimal);

					tBuf.Append('.');

					tBuf.AppendNum(static_cast<TUint>(Math::Random() % 40), EDecimal);

					TInt targetTerms = (test % (1 + KMaxOIDTerms - KMinOIDTerms)) + KMinOIDTerms;

					for (TInt terms = 2; terms < targetTerms; ++terms)

						{

						TInt term = Math::Random() % (KMaxTermSize >> (test % KMaxTermBits));

						tBuf.Append('.');

						tBuf.AppendNum(term, EDecimal);

						}

					if(PerformTest(aConsole, *value, currentTest, totalTests))

						{

						CleanupStack::PopAndDestroy();

						currentTest++;

						}

					else

						{

						CleanupStack::PopAndDestroy();

						return(EFalse);

						}

					}

				break;

				}

			default:

				{

				return EFalse;

				}

			}

		}

	iASN1Action.ReportProgressL(KErrNone, totalTests, totalTests);

	return(ETrue);

	}