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

// CsdAgtTestStateMachineInit.cpp

// This contains CsdAgt TestCase Test 5.1 - 5.15

// 

//

// EPOC includes

#include <e32base.h>

#include <in_sock.h>

#include <dummyetel.h> // include here to avoid picking up the real etel.h

#include <etelmm.h>

#include <nd_err.h>

// Test system includes

#include "log.h"

#include "teststep.h"

#include "TestStepCsdAgt.h"

#include "TestSuiteCsdAgt.h"

// COMMDB Database Undo

#include "DbUndo.h"

// EFinishedDialling

#include <csdprog.h>

// Class definitions

#include "CsdAgtTestScriptErr.h"

// The tests in this file test the following script processing conditions:

//

// KErrNoExpression

// KErrMissingQuote

// KErrVariableNotFound

// KErrInvalidNumber

// KErrNumberOutOfRange

// KErrNoEquals

// KErrNoOpenExpresion

// KErrNestedLoop

// KErrLoopCounterOutOfRange

// KErrMissingChevron

// KErrIllegalCommand

// KErrNoDropOrRaise

// KErrVariableNameTooLong

// KErrMissingBracket

// KErrExitScriptTimeOut

// KErrCharacterSetDoesNotExist

//

// In fact, apart from KErrExitScriptTimeOut, these are all error values internal to csdagt, and get reduced to 

// KErrExitScriptError before they are visible to the test harness.

// If you need to check that a specific error value was generated for a test, then the

// information is logged in Logs\Netdial\NetDial.txt

// You then need to check the error represented by the logged number in nd_std.h

//

void CCsdAgtTest5_xx::CustomiseLoginScriptL(const TDesC16& aLoginScript)

{

	csd = CDbCsdTable::NewL();

	CleanupStack::PushL(csd);

	csd->SetColumnBoolL(TPtrC(ISP_USE_LOGIN_SCRIPT),ETrue);

	csd->SetColumnLongTextL(TPtrC(ISP_LOGIN_SCRIPT),aLoginScript);

}

void CCsdAgtTest5_xx::RevertCommdbChangesL()

{

	Log(_L("Reverting COMMDB changes"));

    csd->UndoDatabaseChangesL();

    CleanupStack::PopAndDestroy(csd);

}

enum TVerdict CCsdAgtTest5_xx::DoScriptErrTestL(TInt aTestNo, const TDesC& aLoginScript)

{

	char OK = 1;

	TInt ret = KErrGeneral;

	TRealAgtNotify AgtNotify;

	AgtNotify.SetTestCase(aTestNo);

	if(OK)

	{

	   TRAP(ret,SetGSMModeL(AgtNotify));

	   OK = (ret == KErrNone);

	}

	// Set up the login script to use.

	if(OK)

	   CustomiseLoginScriptL(aLoginScript);

	if(OK)

	{

		switch(aTestNo)

		{

		case 10515: // special case - timeout gets reported as such

		case 10517:

		case 10518:

			{

			TRAP(ret,ConnectExpectErrorL(KErrExitScriptTimeOut,ECsdFinishedLogIn));

			}

			break;

		case 10516: // no error expected here.

			{

	        TRAP(ret,NormalConnectL());

			}

			break;

		default:

			{

			TRAP(ret,ConnectExpectErrorL(KErrExitScriptError,ECsdFinishedLogIn));

			}

			break;

		}

	}		

	if(OK) OK = (ret == KErrNone);

	// Close database object, forcing it to undo all changes that were made

	RevertCommdbChangesL();

	return(OK ? EPass : EFail);

}

enum TVerdict CCsdAgtTest5_1::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10501, _L("SEND\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_2::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10502, _L("SEND \"AT+<0x0d>\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_3::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10503, _L("SEND login_init11$+<0x0d>\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_4::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10504, _L("LOOP 2147483648\n{\n}\nExit KErrNoModem$\nalive:\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_5::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10505, _L("WAIT 500001\n{\n\"OK\" alive\n}\nExit KErrNoModem$\nalive:\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_6::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10506, _L("SET err$ 0\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_7::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10507, _L("WAIT 10\n\"OK\" alive\n}\nExit KErrNoModem$\nalive:\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_8::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10508, _L("LOOP 2\n{\nSEND \"AT\"+<0xd>\nLOOP 4\n{\nSEND \"AT\"+<0xd>\n}\n}\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_9::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10509, _L("LOOP 10001\n{\nSEND \"AT\"+<0xd>\n}\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_10::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10510, _L("SEND \"AT\"+<0x0d\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_11::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10511, _L("WIAT 10\n{\n\"OK\" alive\n}\nExit KErrNoModem$\nalive:\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_12::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10512, _L("DTR\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_13::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10513, _L("SET e12345678901234567890$=\"hello\"\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_14::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10514, _L("SEND \"Hello\"+<0x0d> [UNICODE\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_15::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10515, _L("WAIT 3\n{\n}\nExit KErrTimeOut$\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_16::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10516, _L("SEND \"Hello\"+<0x0d>\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_17::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10517, _L("letsgo:\nWAIT 20\n{\n\"ogin:\" loginok\n}\nGOTO timeout\nloginok:\nSEND login_name$+<0x0d>\nWAIT 20\n{\n\"assword:\" passok\n}\nGOTO timeout\npassok:\nSEND login_pass$+<0x0d>\nWAIT 20\n{\n\"rotocol:\" protocolok\n}\nGOTO lofail\nprotocolok:\nSend \"PPP\"+<0x0d>\nEXIT\ntimeout:\nEXIT KErrTimeOut$\nlofail:\nEXIT KErrLoginFail$\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_18::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10518, _L("letsgo:\nWAIT 20\n	{\n\"ogin:\" loginok\n}\nGOTO timeout\nloginok:\n! READ\nWAIT 20\n{\n\"assword:\" passok\n}\nGOTO timeout\npassok:\n! READ\nWAIT 20\n{\n\"rotocol:\" protocolok\n}\nGOTO lofail\nprotocolok:\nSend \"PPP\"+<0x0d>\nEXIT\ntimeout:\nEXIT KErrTimeOut$\nlofail:\nEXIT KErrLoginFail$\n"));

	return(iTestStepResult);

	}

enum TVerdict CCsdAgtTest5_19::doCsdAgtTestStepL( void )

	{

	iTestStepResult = DoScriptErrTestL(10519, _L("CHARMAP [UNKNOWN]\nletsgo:\nWAIT 20\n{\n\"ogin:\" loginok\n}\nGOTO timeout\nloginok:\nWAIT 20\n{\n\"assword:\" passok\n}\nGOTO timeout\npassok:\nWAIT 20\n{\n\"rotocol:\" protocolok\n}\nGOTO lofail\nprotocolok:\nSend \"PPP\"+<0x0d>\nEXIT\ntimeout:\nEXIT KErrTimeOut$\nlofail:\nEXIT KErrLoginFail$\n"));

	return(iTestStepResult);

	}