--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/kerneltest/e32test/misc/t_mem.cpp	Mon Oct 19 15:55:17 2009 +0100
@@ -0,0 +1,98 @@
+// 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);
+		}
+	}