/*
* 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: 
*
*/


#include "../sfields/FLDNUMS.H"
#include "T_ROMAN.h"

#define test(cond)											\
	{														\
	TBool __bb = (cond);									\
	TEST(__bb);												\
	if (!__bb)												\
		{													\
		ERR_PRINTF1(_L("ERROR: Test Failed"));				\
		User::Leave(1);										\
		}													\
	}

#define UNUSED_VAR(a) a = a

const TInt KTestCleanupStack=0x40;

LOCAL_D CTrapCleanup* TheTrapCleanup;

//

void CT_ROMAN::GetValue(HBufC* aBuf,TInt aDenery,TDeneryToCharBase& aNumeral)
	{
	TPtr ptr=aBuf->Des();
	TInt size=aNumeral.DeneryToChar(ptr,aDenery);
	if (size>0)
		{
		aBuf->ReAlloc(size);
		ptr=aBuf->Des();
		size = aNumeral.DeneryToChar(ptr,aDenery);
			test(size==KErrNone);
		}
	}


void CT_ROMAN::DisplayValue(HBufC* aBuf,TInt aDenery,TDeneryToCharBase& aNumeral)
	{
	GetValue(aBuf,aDenery,aNumeral);
	INFO_PRINTF2(_L("%D: "),aDenery);
	INFO_PRINTF1(*aBuf);
	INFO_PRINTF1(_L("\n"));
	}


void CT_ROMAN::test1()
	{
	INFO_PRINTF1(_L("Testing with buffer of adequate size"));
	INFO_PRINTF1(_L(" @SYMTestCaseID:SYSLIB-ETEXT-LEGACY-T_ROMAN-0001 "));
	HBufC* hbuf = HBufC::NewL(10); 
	CleanupStack::PushL(hbuf);
	TRomanNumeral roman;
	GetValue(hbuf,4,roman);
	TPtr buf = hbuf->Des();
		test(buf==_L("IV"));
	CleanupStack::PopAndDestroy();
	//
	INFO_PRINTF1(_L("Testing with inadequate buffer"));
	HBufC* minibuf = HBufC::NewL(1); 
	CleanupStack::PushL(minibuf);
	GetValue(minibuf,4,roman);
	TPtr buf2 = minibuf->Des();
		test(buf2==_L("IV"));
	CleanupStack::PopAndDestroy();
	}


void CT_ROMAN::test2()
	{
	INFO_PRINTF1(_L("Testing Roman numerals for a range of denery values"));
	HBufC* hbuf = HBufC::NewL(10); 
	CleanupStack::PushL(hbuf);
	TRomanNumeral roman;

	DisplayValue(hbuf,1,roman);
	test(0 == hbuf->CompareC(_L("i"), 1, 0));
	DisplayValue(hbuf,4,roman);
	test(0 == hbuf->CompareC(_L("iv"), 1, 0));
	DisplayValue(hbuf,9,roman);
	test(0 == hbuf->CompareC(_L("ix"), 1, 0));
	DisplayValue(hbuf,17,roman);
	test(0 == hbuf->CompareC(_L("xvii"), 1, 0));
	DisplayValue(hbuf,34,roman);
	test(0 == hbuf->CompareC(_L("xxxiv"), 1, 0));
	DisplayValue(hbuf,99,roman);
	test(0 == hbuf->CompareC(_L("xcix"), 1, 0));
	DisplayValue(hbuf,143,roman);
	test(0 == hbuf->CompareC(_L("cxliii"), 1, 0));
	DisplayValue(hbuf,1982,roman);
	test(0 == hbuf->CompareC(_L("mcmlxxxii"), 1, 0));

	CleanupStack::PopAndDestroy();
	}


void CT_ROMAN::test3()
	{
	INFO_PRINTF1(_L("Testing alphabetic numerals for a range of denery values"));
	HBufC* hbuf = HBufC::NewL(10); 
	CleanupStack::PushL(hbuf);
	TAlphabeticNumeral alpha;

	DisplayValue(hbuf,1,alpha);
	test(0 == hbuf->CompareC(_L("a"), 1, 0));
	DisplayValue(hbuf,4,alpha);
	test(0 == hbuf->CompareC(_L("d"), 1, 0));
	DisplayValue(hbuf,9,alpha);
	test(0 == hbuf->CompareC(_L("i"), 1, 0));
	DisplayValue(hbuf,17,alpha);
	test(0 == hbuf->CompareC(_L("q"), 1, 0));
	DisplayValue(hbuf,34,alpha);
	test(0 == hbuf->CompareC(_L("ah"), 1, 0));
	DisplayValue(hbuf,99,alpha);
	test(0 == hbuf->CompareC(_L("cu"), 1, 0));
	DisplayValue(hbuf,143,alpha);
	test(0 == hbuf->CompareC(_L("em"), 1, 0));
	DisplayValue(hbuf,1982,alpha);
	test(0 == hbuf->CompareC(_L("bxf"), 1, 0));

	CleanupStack::PopAndDestroy();
	}


void CT_ROMAN::runTests()
// Test the fields dll.
//
    {
	// test with HBufs both large enough and too small
	test1();

	// test for a range of denery values
	test2();

	// Test alphabetics 
	test3();
    }


void CT_ROMAN::setupCleanup()
//
// Initialise the cleanup stack.
//
    {

	TheTrapCleanup=CTrapCleanup::New();
	TRAPD(r,\
		{\
		for (TInt i=KTestCleanupStack;i>0;i--)\
			CleanupStack::PushL((TAny*)1);\
		test(r==KErrNone);\
		CleanupStack::Pop(KTestCleanupStack);\
		});
	}

CT_ROMAN::CT_ROMAN()
    {
    SetTestStepName(KTestStep_T_ROMAN);
    }

TVerdict CT_ROMAN::doTestStepL()
    {
	INFO_PRINTF1(_L("Testing denery to Roman numeral converter"));
    SetTestStepResult(EFail);

    __UHEAP_MARK;

	setupCleanup();
    
    TRAPD(error1, runTests());

	delete TheTrapCleanup;

    __UHEAP_MARKEND;

    if(error1 == KErrNone)
        {
        SetTestStepResult(EPass);
        }

    return TestStepResult();
    }