// Copyright (c) 1996-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\pccd\t_media.cpp

// Test the Compact Flash card (ATA) media driver

// 

//

#include <e32test.h>

#include <e32svr.h>

#include "u32std.h"

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

const TInt KSectorSize=512;

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

LOCAL_D TBusLocalDrive TheDrive;

LOCAL_D TBool MediaChange=EFalse;

LOCAL_D TUint Seed[2];

LOCAL_D TUint8 Background1[64*KSectorSize];

LOCAL_D TUint8 Background2[64*KSectorSize];

LOCAL_D TUint8 Foreground1[64*KSectorSize];

LOCAL_D TUint8 Foreground2[64*KSectorSize];

LOCAL_D TUint8 VerifyBuffer[64*KSectorSize];

inline TUint RoundDownToSector(TUint aPos)

	{ return aPos&~0x1ff; }

inline TUint RoundUpToSector(TUint aPos)

	{ return (aPos+0x1ff)&~0x1ff; }

LOCAL_C void TestPattern(TUint8* aBuf, TInt aLength)

	{

	while(aLength--)

		*aBuf++=(TUint8)Random(Seed);

	}

LOCAL_C void Write(TUint aPos, TInt aLength, const TUint8* aBuffer)

	{

	TPtrC8 p(aBuffer,aLength);

	TInt r=TheDrive.Write(aPos,p);

	if (r!=KErrNone)

		{

		test.Printf(_L("Write failed with error %d\n"),r);

		test.Printf(_L("Pos=%08x, Length=%x\n"),aPos,aLength);

		test(0);

		}

	}

LOCAL_C void DebugDump(TUint aPos, TInt aLength, const TUint8* aBuf, const TDesC& aTitle)

	{

	RDebug::Print(aTitle);

	TUint end=aPos+aLength;

	TInt i;

	TInt j=0;

	while(aPos<end)

		{

		TBuf<80> buf;

		buf.NumFixedWidthUC(aPos,EHex,8);

		buf+=_L(": ");

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

			{

			buf.AppendNumFixedWidthUC(aBuf[j+i],EHex,2);

			buf+=_L(" ");

			}

		RDebug::Print(buf);

		aPos+=16;

		j+=16;

		if ((aPos&(KSectorSize-1))==0)

			RDebug::Print(_L(""));

		}

	}

LOCAL_C void Verify(TUint aPos, TInt aLength, const TUint8* aRef)

	{

	TPtr8 p(VerifyBuffer,0,64*KSectorSize);

	TInt r=TheDrive.Read(aPos,aLength,p);

	if (r!=KErrNone)

		{

		test.Printf(_L("Read failed with error %d\n"),r);

		test.Printf(_L("Pos=%08x, Length=%x\n"),aPos,aLength);

		test(0);

		}

	if (p.Length()!=aLength)

		{

		test.Printf(_L("Incorrect length after read: Was %08x Expected %08x\n"),p.Length(),aLength);

		test.Printf(_L("Pos=%08x, Length=%x\n"),aPos,aLength);

		test(0);

		}

	r=Mem::Compare(VerifyBuffer,aLength,aRef,aLength);

	if (r==0)

		return;

	TInt i=0;

	while(i<aLength && VerifyBuffer[i]==aRef[i])

		i++;

	test.Printf(_L("Verify error: aPos=%08x, aLength=%08x\n"),aPos,aLength);

	test.Printf(_L("First difference at offset %x\n"),i);

	test.Printf(_L("Press <ENTER> for debug dump "));

	TInt k=test.Getch();

	if (k==EKeyEnter)

		{

		DebugDump(aPos,aLength,VerifyBuffer,_L("Actual:"));

		DebugDump(aPos,aLength,aRef,_L("Expected:"));

		}

	test(0);

	}

LOCAL_C void DoTest(TUint aBasePos, TInt anOffset, TInt aSize)

	{

	TBuf<80> buf;

	buf.Format(_L("Offset %3x Size %04x"),anOffset,aSize);

	test.Next(buf);

	TUint block1=aBasePos;

	TUint block2=aBasePos+64*KSectorSize;

	TUint totalSectorSize=RoundUpToSector(anOffset+aSize);

	TestPattern(Background1,totalSectorSize);

	TestPattern(Background2,totalSectorSize);

	TestPattern(Foreground1,totalSectorSize);

	TestPattern(Foreground2,totalSectorSize);

	Write(block1,totalSectorSize,Background1);

	Write(block2,totalSectorSize,Background2);

	Verify(block1,totalSectorSize,Background1);

	Verify(block2,totalSectorSize,Background2);

	Write(block1+anOffset,aSize,Foreground1);

	Write(block2+anOffset,aSize,Foreground2);

	Mem::Copy(Background1+anOffset,Foreground1,aSize);

	Mem::Copy(Background2+anOffset,Foreground2,aSize);

	Verify(block1,totalSectorSize,Background1);

	Verify(block2,totalSectorSize,Background2);

	}

GLDEF_C TInt E32Main()

	{

	Seed[0]=0xadf85458;

	Seed[1]=0;

	test.Title();

	TChar driveToTest;

	// Get the list of drives

	TDriveInfoV1Buf diBuf;

	UserHal::DriveInfo(diBuf);

	TDriveInfoV1 &di=diBuf();

	TInt driveCount = di.iTotalSupportedDrives;

	test.Printf(_L("\nDRIVES USED AT PRESENT :\r\n"));

	for (TInt i=0; i < driveCount; i++)

		{

		TBool flag=EFalse;

		RLocalDrive d;

		TInt r=d.Connect(i,flag);

		//Not all the drives are used at present

		if (r == KErrNotSupported)

			continue;

		test.Printf(_L("%d : DRIVE NAME  :%- 16S\r\n"), i, &di.iDriveName[i]);

		}

	test.Printf(_L("\n<<<Hit required drive number to continue>>>\r\n"));

	driveToTest=(TUint)test.Getch();

	TInt driveNumber=((TUint)driveToTest) - '0';

	TBuf<0x100> buf;

	buf.Format(_L("Connect to local drive (%d)"),driveNumber);

	test.Start(buf);

	TInt r=TheDrive.Connect(driveNumber,MediaChange);

	test(r==KErrNone);

	test.Next(_L("Get capabilities"));

	TLocalDriveCapsV2 driveCaps;

	TPckg<TLocalDriveCapsV2> capsPckg(driveCaps);

	r=TheDrive.Caps(capsPckg);

	test(r==KErrNone);

	TUint driveSize=I64LOW(driveCaps.iSize);

	test.Printf(_L("Drive size       = %08x (%dK)\n"),driveSize,driveSize>>10);

	test.Printf(_L("Media type       = %d\n"),driveCaps.iType);

	test.Printf(_L("Connection Bus   = %d\n"),driveCaps.iConnectionBusType);

	test.Printf(_L("Drive attributes = %08x\n"),driveCaps.iDriveAtt);

	test.Printf(_L("Media attributes = %08x\n"),driveCaps.iMediaAtt);

	test.Printf(_L("Base address     = %08x\n"),driveCaps.iBaseAddress);

	test.Printf(_L("File system ID   = %08x\n"),driveCaps.iFileSystemId);

	test.Printf(_L("Hidden sectors   = %08x\n"),driveCaps.iHiddenSectors);

	test.Printf(_L("Press any key...\n"));

	test.Getch();

	TUint basePos=RoundDownToSector(driveSize)-128*KSectorSize;

	test.Printf(_L("Base position    = %08x\n"),basePos);

	TInt offset;

	TInt size;

	for (size=KSectorSize/4; size<=23*KSectorSize/2; size+=KSectorSize/4)

		{

		for (offset=0; offset<KSectorSize; offset+=KSectorSize/2)

			{

			DoTest(basePos,offset,size);

			}

		}

	for (size=12*KSectorSize; size<=33*KSectorSize; size+=KSectorSize/2)

		{

		for (offset=0; offset<KSectorSize; offset+=KSectorSize/2)

			{

			DoTest(basePos,offset,size);

			}

		}

	buf.Format(_L("Disconnect from local drive (%d)"),driveNumber);

	test.Next(buf);

	TheDrive.Disconnect();

	test.End();

	return 0;

	}