diff -r 6b1d113cdff3 -r 6638e7f4bd8f telephonyserverplugins/multimodetsy/test/Te_LoopBack/Te_LoopBackcdatacall.cpp --- a/telephonyserverplugins/multimodetsy/test/Te_LoopBack/Te_LoopBackcdatacall.cpp Mon May 03 13:37:20 2010 +0300 +++ b/telephonyserverplugins/multimodetsy/test/Te_LoopBack/Te_LoopBackcdatacall.cpp Thu May 06 15:10:38 2010 +0100 @@ -1,250 +1,250 @@ -// Copyright (c) 1997-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: -// This file initiates the "Data Call Test" scenario for the :q -// Test Harness. -// This file handles both the test side and the emulator side of the GSM -// Test Harness for this scenario. The test side must start the emulator and -// drive the ETel API. The emulator side runs the designated script. -// -// - -/** - @file - @note There are mulitple classes implemented in this file. - @note These classes are CTestDriveDataCall and CTestDataCall. -*/ - -#include -#include -#include "Te_LoopBackcdatacall.h" -#include "../../hayes/TSYCONFG.H" // for KInternetAccessPoint - -// -// Test-side class -// With the assistance of the base class, this class must start the emulator -// and drive the ETel API. -// -CTestDriveDataCall* CTestDriveDataCall::NewL(const TScriptList aScriptListEntry) -/** - * 2 Phase Constructor - * - * This method creates an instance of CTestDriveDataCall. The ConstructL for - * for CTestDriveDataCall is inherited from and implemented in CTestBase. The - * ConstructL uses the CTestDriveDataCall object to load ond open the two iPhone - * objects, one from each server. - * - * @param aScriptListEntry: enum indicating which script to use for this test. - * @leave Leaves if a failure occurs during connect or open of the iPhone by ConstructL. - * @return pointer to the instance of CTestDriveDataCall. - */ - { - CTestDriveDataCall* aA=new(ELeave) CTestDriveDataCall(aScriptListEntry); - CleanupStack::PushL(aA); - aA->ConstructL(); - CleanupStack::Pop(); - return aA; - } - -CTestDriveDataCall::CTestDriveDataCall(const TScriptList aScriptListEntry) : iScriptListEntry(aScriptListEntry) -/** - * This method is the constructor for CTestDriveDataCall. - * - * @param aScriptListEntry: enum indicating which script to use for this test. - * @note Initializes private data "aScriptListEntry" to received parameter. - */ - {} - -TInt CTestDriveDataCall::RunTestL() -/** - * This method is invoked to start a Data Call Test. - * This method starts the modem emulator side of the test. - * - * @return KErrNone when no error exists. - * @return KErrAlreadyExists is returned if modem emulator exists and retry limit expires. - * @return Variable depending on return value from test's DriveETelApiL method and thread monitoring. - */ - { - iCurrentScript=iScriptListEntry; - return StartEmulatorL(); - } - -TInt CTestDriveDataCall::DriveETelApiL() -/** - * This method contains the real meat of the Client-side Data Call Test code. - * This method sets up a write test for both an outgoing and incoming call for - * a Data Call Test. - * - * @return KErrNone. - */ - { - _LIT(KDataLineName,"Data"); - RLine line; - INFO_PRINTF1(_L("Opening Data Line\n")); - TESTL(line.Open(iPhone,KDataLineName)==KErrNone); - - INFO_PRINTF1(_L("Opening New Data Call\n")); - RCall call; - TESTL(call.OpenNewCall(line)==KErrNone); - - TRequestStatus reqStatus; - RMobilePhone::TMMTableSettings tableSettings; - tableSettings.iLocId=KInternetAccessPoint; - RMobilePhone::TMMTableSettingsPckg tableSettingsPckg(tableSettings); - iPhone.InitialiseMM(reqStatus , tableSettingsPckg); - User::WaitForRequest(reqStatus); - TESTL(reqStatus == KErrNone); - - _LIT(KDialString,"+1234"); - TRequestStatus stat; - TESTL(call.Dial(KDialString)==KErrNone); - - RCall::TCommPort commPort; - TESTL(call.LoanDataPort(commPort)==KErrNone); - - RCommServ cs; - TESTL(cs.Connect()==KErrNone); - - RComm port; - TESTL(port.Open(cs,commPort.iPort,ECommShared)==KErrNone); - - port.Write(stat,KWriteTestData); - User::WaitForRequest(stat); - TESTL(stat.Int()==KErrNone); - - //-- a small delay between successive writes to the COM port - //-- I had to insert it to fix mistiming between script execution and sending AT-commands to modem - User::After(500000); - port.Write(stat,KWriteTestData); - User::WaitForRequest(stat); - TESTL(stat.Int()==KErrNone); - - port.Close(); - cs.Close(); - TESTL(call.RecoverDataPort()==KErrNone); - - TESTL(call.HangUp()==KErrNone); - - User::After(1000000); - -// Now wait for an incoming call... - TESTL(call.AnswerIncomingCall()==KErrNone); - - TESTL(call.LoanDataPort(commPort)==KErrNone); - - TESTL(cs.Connect()==KErrNone); - TESTL(port.Open(cs,commPort.iPort,ECommShared)==KErrNone); - - port.Write(stat,KWriteTestData2); - User::WaitForRequest(stat); - TESTL(stat.Int()==KErrNone); - - //-- a small delay between successive writes to the COM port - //-- I had to insert it to fix mistiming between script execution and sending AT-commands to modem - User::After(500000); - - port.Write(stat,KWriteTestData2); - User::WaitForRequest(stat); - TESTL(stat.Int()==KErrNone); - - port.Close(); - cs.Close(); - TESTL(call.RecoverDataPort()==KErrNone); - - TESTL(call.HangUp()==KErrNone); - - call.Close(); - line.Close(); - return KErrNone; - } - -// -// Emulator-side class -// With the assistance of the base class, this class must run the designated script -// -CTestDataCall* CTestDataCall::NewL(const TScript* aScript) -/** - * 2 Phase Constructor - * - * This method creates an instance of CTestDataCall. - * - * @param aScript: pointer to the specifics of the script to run. - * @leave Leaves if out of memory when attempting to create. - * @return pointer to the instance of CTestDataCall. - */ - { - CTestDataCall* aA=new(ELeave) CTestDataCall(aScript); - CleanupStack::PushL(aA); - aA->ConstructL(); - CleanupStack::Pop(); - return aA; - } - -CTestDataCall::CTestDataCall(const TScript* aScript) : iScript(aScript) -/** - * This method is the constructor for CTestDataCall. - * - * @param aScript: pointer to the specifics of the script to run. - * @note Initializes private data "aScript" to received parameter. - */ - {} - -void CTestDataCall::ConstructL() -/** - * This method is used to implement the 2 Phase Constructor for CTestDataCall. - * This method uses the CATBase ConstructL to configure the port to be used. - * - * @leave Leaves if CATBase leaves. - */ - { - CATScriptEng::ConstructL(); - } - -TInt CTestDataCall::Start() -/** - * This method is defined as a pure virtual function that must be implemented. - * This method is currently not used by the Etel regression test harness. - * Instead of using this method to start the scripts, the CTestTxMess::Start() - * method is used to start the scripts. The CTestTxMess::Start() is called by - * the responder thread of the scripting engine to start the execution of the script. - * - * @return KErrNone. - */ - { - StartScript(iScript); - return KErrNone; - } - -void CTestDataCall::SpecificAlgorithmL(TInt /* aParam */) -/** - * This method is defined as a pure virtual function that must be implemented. - * This method is currently not used by the Etel regression test harness. - * Instead of using this method to perform an algorithm specific to this test, - * the CTestTxMess::SpecificAlgorithm() method is used. The CTestTxMess::SpecificAlgorithm() - * is called by the scripting engine to perform the test specific algorithm. - */ - { - } - -void CTestDataCall::Complete(TInt aError) -/** - * This method is defined as a pure virtual function that must be implemented. - * This method is currently not used by the Etel regression test harness. - * Instead of using this method to end the scripts, the CTestTxMess::Complete() - * method is used to end the scripts. The CTestTxMess::Complete() is called by - * the scripting engine to end the execution of the script. - */ - { - iReturnValue=aError; - CActiveScheduler::Stop(); - } +// Copyright (c) 1997-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: +// This file initiates the "Data Call Test" scenario for the :q +// Test Harness. +// This file handles both the test side and the emulator side of the GSM +// Test Harness for this scenario. The test side must start the emulator and +// drive the ETel API. The emulator side runs the designated script. +// +// + +/** + @file + @note There are mulitple classes implemented in this file. + @note These classes are CTestDriveDataCall and CTestDataCall. +*/ + +#include +#include +#include "Te_LoopBackcdatacall.h" +#include "../../hayes/TSYCONFG.H" // for KInternetAccessPoint + +// +// Test-side class +// With the assistance of the base class, this class must start the emulator +// and drive the ETel API. +// +CTestDriveDataCall* CTestDriveDataCall::NewL(const TScriptList aScriptListEntry) +/** + * 2 Phase Constructor + * + * This method creates an instance of CTestDriveDataCall. The ConstructL for + * for CTestDriveDataCall is inherited from and implemented in CTestBase. The + * ConstructL uses the CTestDriveDataCall object to load ond open the two iPhone + * objects, one from each server. + * + * @param aScriptListEntry: enum indicating which script to use for this test. + * @leave Leaves if a failure occurs during connect or open of the iPhone by ConstructL. + * @return pointer to the instance of CTestDriveDataCall. + */ + { + CTestDriveDataCall* aA=new(ELeave) CTestDriveDataCall(aScriptListEntry); + CleanupStack::PushL(aA); + aA->ConstructL(); + CleanupStack::Pop(); + return aA; + } + +CTestDriveDataCall::CTestDriveDataCall(const TScriptList aScriptListEntry) : iScriptListEntry(aScriptListEntry) +/** + * This method is the constructor for CTestDriveDataCall. + * + * @param aScriptListEntry: enum indicating which script to use for this test. + * @note Initializes private data "aScriptListEntry" to received parameter. + */ + {} + +TInt CTestDriveDataCall::RunTestL() +/** + * This method is invoked to start a Data Call Test. + * This method starts the modem emulator side of the test. + * + * @return KErrNone when no error exists. + * @return KErrAlreadyExists is returned if modem emulator exists and retry limit expires. + * @return Variable depending on return value from test's DriveETelApiL method and thread monitoring. + */ + { + iCurrentScript=iScriptListEntry; + return StartEmulatorL(); + } + +TInt CTestDriveDataCall::DriveETelApiL() +/** + * This method contains the real meat of the Client-side Data Call Test code. + * This method sets up a write test for both an outgoing and incoming call for + * a Data Call Test. + * + * @return KErrNone. + */ + { + _LIT(KDataLineName,"Data"); + RLine line; + INFO_PRINTF1(_L("Opening Data Line\n")); + TESTL(line.Open(iPhone,KDataLineName)==KErrNone); + + INFO_PRINTF1(_L("Opening New Data Call\n")); + RCall call; + TESTL(call.OpenNewCall(line)==KErrNone); + + TRequestStatus reqStatus; + RMobilePhone::TMMTableSettings tableSettings; + tableSettings.iLocId=KInternetAccessPoint; + RMobilePhone::TMMTableSettingsPckg tableSettingsPckg(tableSettings); + iPhone.InitialiseMM(reqStatus , tableSettingsPckg); + User::WaitForRequest(reqStatus); + TESTL(reqStatus == KErrNone); + + _LIT(KDialString,"+1234"); + TRequestStatus stat; + TESTL(call.Dial(KDialString)==KErrNone); + + RCall::TCommPort commPort; + TESTL(call.LoanDataPort(commPort)==KErrNone); + + RCommServ cs; + TESTL(cs.Connect()==KErrNone); + + RComm port; + TESTL(port.Open(cs,commPort.iPort,ECommShared)==KErrNone); + + port.Write(stat,KWriteTestData); + User::WaitForRequest(stat); + TESTL(stat.Int()==KErrNone); + + //-- a small delay between successive writes to the COM port + //-- I had to insert it to fix mistiming between script execution and sending AT-commands to modem + User::After(500000); + port.Write(stat,KWriteTestData); + User::WaitForRequest(stat); + TESTL(stat.Int()==KErrNone); + + port.Close(); + cs.Close(); + TESTL(call.RecoverDataPort()==KErrNone); + + TESTL(call.HangUp()==KErrNone); + + User::After(1000000); + +// Now wait for an incoming call... + TESTL(call.AnswerIncomingCall()==KErrNone); + + TESTL(call.LoanDataPort(commPort)==KErrNone); + + TESTL(cs.Connect()==KErrNone); + TESTL(port.Open(cs,commPort.iPort,ECommShared)==KErrNone); + + port.Write(stat,KWriteTestData2); + User::WaitForRequest(stat); + TESTL(stat.Int()==KErrNone); + + //-- a small delay between successive writes to the COM port + //-- I had to insert it to fix mistiming between script execution and sending AT-commands to modem + User::After(500000); + + port.Write(stat,KWriteTestData2); + User::WaitForRequest(stat); + TESTL(stat.Int()==KErrNone); + + port.Close(); + cs.Close(); + TESTL(call.RecoverDataPort()==KErrNone); + + TESTL(call.HangUp()==KErrNone); + + call.Close(); + line.Close(); + return KErrNone; + } + +// +// Emulator-side class +// With the assistance of the base class, this class must run the designated script +// +CTestDataCall* CTestDataCall::NewL(const TScript* aScript) +/** + * 2 Phase Constructor + * + * This method creates an instance of CTestDataCall. + * + * @param aScript: pointer to the specifics of the script to run. + * @leave Leaves if out of memory when attempting to create. + * @return pointer to the instance of CTestDataCall. + */ + { + CTestDataCall* aA=new(ELeave) CTestDataCall(aScript); + CleanupStack::PushL(aA); + aA->ConstructL(); + CleanupStack::Pop(); + return aA; + } + +CTestDataCall::CTestDataCall(const TScript* aScript) : iScript(aScript) +/** + * This method is the constructor for CTestDataCall. + * + * @param aScript: pointer to the specifics of the script to run. + * @note Initializes private data "aScript" to received parameter. + */ + {} + +void CTestDataCall::ConstructL() +/** + * This method is used to implement the 2 Phase Constructor for CTestDataCall. + * This method uses the CATBase ConstructL to configure the port to be used. + * + * @leave Leaves if CATBase leaves. + */ + { + CATScriptEng::ConstructL(); + } + +TInt CTestDataCall::Start() +/** + * This method is defined as a pure virtual function that must be implemented. + * This method is currently not used by the Etel regression test harness. + * Instead of using this method to start the scripts, the CTestTxMess::Start() + * method is used to start the scripts. The CTestTxMess::Start() is called by + * the responder thread of the scripting engine to start the execution of the script. + * + * @return KErrNone. + */ + { + StartScript(iScript); + return KErrNone; + } + +void CTestDataCall::SpecificAlgorithmL(TInt /* aParam */) +/** + * This method is defined as a pure virtual function that must be implemented. + * This method is currently not used by the Etel regression test harness. + * Instead of using this method to perform an algorithm specific to this test, + * the CTestTxMess::SpecificAlgorithm() method is used. The CTestTxMess::SpecificAlgorithm() + * is called by the scripting engine to perform the test specific algorithm. + */ + { + } + +void CTestDataCall::Complete(TInt aError) +/** + * This method is defined as a pure virtual function that must be implemented. + * This method is currently not used by the Etel regression test harness. + * Instead of using this method to end the scripts, the CTestTxMess::Complete() + * method is used to end the scripts. The CTestTxMess::Complete() is called by + * the scripting engine to end the execution of the script. + */ + { + iReturnValue=aError; + CActiveScheduler::Stop(); + }