// Copyright (c) 1998-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:

// e32test\misc\t_mem.cpp

// 

//

#include <e32test.h>

#include "u32std.h"

#include "../misc/prbs.h"

RTest test(_L("T_MEM"));

TInt E32Main()

	{

	test.Title();

	test.Start(_L("Create chunk"));

	TMemoryInfoV1 minfo;

	TPckg<TMemoryInfoV1> infoPckg(minfo);

	TInt r = UserHal::MemoryInfo(infoPckg);

	test(r==KErrNone);

	test.Printf(_L("MaxFree = %08x\n"), minfo.iMaxFreeRamInBytes);

	test.Printf(_L("Free = %08x\n"), minfo.iFreeRamInBytes);

	TInt overhead = ((minfo.iFreeRamInBytes + 0x003FFFFF)>>22)<<12;

	test.Printf(_L("Overhead = %08x\n"), overhead);

	TInt size = Min(minfo.iFreeRamInBytes-0x00100000, minfo.iFreeRamInBytes-overhead);

	test.Printf(_L("Initial = %08x\n"), size);

	RChunk c;

	r=c.CreateLocal(size, minfo.iFreeRamInBytes);

	test(r==KErrNone);

	while (r==KErrNone)

		{

		r = c.Adjust(size + 0x1000);

		if (r==KErrNone)

			size += 0x1000;

		};

	test.Printf(_L("Final = %08x\n"), size);

	TUint seed[2];

	seed[0]=User::NTickCount();

	seed[1]=0;

	TUint8* p=c.Base();

	test.Printf(_L("Chunk Base %08x\n"),p);

	Mem::FillZ(p,size);

	TInt sizepg = size>>12;

	TUint iterations = 0;

	FOREVER

		{

		TUint x=Random(seed);

		x%=TUint(sizepg);

		TInt offset=x<<12;

		TUint init=Random(seed);

		TUint seed2[2];

		seed2[0]=init;

		seed2[1]=0;

		TUint* pW=(TUint*)(p+offset);

		*pW++=init;

		TInt i;

		for (i=1; i<1024; i++)

			*pW++=Random(seed2);

		TInt j;

		for (j=0; j<19; j++)

			{

			x=Random(seed);

			x%=TUint(sizepg);

			offset=x<<12;

			pW=(TUint*)(p+offset);

			seed2[0]=*pW++;

			seed2[1]=0;

			for (i=1; i<1024; i++)

				{

				TUint actual=*pW++;

				TUint expected=Random(seed2);

				TUint diff = actual ^ expected;

				if (diff)

					{

					test.Printf(_L("Address %08x: Got %08x Expected %08x Diff %08x\n"),pW-1,actual,expected,diff);

					pW[-1] = expected;

//					test.Getch();

//					test(0);

					}

				}

			}

		++iterations;

		if ((iterations & 0x3ff)==0)

			test.Printf(_L("%u\n"),iterations);

		}

	}