// 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:

// Direct Connection States

// 

//

/**

 @file Nd_directstates.cpp 

*/

#include "ND_DIRCT.H"

#include "ND_SCR.H"

#include "ND_DBACC.H"

#include "ND_STD.H"

#include "ND_DIRECTSTATES.H"

CDirCtInit* CDirCtInit::NewL(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv)

/**

Direct Connection Initial State

2 phased constructor for CDirCtInit, first phase.

@param aSMObserver a reference to state machine observer.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

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

@return a new CDirCtInit object.

*/

	{

	CDirCtInit* r=new(ELeave) CDirCtInit(aSMObserver, aNdEnv);

	CleanupStack::PushL(r);

	r->ConstructL();

	CleanupStack::Pop();

	return r;

	}

CDirCtInit::CDirCtInit(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv)

	: CAgentStateBase(aSMObserver),iNdEnv(&aNdEnv)

/**

Private constructor for CDirCtInit, used in the first phase of construction.

@param aSMObserver a reference to the database accessor.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

*/

	{}

void CDirCtInit::ConstructL()

/**

Instantiate Member variable.

*/

	{}

CDirCtInit::~CDirCtInit()

/**

Destructor.

Cancel active request.

*/

	{

	Cancel();

	}

void CDirCtInit::StartState()

/**

Starts direct connection init state.

If connection is reconnect and used script is not NULL, reconfigure and cancel COMM-port and delete script.

Call JumpToRunl with KErrNone.

*/

	{

	JumpToRunl(KErrNone);

	}

CAgentStateBase* CDirCtInit::NextStateL(TBool aContinue)

/**

Changes to from init state to next state.

If connection is not continued, create disconnect state.

Else create scan script state.

@exception Leaves if NewL() leaves.

@return a new CDirCtDisconnect or CDirCtScanScript object.

*/

	{

	if(!aContinue)

		{

		return CDirCtDisconnect::NewL(*iSMObserver,*iNdEnv);

		}

	else  //Usual SM route. If no connection cancel next state scans the script

		{

		if (((iNdEnv->BaseEnv())->IsReconnect()) && (iNdEnv->Script()!=NULL))

			{

			return CDirCtReConfigureCommPort::NewL(*iSMObserver,*iNdEnv,ETrue);

			}

		else

			{

			return CDirCtOpenDataPort::NewL(*iSMObserver,*iNdEnv);

			}

		}

	}

void CDirCtInit::DoCancel()

/**

Cancels active requests.

*/

	{

	}

void CDirCtInit::RunL()

/**

Direct connection init completed.

Call CompleteState() with KErrNone.

*/

	{

	__ASSERT_DEBUG(iStatus==KErrNone, User::Invariant());	// should just have come from JumpToRunl(KErrNone)

	(iNdEnv->BaseEnv())->CompleteState(KErrNone);

	}

CDirCtScanScript* CDirCtScanScript::NewL(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv)

/**

Direct Connection Scan Script State

2 phased constructor for CDirCtScanScript, first phase.

@param aSMObserver a reference to state machine observer.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

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

@return a new CDirCtScanScript object.

*/

	{

	CDirCtScanScript* r=new(ELeave) CDirCtScanScript(aSMObserver, aNdEnv);

	CleanupStack::PushL(r);

	r->ConstructL();

	CleanupStack::Pop();

	return r;

	}

CDirCtScanScript::CDirCtScanScript(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv) 

	: CAgentStateBase(aSMObserver),iNdEnv(&aNdEnv)

/**

Private constructor for CDirCtScanScript, used in the first phase of construction.

@param aSMObserver a reference to the database accessor.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

*/

	{}

void CDirCtScanScript::ConstructL()

/**

Instantiate Member variable.

*/

	{}

CDirCtScanScript::~CDirCtScanScript()

/**

Destructor.

Cancel active request.

*/

	{

	Cancel();

	}

void CDirCtScanScript::StartState()

/**

Scan "login" script for READ command.

Call UpdateProgress() with EScanningScript and KErrNone.

Call SetUpScriptL() to setup the script. If call leaves, trap it

and call JumpToRunl().

If script should be used, start scanning script and set state active.

Else call JumpToRunl().

*/

	{

	iSMObserver->UpdateProgress(ECsdScanningScript,KErrNone);

	if (iNdEnv->UseScript())

		{

		iStatus=KRequestPending;

		SetActive();

		iNdEnv->Script()->Scan(*this);

		}

	else

		{

		JumpToRunl(KErrNone);

		}

	}

CAgentStateBase* CDirCtScanScript::NextStateL(TBool aContinue)

/**

Changes to from scan script state to next state.

If connection is not continued or iStatus is not KErrNone, create disconnect state.

Else create get login info state.

@param aContinue indicates whether connection should continue.

@exception Leaves if NewL() leaves.

@return a new CDirCtDisconnect or CDirCtGetLoginInfo object.

*/

	{ 

	if((!aContinue)||(iStatus!=KErrNone))

		{

		return CDirCtCloseDataPort::NewL(*iSMObserver,*iNdEnv,iStatus.Int());

		}

	else //succesful run of state

		{

		return CDirCtGetLoginInfo::NewL(*iSMObserver,*iNdEnv);

		}

	}

void CDirCtScanScript::DoCancel()

/**

Cancels active requests.

*/

	{	

	if (iNdEnv->Script()!=NULL)

		{

		(iNdEnv->Script())->Cancel();

		}

	if (iStatus == KRequestPending)

		{

		ScriptFunctionComplete(KErrCancel);

		}

	}

void CDirCtScanScript::RunL()

/**

Scan completed (should not complete if connection cancelled).

If there is an error then signal it, otherwise advance the phase to connect.

Call ServiceStarted() if not a reconnect.

*/

	{

	if(iStatus!=KErrNone)

		{

		if (iNdEnv->Script()!=NULL)

			iNdEnv->Script()->CloseScript();

		iSMObserver->ConnectionComplete(ECsdScannedScript,iStatus.Int());

		return;

		}

	iSMObserver->UpdateProgress(ECsdScannedScript,iStatus.Int());

	if (!(iNdEnv->BaseEnv())->IsReconnect())

		{

		}

	else

		{			

		}

	//iSMObserver->ServiceStarted();

	(iNdEnv->BaseEnv())->CompleteState(KErrNone);

	}

void CDirCtScanScript::ScriptFunctionComplete(TInt aError)

/**

Script complete. Complete request.

*/

	{

	TRequestStatus* status=&iStatus;

	User::RequestComplete(status,aError);

	}

CDirCtGetLoginInfo* CDirCtGetLoginInfo::NewL(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv)

/**

Direct Connection Get Login Info State

2 phased constructor for CDirCtGetLoginInfo, first phase.

@param aSMObserver a reference to state machine observer.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

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

@return a new CDirCtInit object.

*/

	{

	CDirCtGetLoginInfo* r=new(ELeave) CDirCtGetLoginInfo(aSMObserver,aNdEnv);

	CleanupStack::PushL(r);

	r->ConstructL();

	CleanupStack::Pop();

	return r;

	}

CDirCtGetLoginInfo::CDirCtGetLoginInfo(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv)

	: CGetLoginInfo(aSMObserver,aNdEnv)

/**

Private constructor for CDirCtGetLoginInfo, used in the first phase of construction.

@param aSMObserver a reference to the database accessor.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

*/

	{}

void CDirCtGetLoginInfo::ConstructL()

/**

Instantiate Member variable.

*/

	{}

CDirCtGetLoginInfo::~CDirCtGetLoginInfo()

/**

Destructor.

*/

	{

	}

CAgentStateBase* CDirCtGetLoginInfo::NextStateL(TBool aContinue)

/**

Changes to from get login info state to next state.

If connection is not continued or iStatus is not KErrNone, create hangup state.

Else create connect state.

@param aContinue indicates whether connection should continue.

@exception Leaves if NewL() leaves.

@return a new CDirCtHangUp or CDirCtConnect object.

*/

	{ 

	if((!aContinue)||(iStatus!=KErrNone))

		{

		return CDirCtHangUp::NewL(*iSMObserver,*iNdEnv);

		}

	else //succesful run of state

		{

		return CDirCtConfigureCommPort::NewL(*iSMObserver,*iNdEnv);

		}

	}

CDirCtConnect* CDirCtConnect::NewL(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv)

/**

Direct Connection Connect State

2 phased constructor for CDirCtConnect, first phase.

@param aSMObserver a reference to state machine observer.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

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

@return a new CDirCtInit object.

*/

	{

	CDirCtConnect* r=new(ELeave) CDirCtConnect(aSMObserver, aNdEnv);

	CleanupStack::PushL(r);

	r->ConstructL();

	CleanupStack::Pop();

	return r;

	}

CDirCtConnect::CDirCtConnect(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv) 

	: CAgentStateBase(aSMObserver),iNdEnv(&aNdEnv)

/**

Private constructor for CDirCtConnect, used in the first phase of construction.

@param aSMObserver a reference to the database accessor.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

*/

	{}

void CDirCtConnect::ConstructL()

/**

Instantiate Member variable.

*/

	{}

CDirCtConnect::~CDirCtConnect()

/**

Destructor.

Cancel active request.

*/

	{

	Cancel();

	}

void CDirCtConnect::StartState()

/**

Starts direct connection connect state.

Call UpdateProgress() with ECsdStartingConnect and KErrNone.

Configure comm port and execute script.

*/

	{

	TRAPD(ret,DoStartStateL());

	if (ret!=KErrNone)

		JumpToRunl(ret);

	}

CAgentStateBase* CDirCtConnect::NextStateL(TBool aContinue)

/**

Changes to from connect state to next state.

If connection is not continued or iStatus is not KErrNone, create hangup state.

Else create open state.

@param aContinue indicates whether connection should continue.

@exception Leaves if NewL() leaves.

@return a new CDirCtHangUp or CDirCtOpen object.

*/

	{

	if((!aContinue)||(iStatus!=KErrNone))

		{

		return CDirCtHangUp::NewL(*iSMObserver,*iNdEnv);

		}

	else

		{

		return CDirCtOpen::NewL(*iSMObserver,*iNdEnv);

		}

	}

void CDirCtConnect::DoCancel()

/**

Cancels active requests and calls ScriptFunctionComplete() with KErrCancel.

*/

	{

	if (iNdEnv->Script()!=NULL)

		{

		(iNdEnv->Script())->Cancel();

		}

	if (!IsActive())

		SetActive();

	ScriptFunctionComplete(KErrCancel);

	}

void CDirCtConnect::RunL()

/**

Connect completed (should not complete if connection cancelled).

If there is an error then signal it.

Call UpdateProgress() with ECsdFinishedConnect and KErrNone.

Call PreventConnectionRetries().

Complete connect state with KErrNone.

*/

	{

	if(iStatus!=KErrNone)

		{

		if (iNdEnv->Script()!=NULL)

			iNdEnv->Script()->CloseScript();

		iSMObserver->ConnectionComplete(ECsdFinishedConnect,iStatus.Int());

		return;

		}

	iSMObserver->UpdateProgress(ECsdFinishedConnect,KErrNone);

	iSMObserver->PreventConnectionRetries();

	(iNdEnv->BaseEnv())->CompleteState(KErrNone);

	}

void CDirCtConnect::ScriptFunctionComplete(TInt aError)

/**

Completes direct connect state with aError parameter.

@param aError is error code to be used with request completition.

*/

	{

	TRequestStatus* status=&iStatus;

	User::RequestComplete(status,aError);

	}

void CDirCtConnect::DoStartStateL()

/**

Executes script if used.  If script is not used, calls JumpToRunl() with KErrNone.

@exception Leaves if ExecuteL() leaves.

*/

	{

	if (iNdEnv->UseScript())

		{

		(iNdEnv->Script())->ExecuteL(*this);

		iStatus=KRequestPending;

		SetActive();

		}

	else

		{

		JumpToRunl(KErrNone);

		}

	}

CDirCtOpen* CDirCtOpen::NewL(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv)

/**

Direct Connection Open State

2 phased constructor for CDirCtOpen, first phase.

@param aSMObserver a reference to state machine observer.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

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

@return a new CDirCtInit object.

*/

	{

	CDirCtOpen* r=new(ELeave) CDirCtOpen(aSMObserver, aNdEnv);

	CleanupStack::PushL(r);

	r->ConstructL();

	CleanupStack::Pop();

	return r;

	}

CDirCtOpen::CDirCtOpen(MAgentStateMachineEnv& aSMObserver, MNetdialEnv& aNdEnv) 

	: CAgentStateBase(aSMObserver),iNdEnv(&aNdEnv)

/**

Private constructor for CDirCtOpen, used in the first phase of construction.

@param aSMObserver a reference to the database accessor.

@param aNdEnv a reference to the Netdial which defines a set of utility functions.

*/

	{}

void CDirCtOpen::ConstructL()

/**

Instantiate Member variable.

*/

	{}

CDirCtOpen::~CDirCtOpen()

/**

Destructor.

Cancel active request.

*/

	{

	Cancel();

	}