// Copyright (c) 2003-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:

// Variable and Label Storage/Retrieval

// 

//

/**

 @file Svarlab.cpp 

*/

#include "SVARLAB.H"

#include "ND_STD.H"

#include "SSCRREAD.H"

_LIT(KIntegerVariableString,"%d");

const TInt KLabelArrayGranularity=10;

const TInt KVarArrayGranularity=20;

const TInt KVarValueLength=15;

// CScriptLabelMan definitions 

CScriptLabelMan* CScriptLabelMan::NewL()

/**

2 phased constructor for CScriptLabelMan, first phase.

@exception Leaves if ConstructL() leaves, or not enough memory is available.

@return a new CScriptLabelMan object.

*/

	{

	CScriptLabelMan* m=new(ELeave) CScriptLabelMan();

	CleanupStack::PushL(m);

	m->ConstructL();

	CleanupStack::Pop();

	return m;

	}

CScriptLabelMan::CScriptLabelMan()

/**

Constructor for CScriptReader, used in the first phase of construction.

*/

	{}

void CScriptLabelMan::ConstructL()

/**

Instantiate member variables.

*/

	{

	iLabelArray=new(ELeave) CArrayFixFlat<TLabel>(KLabelArrayGranularity);

	}

CScriptLabelMan::~CScriptLabelMan()

/**

Destructor.

Delete members.

*/

	{

	DeleteAll();

	delete iLabelArray;

	}

void CScriptLabelMan::AddLabelL(const TDesC& aLabelName,const TLinePosition& aPosition)

/**

Add a label with name aLabelName and position aPosition to the array if it is 

not already in the array.

@param aLabelName a reference to label name.

@param aPosition a reference to script position.

*/

	{

	if (aLabelName.Length()>KMaxLabelLength)

		User::Leave(KErrLabelNameTooLong);

	TLinePosition dummyPos;

	if (FindLabel(aLabelName,dummyPos)==KErrNotFound)

		{

		TLabel label;

		label.iName.CopyF(aLabelName);

		label.iPosition=aPosition;

		iLabelArray->AppendL(label);

		}

	else

		{

		// Encountered a label name that already exists - If it's

		// in EXACTLY the same place in the script as the existing

		// instance then it's actually the SAME label re-visited as

		// a result of executing a loop/branch operation, if it's in

		// a different place then it's an error in the script...

		if ((aPosition.iLineCount != dummyPos.iLineCount) ||

			(aPosition.iOffset != dummyPos.iOffset))

			{

			User::Leave(KErrAlreadyExists);

			}

		}

	}

TInt CScriptLabelMan::FindLabel(const TDesC& aLabelName,TLinePosition& aPosition)

/**

Find label with name aLabelName and set aPos to position and aLine to line.

@param aLabelName a reference to label name.

@param aPosition a reference to script position.

@return a KErrNone or KErrNotFound.

*/

	{

	TInt index;

	for (index=0; index<iLabelArray->Count(); index++)

		{

		if((*iLabelArray)[index].iName.CompareF(aLabelName)==0)

			{

			aPosition=(*iLabelArray)[index].iPosition;

			return KErrNone;

			}

		}

	return KErrNotFound;

	}

void CScriptLabelMan::DeleteAll()

/**

Delete all labels from the array

*/

	{

	if (!iLabelArray)

		return;

	TInt count=iLabelArray->Count();

	iLabelArray->Delete(0,count);

	}

// CScriptVarMan definitions 

CScriptVarMan* CScriptVarMan::NewL()

/**

2 phased constructor for CScriptVarMan, first phase.

@exception Leaves if ConstructL() leaves, or not enough memory is available.

@return a new CScriptVarMan object.

*/

	{

	CScriptVarMan* m=new(ELeave) CScriptVarMan();

	CleanupStack::PushL(m);

	m->ConstructL();

	CleanupStack::Pop();

	return m;

	}

CScriptVarMan::CScriptVarMan() 

/**

Constructor for CScriptReader, used in the first phase of construction.

*/

	{}

void CScriptVarMan::ConstructL()

/**

Instantiate member variables.

*/

	{

	iVarArray=new(ELeave) CArrayFixFlat<TVar>(KVarArrayGranularity);

	}

CScriptVarMan::~CScriptVarMan()

/**

Destructor.

Delete members.

*/

	{

	DeleteAll();

	delete iVarArray;

	}

void CScriptVarMan::AddVariableL(const TDesC& aName,const TDesC& aContent)

/**

Add variable with name aName and aContent to the array

@param aName a reference to variable name.

@param aContent a reference to content.

*/

	{

	if (aName.Length()>KMaxVarNameLength)

		User::Leave(KErrVariableNameTooLong);

	HBufC* contentCopy=HBufC::NewLC(aContent.Length());

	contentCopy->Des().Copy(aContent);

	TPtrC dummy;

	if (FindVariable(aName,dummy)==KErrNotFound)

		{

		TVar var;

		var.iContent=contentCopy;

		var.iName.CopyF(aName);

		iVarArray->AppendL(var);

		}

	else

		{	

		delete (*iVarArray)[iIndex].iContent;		// FindVariable() will have set iIndex correctly

		(*iVarArray)[iIndex].iContent=contentCopy;

		}

	CleanupStack::Pop();

	}

void CScriptVarMan::AddVariableL(const TDesC& aName,TInt aVal)

/**

Add variable with name aName and value aVal to the array

@param aName a reference to variable name.

@param aVal is variable value.

*/

	{

	TBuf<KVarValueLength> buf;

	buf.Format(KIntegerVariableString,aVal);

	AddVariableL(aName,buf);

	}

TInt CScriptVarMan::FindVariable(const TDesC& aName,TPtrC& aContent)

/**

Find variable with name aName and put its value in aContent

@param aName a reference to variable name.

@param aContent a reference to content.

@return a KErrNone or KErrNotFound.

*/

	{

	for (iIndex=0; iIndex<iVarArray->Count(); iIndex++)

		{

		if ((*iVarArray)[iIndex].iName.CompareF(aName)==0)

			{

			aContent.Set((*iVarArray)[iIndex].iContent->Des());

			return KErrNone;

			}

		}

	return KErrNotFound;

	}

void CScriptVarMan::DeleteAll()

/**

Delete all variables from the array

*/

	{

	if (!iVarArray)

		return;

	TInt i;

	for (i=0; i<iVarArray->Count(); i++)

		delete (*iVarArray)[i].iContent;

	iVarArray->Reset();

	}