// Copyright (c) 1995-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\mmu\t_chunk2.cpp

 // Overview:

 // Test RChunk class

 // API Information:

 // RChunk

 // Details:

 // - Test creating local chunks and moving chunks home address, verify

 // results are as expected.

 // - Create numerous local chunks, test allocating more space by 

 // adjusting chunk size, check for allocation failure, verify results 

 // are as expected.

 // Platforms/Drives/Compatibility:

 // All.

 // Assumptions/Requirement/Pre-requisites:

 // Failures and causes:

 // Base Port information:

 // 

 //

 #define __E32TEST_EXTENSION__

 #include <e32test.h>

 #include <e32hal.h>

 #include <e32panic.h>

 #include "mmudetect.h"

 #include "d_gobble.h"

 #include "freeram.h"

 TInt GlobalValue=299792458;

 TInt *GlobalPtr=&GlobalValue;

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

 LOCAL_D RTest t(_L("ShareThread"));

 LOCAL_D RChunk gChunk;

 LOCAL_D TPtr nullPtr(NULL,0);

 LOCAL_C void TestAllocFailure(RChunk& c1, RChunk& c2)

 	{

 	TInt free=FreeRam();

 	test.Printf(_L("Free RAM %dK\n"),free/1024);

 	TInt size1=free-0x80000;	// 512K less than available

 	TInt size2=0xFF000;			// 255 pages

 	test.Printf(_L("Adjusting chunk 1 to size %dK\n"),size1/1024);

 	TInt r=c1.Adjust(size1);

 	test(r==KErrNone);

 	test.Printf(_L("Attempting to adjust chunk 2 to size %dK\n"),size2/1024);

 	r=c2.Adjust(size2);

 	test(r==KErrNoMemory);

 	TInt size3=FreeRam();

 	test.Printf(_L("Attempting to adjust chunk 2 to size %dK\n"),size3/1024);

 	r=c2.Adjust(size3);

 	TInt free2=FreeRam();

 	if (r==KErrNone)

 		{

 		test.Printf(_L("Succeeded - free RAM now %dK\n"),free2/1024);

 		test.Printf(_L("Freeing chunk 2\n"));

 		r=c2.Adjust(0);

 		test(r==KErrNone);

 		}

 	else

 		test.Printf(_L("Failed - free RAM now %dK\n"),free2/1024);

 	test.Printf(_L("Freeing chunk 1\n"));

 	r=c1.Adjust(0);

 	test(r==KErrNone);

 	test.Printf(_L("Checking free RAM\n"));

 	UserSvr::HalFunction(EHalGroupKernel, EKernelHalSupervisorBarrier, 0, 0);

 	free2=FreeRam();

 	test.Printf(_L("Free RAM %dK\n"),free2/1024);

 	test(free==free2);

 	}

 void TestInterleavedAlloc()

 	{

 	TInt pageSize;

 	RChunk c1;

 	RChunk c2;

 	TInt r;

 	r=UserHal::PageSizeInBytes(pageSize);

 	test(r==KErrNone);

 	r=c1.CreateLocal(0,0x100000);

 	test(r==KErrNone);

 	r=c2.CreateLocal(0,0x100000);

 	test(r==KErrNone);

 	TInt step;

 	for (step=1; step<=32; ++step)

 		{

 		test.Printf(_L("Step size %x\n"),step*pageSize);

 		while (c1.Size()<64*pageSize)

 			{

 			r=c1.Adjust(c1.Size()+step*pageSize);

 			test(r==KErrNone);

 			r=c2.Adjust(c2.Size()+step*pageSize);

 			test(r==KErrNone);

 			}

 		c1.Adjust(0);

 		c2.Adjust(0);

 		}

 	c1.Close();

 	c2.Close();

 	}

 TInt E32Main()

 //

 //	Test RChunk class

 //

 	{

 	test.Title();

 	if (!HaveVirtMem())

 		{

 		test.Printf(_L("This test requires an MMU\n"));

 		return KErrNone;

 		}

 	TestInterleavedAlloc();

 	test.Start(_L("Test moving chunks home addresses"));

 	test.Printf(_L("GlobalValue=%d\n"),*GlobalPtr);

 	++*GlobalPtr;

 	test.Printf(_L("GlobalValue=%d\n"),GlobalValue);

 	test.Next(_L("Load gobbler LDD"));

 	TInt r = User::LoadLogicalDevice(KGobblerLddFileName);

 	test(r==KErrNone || r==KErrAlreadyExists);

 	RGobbler gobbler;

 	r = gobbler.Open();

 	test(r==KErrNone);

 	TUint32 taken = gobbler.GobbleRAM(128*1024*1024);

 	test.Printf(_L("Gobbled: %dK\n"), taken/1024);

 	TInt free=FreeRam();

 	test.Printf(_L("Free RAM 0x%08X bytes\n"),free);

 	RChunk chunk1;

 	r=chunk1.CreateLocal(0x400,0x800000);

 	test (r==KErrNone);

 	TInt i;

 	TInt *p=(TInt*)chunk1.Base();

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

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

 		*p++=i*i+41;

 	RChunk chunk2;

 	r=chunk2.CreateLocal(0x400,0x800000);

 	test (r==KErrNone);

 	TInt *p2=(TInt*)chunk2.Base();

 	test.Printf(_L("Chunk 2 Base %08X\n"),p2);

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

 		*p2++=i*i*i+487;

 	r=chunk1.Adjust(0x120000);

 	test (r==KErrNone);

 	for (i=0x100; i<0x48000; i++)

 		*p++=i*i+41;

 	r=chunk2.Adjust(0x120000);

 	test (r==KErrNone);

 	for (i=0x100; i<0x48000; i++)

 		*p2++=i*i*i+487;

 	p=(TInt*)chunk1.Base();

 	p2=(TInt*)chunk2.Base();

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

 		{

 		TInt read1=*p++;

 		TInt read2=*p2++;

 		if (read1 != (i*i+41))

 			{

 			test.Printf(_L("Chunk 1 i=%X, read %08X expected %08X\n"),i,read1,i*i+41);

 			//test.Getch();

 			}

 		if (read2 != (i*i*i+487))

 			{

 			test.Printf(_L("Chunk 2 i=%X, read %08X expected %08X\n"),i,read2,i*i*i+487);

 			//test.Getch();

 			}

 		}

 	chunk1.Close();

 	chunk2.Close();

 	TInt free2=FreeRam();

 	test.Printf(_L("Free RAM 0x%08X bytes\n"),free2);

 	test(free2==free);

 	// Chunks must not be paged otherwise they will not effect the amount 

 	// of free ram reported plus on h4 swap size is less than the total ram.

 	TChunkCreateInfo createInfo;

 	createInfo.SetNormal(0, free+2097152);

 	createInfo.SetPaging(TChunkCreateInfo::EUnpaged);

 	RChunk c1;

 	test_KErrNone(c1.Create(createInfo));

 	createInfo.SetNormal(0, 0x1000000);

 	RChunk c2;

 	RChunk c3;

 	RChunk c4;

 	RChunk c5;

 	RChunk c6;

 	test_KErrNone(c2.Create(createInfo));

 	test_KErrNone(c3.Create(createInfo));

 	test_KErrNone(c4.Create(createInfo));

 	test_KErrNone(c5.Create(createInfo));

 	test_KErrNone(c6.Create(createInfo));

 	TestAllocFailure(c1,c2);

 	r=c3.Adjust(1024);

 	test(r==KErrNone);

 	TestAllocFailure(c1,c2);

 	r=c4.Adjust(1024);

 	test(r==KErrNone);

 	TestAllocFailure(c1,c2);

 	r=c5.Adjust(1024);

 	test(r==KErrNone);

 	TestAllocFailure(c1,c2);

 	r=c6.Adjust(1024);

 	test(r==KErrNone);

 	TestAllocFailure(c1,c2);

 	c1.Close();

 	c2.Close();

 	c3.Close();

 	c4.Close();

 	c5.Close();

 	c6.Close();

 	gobbler.Close();

 	test.End();

 	test.Close();

 	return(KErrNone);

 	}