--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/cryptoservices/certificateandkeymgmt/tasn1/testoctetstr.cpp	Wed Jul 08 11:25:26 2009 +0100
@@ -0,0 +1,178 @@
+/*
+* 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 octet string encoding/decoding
+*
+*/
+
+
+#include "testoctetstr.h"
+#include "tasn1normaltest.h"
+#include <asn1enc.h>
+#include <asn1dec.h>
+
+#include <e32math.h>
+#include <e32cons.h>
+
+const TInt KMaxStringLength = 1000;
+
+CTestOctetString* CTestOctetString::NewL(CASN1NormalTest &aASN1Action)
+	{
+	CTestOctetString* test = new (ELeave) CTestOctetString(aASN1Action);
+	test->ConstructL();
+	return test;
+	}
+
+CTestOctetString::CTestOctetString(CASN1NormalTest &aASN1Action) : CTestBase(aASN1Action)
+	{
+	};
+
+void CTestOctetString::ConstructL()	
+	{
+	toEncodeBuf = HBufC8::NewMaxLC(KMaxStringLength);
+	encodedBuf = HBufC8::NewMaxLC(KMaxStringLength + 10); // extra 10 for tag/length
+	CleanupStack::Pop(2);
+	};
+
+void CTestOctetString::FillParameterArray(void)
+	{
+	iParameters->Append(CTestParameter::EString);
+	}
+
+
+CTestOctetString::~CTestOctetString()	
+	{
+	delete toEncodeBuf;
+	delete encodedBuf;
+	}
+
+void CTestOctetString::GetName(TDes& aBuf)
+	{
+	aBuf.Copy(_L("Test Octet String"));
+	}
+
+
+TBool CTestOctetString::PerformTest(CConsoleBase& aConsole, const TPtr8 &toEncodePtr, const TInt &aTestNumber, const TInt &aTotalTests)
+	{
+	TPtr8 encodedPtr = encodedBuf->Des();
+
+	// Make the encoder
+	CASN1EncOctetString* encoder = CASN1EncOctetString::NewLC(toEncodePtr);
+
+	// Do the encoding
+	TUint writeLength = 0;
+	encoder->WriteDERL(encodedPtr, writeLength);
+	
+	// Read it out again
+	TASN1DecOctetString decoder;
+	TInt readLength = 0;
+	HBufC8* readBuf = decoder.DecodeDERL(encodedPtr, readLength);
+	CleanupStack::PushL(readBuf);
+	
+	// Check lengths of reads + values
+	if ((writeLength != STATIC_CAST(TUint, readLength)) || (*readBuf != toEncodePtr))
+		{
+		aConsole.Printf(_L("\nERROR!\n"));
+		iASN1Action.ReportProgressL(KErrASN1EncodingError, aTestNumber, aTotalTests);
+		CleanupStack::PopAndDestroy(2); // encoder, readBuf
+		return(ETrue);
+		}
+	else
+		{
+		iASN1Action.ReportProgressL(KErrNone, aTestNumber, aTotalTests);
+		CleanupStack::PopAndDestroy(2); // encoder, readBuf
+		return(ETrue);
+		}
+	}
+
+
+TBool CTestOctetString::PerformTestsL(CConsoleBase& aConsole)
+	{
+	TInt nLow = Math::Random();
+	TInt64 nHigh((TInt)Math::Random());	
+	TInt64 seed((nHigh << 32) + nLow);
+	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(KMaxStringLength);
+				TPtr tBuf = value->Des();
+
+				testString->GetValue(tBuf);
+
+				if((tBuf.Length() % 2) != 0)
+					User::Leave(KErrArgument);
+
+				TPtr8 toEncodePtr(toEncodeBuf->Des());
+				TUint theOctet;
+				TInt octetPos=0;
+
+				for(TInt octet = 0; octet < tBuf.Length(); octet+=2)
+					{
+					TLex lex(tBuf.Mid(octet, 2));
+					
+					if(lex.Val(theOctet, EHex)!=KErrNone)
+						User::Leave(KErrArgument);
+					toEncodePtr[octetPos++] = STATIC_CAST(TUint8, theOctet);
+					};
+				if(PerformTest(aConsole, toEncodePtr, currentTest, totalTests))
+					{
+					CleanupStack::PopAndDestroy();
+					currentTest++;
+					}
+				else
+					{
+					CleanupStack::PopAndDestroy();
+					return(EFalse);
+					}
+				break;
+				}
+			case CTestParameter::ERandom :
+				{
+				CRandomTestParameter *randomInt = REINTERPRET_CAST(CRandomTestParameter*, test);
+
+				for (TInt count = 0; count <= randomInt->Interations(); ++count)
+					{
+					// Descriptor for part of buffer we'll use; fill with noise
+					TInt toEncodeLength = count % KMaxStringLength;
+					TPtr8 toEncodePtr(toEncodeBuf->Des());
+					for (TInt i = 0; i < toEncodeLength; ++i)
+						{
+						toEncodePtr[i] = STATIC_CAST(TUint8, Math::Rand(seed));
+						}
+					if(!PerformTest(aConsole, toEncodePtr, currentTest, totalTests))
+						return(EFalse);
+					currentTest++;
+					}
+
+				break;
+				}
+			default:
+				{
+				return EFalse;
+				}
+			}
+		}
+	iASN1Action.ReportProgressL(KErrNone, totalTests, totalTests);
+	return(ETrue);
+	};