--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/commsfwtools/preparedefaultcommsdatabase/Tools/cdbtest/src/testscriptparser.cpp	Thu Dec 17 09:22:25 2009 +0200
@@ -0,0 +1,164 @@
+// 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