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

// All rights reserved.

// This component and the accompanying materials are made available

// under the terms of "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:

// Tests resource reader

// NB, prior to version 050 of BAFL, the resource compiler did not generate

// unicode text and so this code used to make a special 8/16 bit text

// comparison where appropriate and the resource binary file could be common

// between the 8 and 16-bit builds.  This is now no-longer the case, which means

// that the resource binary used for this text MUST be compiled as Unicode

// text for the unicode build and 8-bit text for the 8-bit build.

// - PNJ, January 1997.

// 

//

#include <e32std.h>

#include <e32base.h>

#include <e32test.h>

#include <f32file.h>

#include <barsc.h>

#include <barsread.h>

#include <barsread2.h>

#include <badesca.h>

#include <trsc.rsg>

#include "T_RSC.H"

RTest test(_L("T_RSREAD"));

RFs TheFs;

RResourceFile TheResourceFile;

_LIT(KPanicThread1,"panicThread1");

_LIT(KPanicThread2,"panicThread2");

_LIT(KPanicThread3,"panicThread3");

_LIT(KPanicThread4,"panicThread4");

class TRsReadTester

	{

public:

	void TestButtonL();

	void TestArrayL();

	void TestFlPtEdL();

	void TestMenuBarL();

    void TestAlignment1L();

    void TestAlignment2L();

    void TimingTestsL();

    TInt PanicTests();

private:

    void DumpBytes(const TAny* aPtr,TInt aLen);

    TUint8 DumpByte(TUint aVal);

    void CreateResourceReaderLC(TResourceReader& aReader,TInt aResourceId) const;

    void PanicTResImp1();

    void PanicTResImp2();

    void PanicTResImp3();

    void PanicTResImp4();

	};

void TRsReadTester::CreateResourceReaderLC(TResourceReader& aReader,TInt aResourceId) const

    {

    HBufC8* resource=TheResourceFile.AllocReadLC(aResourceId);

    aReader.SetBuffer(resource);

    }

/**

@SYMTestCaseID          SYSLIB-BAFL-CT-0433

@SYMTestCaseDesc        Tests for TResourceReader::ReadInt16(),TResourceReader::ReadUint16() functions

@SYMTestPriority        Medium

@SYMTestActions         Attempt to read a BUTTON resource

@SYMTestExpectedResults Tests must not fail

@SYMREQ                 REQ0000

*/

void TRsReadTester::TestButtonL()

	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-CT-0433 Test reading BUTTON resource "));

    TResourceReader reader;

    CreateResourceReaderLC(reader,SYS_BUTTON_ONE);

    test(reader.ReadInt16()==3);

    test(reader.ReadUint16()==5);

    TPtrC ptr=reader.ReadTPtrC();

    test(ptr==_L("Text"));

    ptr.Set(reader.ReadTPtrC());

    test(ptr.Length()==0);

    HBufC* hBuf=reader.ReadHBufCL();

    test(*hBuf==_L("Bitmap placeholder"));

    delete(hBuf);

    CleanupStack::PopAndDestroy();

	}

/**

@SYMTestCaseID          SYSLIB-BAFL-CT-0434

@SYMTestCaseDesc        Tests for TResourceReader::ReadDesCArrayL() function

@SYMTestPriority        Medium

@SYMTestActions         Attempt to read an array resource

@SYMTestExpectedResults Tests must not fail

@SYMREQ                 REQ0000

*/

void TRsReadTester::TestArrayL()

	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-CT-0434 Test reading ARRAY resource "));

    TResourceReader reader;

    CreateResourceReaderLC(reader,SYS_ARRAY_ONE);

    CDesCArray* desArray=reader.ReadDesCArrayL();

    CleanupStack::PopAndDestroy();

    test(desArray->Count()==5);

    test((*desArray)[0]==_L("Esc"));

    test((*desArray)[1]==_L("Enter"));

    test((*desArray)[2]==_L("Tab"));

    test((*desArray)[3]==_L("Del"));

    test((*desArray)[4]==_L("Space"));

    delete(desArray);

	}

/**

@SYMTestCaseID          SYSLIB-BAFL-CT-0435

@SYMTestCaseDesc        Tests for TResourceReader::ReadInt16(),TResourceReader::ReadInt64() function

@SYMTestPriority        High

@SYMTestActions         Attempt for reading FLPTED resource

@SYMTestExpectedResults Tests must not fail

@SYMREQ                 REQ0000

*/

void TRsReadTester::TestFlPtEdL()

	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-CT-0435 Test reading FLPTED resource "));

    TResourceReader reader;

    CreateResourceReaderLC(reader,SYS_FLPTED_ONE);

    test(reader.ReadInt16()==18);

    TReal little=reader.ReadReal64();

    test(little==0.0);

    TReal big=reader.ReadReal64();

    test(big>9.89e99);

    test(big<9.91e99);

    CleanupStack::PopAndDestroy(1);

	}

/**

@SYMTestCaseID          SYSLIB-BAFL-CT-0436

@SYMTestCaseDesc        TResourceReader class functionality test

						Test for TResourceReader::ReadInt32 (),TResourceReader::ReadTPtrC() functions

@SYMTestPriority        High

@SYMTestActions         Attempt for reading MENU_BAR resource

@SYMTestExpectedResults Tests must not fail

@SYMREQ                 REQ0000

*/

void TRsReadTester::TestMenuBarL()

	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-CT-0436 Test reading MENU_BAR resource "));

    TResourceReader reader;

    CreateResourceReaderLC(reader,SYS_MENUBAR_ONE);

    test(reader.ReadInt16()==8); // how many items following

    TPtrC ref=_L("abcdefgh");

    for (TInt ii=1; ii<=8; ii++)

        {

        test(reader.ReadInt32()==ii);

        test(reader.ReadTPtrC()==ref.Left(ii));

        }

    CleanupStack::PopAndDestroy(1);

	}

TInt horrors[] = {

	SYS_ALIGNMENT_HORROR0, SYS_ALIGNMENT_HORROR1,

	SYS_ALIGNMENT_HORROR2, SYS_ALIGNMENT_HORROR3,

	0

	};

/**

@SYMTestCaseID          SYSLIB-BAFL-CT-0437

@SYMTestCaseDesc        Reading ALIGNMENT_HORROR resources test

                        Test for TResourceReader::ReadTPtrC8(),TResourceReader::ReadTPtrC16() function

@SYMTestPriority        High

@SYMTestActions         Tests for reading descriptors and checks for alignment

@SYMTestExpectedResults Tests must not fail

@SYMREQ                 REQ0000

*/

void TRsReadTester::TestAlignment1L()

	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-CT-0437 Test reading ALIGNMENT_HORROR resources "));

	TPtrC8  ref8 =_L8("xyz");

	TPtrC16 ref16=_L16("xyz");

    TResourceReader reader;

	for (TInt rr=0; horrors[rr]!=0; rr++)

		{

		CreateResourceReaderLC(reader,horrors[rr]);

		test(reader.ReadTPtrC8() ==ref8.Left(rr));

		test(reader.ReadTPtrC16()==ref16.Left(rr));

		CleanupStack::PopAndDestroy(1);

		}

	}

/**

@SYMTestCaseID          SYSLIB-BAFL-CT-0438

@SYMTestCaseDesc        Reading ALIGNMENT_HORROR_ARRAY resource test

@SYMTestPriority        High

@SYMTestActions         Tests for reading descriptors and checks for alignment

@SYMTestExpectedResults Tests must not fail

@SYMREQ                 REQ0000

*/

void TRsReadTester::TestAlignment2L()

	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-CT-0438 Test reading ALIGNMENT_HORROR_ARRAY resource "));

    TResourceReader reader;

    CreateResourceReaderLC(reader,SYS_ALIGNMENT_HORROR_ARRAY);

    test(reader.ReadInt16()==7); // how many items following

    TPtrC8  ref8 =_L8("abcdef");

    TPtrC16 ref16=_L16("abcdef");

    for (TInt ii=0; ii<=6; ii++)

        {

        test(reader.ReadTPtrC8() ==ref8.Left(ii));

        test(reader.ReadTPtrC16()==ref16.Mid(ii));

        }

    CleanupStack::PopAndDestroy(1);

	}

/**

@SYMTestCaseID          SYSLIB-BAFL-CT-0439

@SYMTestCaseDesc        Timing Tests

@SYMTestPriority        High

@SYMTestActions         Check for the time loads needed to repeatedly load a resource

@SYMTestExpectedResults Tests must not fail

@SYMREQ                 REQ0000

*/

void TRsReadTester::TimingTestsL()

	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-CT-0439 Timing tests "));

	test.Next(_L("BUTTON and FLPTED"));

	TUint time = User::TickCount();

	for (TInt ii=0; ii<100; ii++)

		{

    	TResourceReader reader;

    	CreateResourceReaderLC(reader,SYS_BUTTON_ONE);

	    CleanupStack::PopAndDestroy();

	    CreateResourceReaderLC(reader,SYS_FLPTED_ONE);

    	CleanupStack::PopAndDestroy();

		}

	time = User::TickCount() - time;

    test.Printf(_L("Time to load 100 times: %d\n"),time);

	test.Next(_L("BUTTON and ARRAY"));

	time = User::TickCount();

	for (TInt jj=0; jj<100; jj++)

		{

    	TResourceReader reader;

    	CreateResourceReaderLC(reader,SYS_BUTTON_ONE);

	    CleanupStack::PopAndDestroy();

	    CreateResourceReaderLC(reader,SYS_ARRAY_ONE);

    	CleanupStack::PopAndDestroy();

		}

	time = User::TickCount() - time;

    test.Printf(_L("Time to load 100 times: %d\n"),time);

	}

TUint8 TRsReadTester::DumpByte(TUint aVal)

    {

    return(aVal>9? TUint8(aVal-10+'a'): TUint8(aVal+'0'));

    }

void TRsReadTester::DumpBytes(const TAny* aPtr,TInt aLen)

    {

    TUint8* src=(TUint8*)aPtr;

    TBuf<100> whole;

    TUint8* tar=(TUint8*)whole.Ptr();

    TInt len=0;

    while (aLen--)

        {

        TUint val=(*src++);

        TUint top=val/16;

        TUint bottom=val%16;

        *tar++=DumpByte(top);

        *tar++=DumpByte(bottom);

        *tar++=' ';

        len+=3;

        }

    whole.SetLength(len);

    test.Printf(whole);

    test.Printf(_L("\r\n"));

    }

TInt ThreadFunc1(TAny*)

  	{

  	CTrapCleanup* cleanup=CTrapCleanup::New();

  	RResourceReader reader;

  	reader.Close();// iCurrentPtr=NULL

  	TRAPD(err,reader.AdvanceL(0));//calls TResourceReaderImpl::AdvanceL()

  	delete cleanup;

  	return err;

  	}

/**

@SYMTestCaseID          SYSLIB-BAFL-UT-1791

@SYMTestCaseDesc        Testing a panic on TResourceReaderImpl class(JustInTimeDebug is disabled)

@SYMTestPriority        Low

@SYMTestActions         Test that panics, when the condition inside __ASSERT is made false, by calling AdvanceL, after iCurrentPtr is made NULL using RResourceReader::close()

@SYMTestExpectedResults Test must panic

@SYMREQ                 REQ0000

*/

void TRsReadTester::PanicTResImp1()

  	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-UT-1791 "));

  	TRequestStatus threadStatus;

  	RThread thread1;

  	TInt rc;

  	rc = thread1.Create(KPanicThread1, ThreadFunc1,

  		KDefaultStackSize, KMinHeapSize, KMinHeapSize*4,NULL);

  	test(KErrNone == rc);

  	thread1.Logon(threadStatus);

  	thread1.Resume();

  	User::WaitForRequest(threadStatus);

  	test(thread1.ExitType() == EExitPanic);

  	thread1.Close();

  	}

TInt ThreadFunc2(TAny*)

	{

  	CTrapCleanup* cleanup=CTrapCleanup::New();

  	RResourceReader reader;

  	reader.Close();// iCurrentPtr=NULL

  	TRAPD(err,reader.ReadInt8L());//calls TResourceReaderImpl::ReadInt8L()

  	delete cleanup;

  	return err;

  	}

/**

@SYMTestCaseID          SYSLIB-BAFL-UT-1792

@SYMTestCaseDesc        Testing a panic on TResourceReaderImpl class(JustInTimeDebug is disabled)

@SYMTestPriority        Low

@SYMTestActions         Test that panics, when the condition inside __ASSERT is made false, by calling ReadInt8L, after iCurrentPtr is made NULL using RResourceReader::close()

@SYMTestExpectedResults Test must panic

@SYMREQ                 REQ0000

*/

void TRsReadTester::PanicTResImp2()

 	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-UT-1792 "));

  	TRequestStatus threadStatus;

  	RThread thread2;

  	TInt rc;

  	rc = thread2.Create(KPanicThread2, ThreadFunc2,

  		KDefaultStackSize, KMinHeapSize, KMinHeapSize*4,NULL);

 	test(KErrNone == rc);

  	thread2.Logon(threadStatus);

  	thread2.Resume();

  	User::WaitForRequest(threadStatus);

  	test(thread2.ExitType() == EExitPanic);

  	thread2.Close();

  	}

TInt ThreadFunc3(TAny*)

  	{

  	CTrapCleanup* cleanup=CTrapCleanup::New();

  	RResourceReader reader;

  	reader.Close();

  	TRAPD(err,reader.ReadTPtrC8L());//calls TResourceReaderImpl::ReadTPtrC8L()

  	delete cleanup;

  	return err;

  	}

/**

@SYMTestCaseID          SYSLIB-BAFL-UT-1793

@SYMTestCaseDesc        Testing a panic on TResourceReaderImpl class(JustInTimeDebug is disabled)

@SYMTestPriority        Low

@SYMTestActions         Test that panics, when the condition inside __ASSERT is made false, by calling ReadTPtrC8L, after iCurrentPtr is made NULL using RResourceReader::close()

@SYMTestExpectedResults Test must panic

@SYMREQ                 REQ0000

*/

void TRsReadTester::PanicTResImp3()

 	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-UT-1793 "));

  	TRequestStatus threadStatus;

  	RThread thread3;

  	TInt rc;

  	rc = thread3.Create(KPanicThread3, ThreadFunc3,

  		KDefaultStackSize, KMinHeapSize, KMinHeapSize*4,NULL);

  	test(KErrNone == rc);

  	thread3.Logon(threadStatus);

  	thread3.Resume();

  	User::WaitForRequest(threadStatus);

  	test(thread3.ExitType() == EExitPanic);

  	thread3.Close();

  	}

TInt ThreadFunc4(TAny*)

  	{

  	CTrapCleanup* cleanup=CTrapCleanup::New();

  	RResourceReader reader;

  	reader.Close();

  	TRAPD(err,reader.ReadUint8L());//calls TResourceReaderImpl::ReadUint8L()

  	delete cleanup;

  	return err;

  	}

/**

@SYMTestCaseID          SYSLIB-BAFL-UT-1794

@SYMTestCaseDesc        Testing a panic on TResourceReaderImpl class(JustInTimeDebug is disabled)

@SYMTestPriority        Low

@SYMTestActions         Test that panics, when the condition inside __ASSERT is made false, by calling ReadUint8L, after iCurrentPtr is made NULL using RResourceReader::close()

@SYMTestExpectedResults Test must panic

@SYMREQ                 REQ0000

*/

void TRsReadTester::PanicTResImp4()

 	{

	test.Next(_L(" @SYMTestCaseID:SYSLIB-BAFL-UT-1794 "));

 	TRequestStatus threadStatus;

  	RThread thread4;

  	TInt rc;

  	rc = thread4.Create(KPanicThread4, ThreadFunc4,

  		KDefaultStackSize, KMinHeapSize, KMinHeapSize*4,NULL);

  	test(KErrNone == rc);

  	thread4.Logon(threadStatus);

  	thread4.Resume();

  	User::WaitForRequest(threadStatus);

  	test(thread4.ExitType() == EExitPanic);

  	thread4.Close();

  	}

TInt TRsReadTester::PanicTests()

  	{

  	TBool jit;

  	jit = User::JustInTime();

  	User::SetJustInTime(EFalse);

  	//Tests for panics in TResourceReaderImpl class, through RResourceReader class

  	PanicTResImp1();

  	PanicTResImp2();

  	PanicTResImp3();

  	PanicTResImp4();

  	User::SetJustInTime(jit);

  	return KErrNone;

  	}

/**

@SYMTestCaseID          SYSLIB-BAFL-CT-0440

@SYMTestCaseDesc        Resource reader test

@SYMTestPriority        High

@SYMTestActions         Executes all the tests related to resource read

@SYMTestExpectedResults Tests must not fail

@SYMREQ                 REQ0000

*/

void RunTests()

    {

	test.Start(_L(" @SYMTestCaseID:SYSLIB-BAFL-CT-0440 Resource reader "));

    TheFs.Connect();

    TheResourceFile.OpenL(TheFs,KRomResourceFile);

	TRsReadTester lt;

	TRAPD(errCode, lt.TestButtonL());

	test(errCode==KErrNone);

	TRAP(errCode, lt.TestArrayL());

	test(errCode==KErrNone);

	TRAP(errCode, lt.TestFlPtEdL());

	test(errCode==KErrNone);

	TRAP(errCode, lt.TestMenuBarL());

	test(errCode==KErrNone);

	TRAP(errCode, lt.TestAlignment1L());

	test(errCode==KErrNone);

	TRAP(errCode, lt.TestAlignment2L());

	test(errCode==KErrNone);

    TRAP(errCode, lt.TimingTestsL());

	test(errCode==KErrNone);

    TheResourceFile.Close();

    //Test that raises panics

	test(KErrNone==lt.PanicTests());

    TheFs.Close();

	test.End();

	test.Close();

    }

TInt E32Main()

	{

	__UHEAP_MARK;

    CTrapCleanup *cleanup=CTrapCleanup::New();

	test.Title();

    TRAPD(err,RunTests());

	test(!err);

	test.Close();

    delete(cleanup);

	__UHEAP_MARKEND;

    return(0);

	}