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

// All rights reserved.

// This component and the accompanying materials are made available

// which accompanies this distribution, and is available

//

// Initial Contributors:

// Nokia Corporation - initial contribution.

//

// Contributors:

//

// Description:

// e32test\buffer\t_varray.cpp

// Overview:

// Test variable record length array classes.

// API Information:

// CArrayVarFlat, CArrayVarSeg.

// Details:

// - Create an array of variable length text using a flat dynamic & segmented

// buffer and verify that:

// - number of elements held in the array is 0.

// - array is compressed and reset as expected.

// - the elements of the array are sorted as expected.

// - insertion of a text character into the array at specified position 

// and length of the array is as expected.

// - return value is 0 when available element is searched using sequential 

// search technique within the array.

// - removal of first element from the array is successful.

// - number of elements held in the array is 1 after appending a single 

// element at the end of empty array.

// - insertion of a single element with specified key is successful.

// - the element is found when searched using binary search technique

// - KErrAlreadyExists is returned if an element is inserted with the same 

// key already exists within the array.

// - Create an array of variable length text character implemented using a flat 

// dynamic & segmented buffer.

// - append some strings onto the end of the array, check the contents and 

// number of elements held in the array are as expected.

// - insert some strings and verify that the change in the content of array 

// and number of elements held in the array are as expected.

// - remove a single, multiple elements from the array and verify that the 

// Delete method is as expected.

// - Create an array of variable length text character contained within a flat 

// dynamic & segmented buffer.

// - append some strings of specified length onto the end of the array, compress 

// the array and verify that the number of elements held in the array is as specified.

// - insert a string at specified location, check the contents and reset the array.

// - append some strings at the end, insert some strings at specified position, 

// compress the array and verify that content, number of strings in the array 

// are as expected.

// - test that the number of elements and contents of the array are sorted as expected.

// - verify the correct position of the element and return value is zero when 

// an element is found using binary, sequential search technique and nonzero 

// if not present in the array.

// - insert some strings at the specified location and check that correct position

// is returned when searched using binary search technique.

// - Create an array of variable length integer contained within a flat dynamic &

// segmented buffer.

// - insert some elements with same key which is already present within the array 

// and check that KErrAlreadyExists is returned. 

// - Test whether the heap has been corrupted by all the tests.

// Platforms/Drives/Compatibility:

// All 

// Assumptions/Requirement/Pre-requisites:

// Failures and causes:

// Base Port information:

// 

//

#include <e32std.h>

#include <e32base.h>

#include <e32test.h>

#include <e32svr.h>

#include <e32ver.h>

const TInt KTestGranularity=0x02;

LOCAL_D RTest test(_L("T_VARRAY"));

LOCAL_C void testAllMethods(CArrayVar<TText>& aVar)

    {

	test.Next(_L("Test all methods"));

	test(aVar.Count()==0);

	aVar.Compress();

	test(TRUE);

	aVar.Reset();

	test(TRUE);

	TKeyArrayVar kk(sizeof(TText),ECmpNormal,0);

	test(TRUE);

	aVar.Sort(kk);

	test(TRUE);

	const TText* aa=_S("a");

	aVar.InsertL(0,*aa,sizeof(TText));

	test(aVar.Length(0)==sizeof(TText));

	test(TRUE);

	TInt pp;

	test(aVar.Find(*aa,kk,pp)==0);

	test(pp==0);

	aVar.Delete(0);

	aVar.AppendL(*aa,1);

	test(aVar.Count()==1);

	aVar.InsertIsqAllowDuplicatesL(*aa,0,kk);

	test(TRUE);

	test(aVar.FindIsq(*aa,kk,pp)==0);

	test(pp==0);

	TRAPD(r,aVar.InsertIsqL(*aa,0,kk));

	test(r==KErrAlreadyExists);

    }

LOCAL_C void test1(CArrayVar<TText>& aVar)

//

	{

	test.Next(_L("AppendL and InsertL chars"));

	aVar.AppendL(*_S("abcd"),5*sizeof(TText)); // abcd

	TBuf<0x10> des1(&aVar[0]);

	test(des1==_L("abcd"));

	test(aVar.Count()==1);

	aVar.AppendL(*_S("wxyz"),5*sizeof(TText)); // abcd wxyz

	des1=&aVar[1];

	test(des1==_L("wxyz"));

	test(aVar.Count()==2);

	aVar.InsertL(1,*_S("ef"),3*sizeof(TText)); // abcd ef wxyz

	des1=&aVar[1];

	test(des1==_L("ef"));

	test(aVar.Count()==3);	

	aVar.AppendL(*_S("z"),2*sizeof(TText)); // abcd ef wxyz z

	des1=&aVar[3];

	test(des1==_L("z"));

	aVar.InsertL(0,*_S("y"),2*sizeof(TText)); // y abcd ef wxyz z

	des1=&aVar[0];

	test(des1==_L("y"));

	test(aVar.Length(0)==2*sizeof(TText));

	test(aVar.Length(1)==5*sizeof(TText));

	test(aVar.Length(2)==3*sizeof(TText));

	test(aVar.Length(3)==5*sizeof(TText));

	test(aVar.Length(4)==2*sizeof(TText));

	des1=&aVar[1];

	test(des1==_L("abcd"));

	test(aVar.Count()==5);

//

	test.Next(_L("Delete chars"));

	aVar.Delete(3,1); // y abcd ef z

	des1=&aVar[2];

	test(des1==_L("ef"));

	des1=&aVar[1];

	test(des1==_L("abcd"));

	des1=&aVar[3];

	test(des1==_L("z"));

	aVar.Delete(1,2); // y z

	des1=&aVar[0];

	test(des1==_L("y"));

	des1=&aVar[1];

	test(des1==_L("z"));

	test(aVar.Count()==2);

	}

LOCAL_C void test2(CArrayVar<TText>& aVar)

//

	{

	test.Next(_L("Reset and Compress"));

	TBuf<0x10> des1(_L("abcde"));

	TBuf<0x10> des2(_L("fgh"));

	TBuf<0x10> des3(_L("wxyz"));

	aVar.AppendL(*(TText*)des1.Ptr(),des1.Size());

	aVar.AppendL(*(TText*)des2.Ptr(),des2.Size());

	aVar.Compress();

	test(aVar.Count()==2);

	TPtrC des4((TText*)&aVar[0],des1.Length());

	test(des1==des4);

	TPtrC des5((TText*)&aVar[1],des2.Length());

	test(des2==des5);

	aVar.InsertL(1,*(TText*)des3.Ptr(),des3.Size());

	test(aVar.Count()==3);	

	TPtrC des6((TText*)&aVar[0],des1.Length());

	test(des1==des6);

	TPtrC des7((TText*)&aVar[2],des2.Length());

	test(des2==des7);

	TPtrC des8((TText*)&aVar[1],des3.Length());

	test(des3==des8);

	aVar.Reset();

	TBuf<0x10> buf1=_L("abcdef");

	TBuf<0x10> buf2=_L("wxyz");

	TBuf<0x10> buf3=_L("lmnop");

	TBuf<0x10> buf4=_L("aa");

	aVar.AppendL(*buf1.Ptr(),buf1.Size());

	aVar.InsertL(0,*buf2.Ptr(),buf2.Size());

	aVar.AppendL(*buf3.Ptr(),buf3.Size());

	aVar.InsertL(1,*buf4.Ptr(),buf4.Size());

	aVar.Compress();

	TPtrC rd1((TText*)&aVar[2],buf1.Length());

	test(buf1==rd1);

	TPtrC rd2((TText*)&aVar[0],buf2.Length());

	test(buf2==rd2);

	TPtrC rd3((TText*)&aVar[3],buf3.Length());

	test(buf3==rd3);

	TPtrC rd4((TText*)&aVar[1],buf4.Length());

	test(buf4==rd4);

	test(aVar.Count()==4);

	TKeyArrayVar kk(0,ECmpNormal,3);		// Compare 3 characters

	TKeyArrayVar kk1(0,ECmpNormal,2);	// Compare 2 characters

	test.Next(_L("Sort"));

	aVar.Sort(kk);

	TPtrC rd5((TText*)&aVar[1],buf1.Length());

	test(buf1==rd5);

	TPtrC rd6((TText*)&aVar[3],buf2.Length());

	test(buf2==rd6);

	TPtrC rd7((TText*)&aVar[2],buf3.Length());

	test(buf3==rd7);

	TPtrC rd8((TText*)&aVar[0],buf4.Length());

	test(buf4==rd8);

	test(aVar.Count()==4);	

	test.Next(_L("Find and FindIsq"));

	TBuf<0x10> buf5=_L("ffff");

	test(aVar.InsertIsqL(*(TText*)buf5.Ptr(),buf5.Size(),kk)==2);

	TRAPD(r,aVar.InsertIsqL(*(TText*)buf5.Ptr(),buf5.Size(),kk))

	test(r==KErrAlreadyExists);

	test(aVar.InsertIsqAllowDuplicatesL(*(TText*)buf5.Ptr(),buf5.Size(),kk)==3);

	TInt aPos;

	test(aVar.Find(*_S("abc"),kk,aPos)==0);	// Second parameter 'aLength' is unused. 

	test(aPos==1);

	test(aVar.Find(*_S("aa"),kk1,aPos)==0);

	test(aPos==0);

	test(aVar.Find(*_S("wxyz"),kk,aPos)==0);

	test(aPos==5);

	test(aVar.Find(*_S("fgh"),kk,aPos)!=0);		// Returns !=0 if string not found.

	test(aPos==6);								// Not present in list, aPos set to last position

	test(aVar.Find(*_S("ffff"),kk,aPos)==0);	

	test(aPos==2);

	test(aVar.Find(*_S("lmn"),kk,aPos)==0);

	test(aPos==4);

	test(aVar.FindIsq(*_S("abc"),kk,aPos)==0);

	test(aPos==1);

	test(aVar.FindIsq(*_S("aa"),kk1,aPos)==0);

	test(aPos==0);

	test(aVar.FindIsq(*_S("wxyz"),kk,aPos)==0);

	test(aPos==5);

	test(aVar.FindIsq(*_S("fgh"),kk,aPos)!=0);	// Returns result of last test

	test(aPos==4);		  // Not present in list, aPos set to last position tested

	TBuf<0x10> buf7=_L("fgh");

	test(aVar.InsertIsqL(*(TText*)buf7.Ptr(),buf7.Size(),kk)==4);

	test(aVar.FindIsq(*_S("fgh"),kk,aPos)==0);	// Returns result of last test

	test(aPos==4);

	test(aVar.FindIsq(*_S("ffff"),kk,aPos)==0);

	test(aPos==3);

	test(aVar.FindIsq(*_S("lmn"),kk,aPos)==0);

	test(aPos==5); 

	}

LOCAL_C void test3(CArrayVar<TInt>& aVar)

	{

	test.Next(_L("InsertIsqL"));

	TKeyArrayVar kk(0,ECmpTInt);

	TInt pos=0;

	TInt mod=47;

	TInt inc=23;

	TInt i=0;	

	FOREVER

		{

		TInt ret;

		if (i&1)

			TRAP(ret,aVar.InsertIsqL(i,sizeof(TInt),kk))

		else

			{

			TRAP(ret,pos=aVar.InsertIsqL(i,sizeof(TInt),kk))

			if (ret==KErrNone)

				test(aVar[pos]==i);

			}

		if (ret==KErrAlreadyExists)

			break;

		i=(i+inc)%mod;

		}

	for(i=0;i<mod;i++)

		{

		pos=(-1);

		test(aVar.FindIsq(i,kk,pos)==0);

		test(pos==i);

		TRAPD(r,aVar.InsertIsqL(i,sizeof(TInt),kk))

		test(r==KErrAlreadyExists);

		}

	}

GLDEF_C TInt E32Main()

//

// Test the variable record length array classes.

//

    {

	test.Title();

	__UHEAP_MARK;

	test.Start(_L("class CArrayFixFlat"));

//

	CArrayVarFlat<TText>* pVarFlat=new CArrayVarFlat<TText>(KTestGranularity);

	if (pVarFlat==NULL)

		test.Panic(_L("Allocating array"));

    testAllMethods(*pVarFlat);

    delete pVarFlat;

//

	CArrayVarFlat<TText>* pVarFlatChar=new CArrayVarFlat<TText>(KTestGranularity);

	test1(*pVarFlatChar);

	delete pVarFlatChar; 

//		

	CArrayVarFlat<TText>* pVarFlatArr=new CArrayVarFlat<TText>(KTestGranularity);

	test2(*pVarFlatArr);

	delete pVarFlatArr;

//

	CArrayVarFlat<TInt>* pVarFlatInt=new CArrayVarFlat<TInt>(KTestGranularity);

	test3(*pVarFlatInt);

	delete pVarFlatInt;

//	

	test.Next(_L("class CArrayVarSeg"));

	CArrayVarSeg<TText>* pVarSeg=new CArrayVarSeg<TText>(KTestGranularity);

	if (pVarSeg==NULL)

		test.Panic(_L("Allocating array"));

	testAllMethods(*pVarSeg);

	delete pVarSeg;

//

	CArrayVarSeg<TText>* pVarSegChar=new CArrayVarSeg<TText>(KTestGranularity);

	test1(*pVarSegChar);

	delete pVarSegChar;

//		

	CArrayVarSeg<TText>* pVarSegArr=new CArrayVarSeg<TText>(KTestGranularity);

	test2(*pVarSegArr);

	delete pVarSegArr;

//

	CArrayVarSeg<TInt>* pVarSegInt=new CArrayVarSeg<TInt>(KTestGranularity);

	test3(*pVarSegInt);

	delete pVarSegInt;

//

	test.End();

	__UHEAP_MARKEND;

	return(0);

    }