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

//

/**

 @file testscriptparser.cpp

 @internalComponent

*/

#include <e32base.h>

#include "testscriptparser.h"

#include "testlog.h"

CTestScriptParser* CTestScriptParser::FactoryLC( TDesC& aFile, CTestLog* aLog)

    {

	CTestScriptParser* p = NULL;

    p = new(ELeave) CTestScriptParser(aFile, aLog);

	CleanupStack::PushL(p);

	return p;

    }

CTestScriptParser::CTestScriptParser(TDesC& aFile, CTestLog* aLog) :

    iFile(aFile),

    iLog(aLog),

    iPtr(NULL, 0)

    {

    }

/**

*/

void CTestScriptParser::OpenScriptFileL()

{

	// Connect to file server

	//

	TAutoClose<RFs> fs;

	User::LeaveIfError(fs.iObj.Connect());

	fs.PushL();

	// Open file

	//

	TAutoClose<RFile> file;

	TInt size;

	User::LeaveIfError(file.iObj.Open(fs.iObj, iFile, EFileStreamText | EFileRead));

	file.PushL();

	// Get file size and read in

	//

	User::LeaveIfError(file.iObj.Size(size));

	TText* data = (TText*)User::AllocL(size);

	iPtr.Set(data, TUint(size)/sizeof(TText), TUint(size)/sizeof(TText));

	TPtr8 dest((TUint8*)data, 0, size);

	User::LeaveIfError(file.iObj.Read(dest));

	TUint8* ptr = (TUint8*)data;

	//

	// This is orderred as FEFF assuming the processor is Little Endian

	// The data in the file is FFFE.		PRR 28/9/98

	//

	if(size>=(TInt)sizeof(TText) && iPtr[0]==0xFEFF)

		{

		// UNICODE Text file so lose the FFFE

		Mem::Copy(ptr, ptr+sizeof(TText), size-sizeof(TText));

		iPtr.Set(data, TUint(size)/sizeof(TText)-1, TUint(size)/sizeof(TText)-1);

		}

	else if(size)

		{

		// NON-UNICODE so convert to UNICODE

		TText* newdata = (TText*)User::AllocL(size*sizeof(TText));

		iPtr.Set(newdata, size, size);

		TInt i;

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

			{

			iPtr[i]=ptr[i];

			}

		delete data;

		}

	iLex.Assign(iPtr);

	file.Pop();

	fs.Pop();

}

/**

*/

TBool CTestScriptParser::GetNextTestStepL(TScriptAction &runAction, TDes &params)

	{

    TBuf<256> stepAction;

    stepAction.Append(iLex.NextToken());

    runAction = ENoAction;

    if (stepAction.Compare(_L("//")) == 0)

        {

        runAction = ENoAction;

        }

    else if (stepAction.Compare(_L("RUN_PROGRAM")) == 0)

	    {

	    // Parse the input file and get the command line

    	runAction = ERunProgram;

	    }

    else if (stepAction.Compare(_L("RUN_TEST_STEP")) == 0)

	    {

    	runAction = ERunTestStep;

	    }

    else if ((stepAction.Compare(_L("PRINT")) == 0)  ||

		(stepAction.Compare(_L("START_TESTCASE")) == 0) ||

		(stepAction.Compare(_L("END_TESTCASE")) == 0))

    {

    	runAction = EPrint;

	    }

    else if (stepAction.Compare(_L("LOAD_SUITE")) == 0)

	    {

    	runAction = ELoadTestSuite;

	    }

    // Skip past any leading white spaces

   	iLex.SkipSpace();

    iLex.Mark();

    while(!iLex.Eos())

        {

        TChar peek = iLex.Peek();

        // Line is terminated with a carriage return or line feed

        if((peek == '\n') || (peek == '\r'))

            {

            break;

            }

           else

       	    {

       	    iLex.Inc();

       	    }

        }

    params.Append(iLex.MarkedToken());

    return iLex.Eos();

	}

void CTestScriptParser::Exit(TInt aErr)

    {

	iLog->Msg(_L("Error: Script file [%S] could not be opened"), &iFile);

	User::Leave(aErr);

    }

//EOF