// Copyright (c) 1999-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 "EmsMsgTestUtils.h"
#include <msgtestscripts.h>
#include <emsformatie.h>
#include <emsanimationie.h>
#include <emssoundie.h>
#include <emsuserpromptie.h>
#include <gsmumsg.h>
#include "emstestutils.h"


CEmsExtractor* CEmsExtractor::NewL(CScriptSection& aSection)
	{
	CEmsExtractor* retVal = NewLC(aSection);
	CleanupStack::Pop(retVal);

	return retVal;
	}
CEmsExtractor* CEmsExtractor::NewLC(CScriptSection& aSection)
	{
	CEmsExtractor* retVal = new (ELeave) CEmsExtractor;
	CleanupStack::PushL(retVal);
	retVal->ConstructL(aSection);

	return retVal;
	}

void CEmsExtractor::ConstructL(CScriptSection& aSection)
	{
	// create the vector of parsers
	iParsers.Append(new (ELeave) EmsFormatParser);
	iParsers.Append(new (ELeave) EmsUserSoundParser);
	iParsers.Append(new (ELeave) EmsPredefSoundParser);
	iParsers.Append(new (ELeave) EmsPicParser);
	iParsers.Append(new (ELeave) EmsAnimParser);
	iParsers.Append(new (ELeave) EmsPredefAnimParser);
	iParsers.Append(new (ELeave) EmsUserPromptParser);

	// For each of the different types of parsers, attempt
	// to extract the object information from the section
	for (TInt i = 0; i < iParsers.Count(); ++i)
		{
		iParsers[i]->ParseL(aSection, iEmsArray);
		}
	}
	
CEmsExtractor::~CEmsExtractor()
	{ 
	iEmsArray.ResetAndDestroy(); 
	iParsers.ResetAndDestroy();
	}

void CEmsExtractor::AddToMessageL(CSmsMessage& msg) const
	{
	for (TInt i = 0; i < iEmsArray.Count(); ++i)
		{
		msg.AddEMSInformationElementL(*iEmsArray[i]);
		}
	}

void EmsParser::ParseL(CScriptSection& aSection, 
					   RPointerArray<CEmsInformationElement>& aEmsArray) const
	{
	// Get the value for the specific tag
	TPtrC tagPtr(aSection.ItemValue(iTagName, KNullDesC));

	// Only proceed if our string is non-empty
	if (tagPtr.Length() > 0)
		{
		// Firstly, wrap the characters in a TLex object
		TLex input(tagPtr);

		// Now, extract the number of objects we are expecting
		TInt num = ExtractIntegerL(input);

		// Loop around 'n' times getting the start position and then calling
		// the specific processing function
		for (TInt i = 0; i < num; ++i)
			{
			TInt startPos = ExtractIntegerL(input);

			// call the virtual function to append a new ems object into the
			// array
			aEmsArray.Append(GetElementL(input, startPos));
			}
		}
	}

TInt EmsParser::ExtractIntegerL(TLex& aInput)
	{
	aInput.Mark();

	// Now, get the value
	TInt retVal;
	User::LeaveIfError(aInput.Val(retVal));

	// Skip any whitespaces
	aInput.SkipSpace();

	return retVal;
	}


CEmsInformationElement* EmsFormatParser::GetElementL(TLex& aInput, TInt aStartPos) const
	{
	// Firstly, extract all the necessary parameters
	TInt formatLength = ExtractIntegerL(aInput);
	TInt formatValue = ExtractIntegerL(aInput);

	// now, create the formatting object
	CEmsFormatIE* object = CEmsFormatIE::NewL();
	object->SetStartPosition(aStartPos);
	object->SetFormatLength(formatLength);
	object->SetAlignment(STATIC_CAST(CEmsFormatIE::TAlignment, formatValue & 0x03));
	object->SetFontSize(STATIC_CAST(CEmsFormatIE::TFontSize, (formatValue & 0x0C) >> 2));
	object->SetBold(formatValue & 0x10);
	object->SetItalic(formatValue & 0x20);
	object->SetUnderline(formatValue & 0x40);
	object->SetStrikethrough(formatValue & 0x80);

	// Return this object
	return object;
	}

CEmsInformationElement* EmsUserSoundParser::GetElementL(TLex& aInput, TInt aStartPos) const
	{
	TPtrC soundAlpha;

	// Extract the sound but leave there is none.
	User::LeaveIfError(CScriptFile::GetNextWord(aInput, ' ', soundAlpha));

	TInt length = soundAlpha.Length();

	// Otherwise, create a new HBuf with the sound length
	HBufC8* sound = HBufC8::NewLC(soundAlpha.Length());
	TPtr8 ptr(sound->Des());

	// Go through the soundAlpha and extract the sound bytes
	// (removing offset of 'a')
	for (TInt i = 0; i < length; ++i)
		{
		ptr.Append(STATIC_CAST(TUint8, soundAlpha[i]) - 'a');
		}

	// Create the sound object
	CEmsSoundIE* object = CEmsSoundIE::NewL(*sound);
	object->SetStartPosition(aStartPos);
	CleanupStack::PopAndDestroy(sound);

	return object;
	}

CEmsInformationElement* EmsPredefSoundParser::GetElementL(TLex& aInput, TInt aStartPos) const
	{
	TInt sndValue = ExtractIntegerL(aInput);

	CEmsPreDefSoundIE* object = CEmsPreDefSoundIE::NewL(
		STATIC_CAST(CEmsPreDefSoundIE::TPredefinedSound, sndValue));
	object->SetStartPosition(aStartPos);

	return object;
	}

CEmsInformationElement* EmsPicParser::GetElementL(TLex& aInput, TInt aStartPos) const
	{
	TInt picValue = ExtractIntegerL(aInput);

	// construct a picture from the index which was input
	CEmsPictureIE* object = EmsTestUtils::CreatePictureL(picValue);
	object->SetStartPosition(aStartPos);

	return object;
	}

CEmsInformationElement* EmsAnimParser::GetElementL(TLex& aInput, TInt aStartPos) const
	{
	TInt animValue = ExtractIntegerL(aInput);

	// construct a picture from the index which was input
	CEmsAnimationIE* object = EmsTestUtils::CreateAnimationL(animValue);
	object->SetStartPosition(aStartPos);

	return object;
	}

CEmsInformationElement* EmsPredefAnimParser::GetElementL(TLex& aInput, TInt aStartPos) const
	{
	TInt animValue = ExtractIntegerL(aInput);

	CEmsPreDefAnimationIE* object = CEmsPreDefAnimationIE::NewL(
		STATIC_CAST(CEmsPreDefAnimationIE::TAnimType, animValue));
	object->SetStartPosition(aStartPos);

	return object;
	}

CEmsInformationElement* EmsUserPromptParser::GetElementL(TLex& aInput, TInt aStartPos) const
	{	
	TInt objCount = ExtractIntegerL(aInput);

	CEmsUserPrompt* object = CEmsUserPrompt::NewL(objCount);
	object->SetStartPosition(aStartPos);
	return object;
	}