/**
* Auxiliary function for TestCaseID TAppLangSTARTER_doTestStepL
*
* This method creates the server thread by invoking RThread::Create() and calls
* CMessageServServer::ThreadFunction() to start the Message Server.
*
*/
TInt CTestApplicationLanguageStep::StartThread()
{
TInt res=KErrNone;
// create server - if one of this name does not already exist
TFindServer findCountServer(KMessageServerName);
TFullName name;
if (findCountServer.Next(name)!=KErrNone) // we don't exist already
{
RThread thread;
semaphore.CreateLocal(0); // create a semaphore so we know when thread finished
res=thread.Create(KMessageServerName, // create new server thread
CMessageServServer::ThreadFunction, // thread's main function
KDefaultStackSize,
KDefaultHeapSize,
KDefaultHeapSize,
this // passed as TAny* argument to thread function
);
if (res==KErrNone) // thread created ok - now start it going
{
thread.SetPriority(EPriorityNormal);
thread.Resume(); // start it going
semaphore.Wait(); // wait until it's initialized
thread.Close(); // we're no longer interested in the other thread
}
else // thread not created ok
{
thread.Close(); // therefore we've no further interest in it
}
semaphore.Close();
}
return res;
}
/**
Create the thread that will act as the server.
This function is exported from the DLL and called by the client.
Note that a server can also be implemented as a separate
executable (i.e. as a separate process).
*/
EXPORT_C TInt StartThread(RThread& aServerThread)
{
TInt res=KErrNone;
// Create the server, if one with this name does not already exist.
TFindServer findCountServer(KCountServerName);
TFullName name;
// Need to check that the server exists.
if (findCountServer.Next(name)!=KErrNone)
{
// Create the thread for the server.
res=aServerThread.Create(KCountServerName,
CCountServer::ThreadFunction,
KDefaultStackSize,
KDefaultHeapSize,
KDefaultHeapSize,
NULL
);
// The thread has been created OK so get it started - however
// we need to make sure that it has started before we continue.
if (res==KErrNone)
{
TRequestStatus rendezvousStatus;
aServerThread.SetPriority(EPriorityNormal);
aServerThread.Rendezvous(rendezvousStatus);
aServerThread.Resume();
User::WaitForRequest(rendezvousStatus);
}
// The thread has not been created - clearly there's been a problem.
else
{
aServerThread.Close();
}
}
return res;
}
/**
@SYMTestCaseID UIF-TAppLangStarter-doTestStepL
@SYMPREQ
@SYMTestCaseDesc This test aims to test embedding feature of the application.
@SYMTestPriority High
@SYMTestStatus Implemented
@SYMTestActions The dll creates a thread and starts a Message server. Once the
message server is up and ready it launches the test client application,
tpackage. The server installs and starts an active scheduler to service
request messages received from the client and to log the information gathered
from the request messages.When the server receives EMessageServSetFromString
message from the client, it activates CMessageActive active object in order
to output the log buffer. When client completes its work, it sends message
EMessageServStop and server stops active sheduler so that server's thread
might be closed.
@SYMTestExpectedResults All messages send by the client should be processed by
the server and outputted in the log file.
*/
TVerdict CTestApplicationLanguageStep::doTestStepL() // main function called by E32
{
__UHEAP_MARK;
SetTestStepID(_L("UIF-TAppLangStarter-doTestStepL"));
CActiveScheduler* theSheduler = new CActiveScheduler;
CActiveScheduler::Install(theSheduler);
iMessage = CMessageActive::NewL();
iMessage->iStep = this;
_LIT(KPackageAppFileName,"z:\\sys\\bin\\TAPPLANGUAGE.exe");
CApaCommandLine* cmdLine=CApaCommandLine::NewLC();
cmdLine->SetCommandL(EApaCommandViewActivate);
cmdLine->SetDocumentNameL(_L("jhghjg"));
cmdLine->SetExecutableNameL(KPackageAppFileName);
StartThread();
RApaLsSession ls;
User::LeaveIfError(ls.Connect());
CleanupClosePushL(ls);
TInt err = ls.StartApp(*cmdLine);
if (err != KErrNone)
{
TEST(EFalse);
INFO_PRINTF1(_L("Failed to start application"));
// If there is a problem starting the app we have to stop the
// message server
RMessageServ serv;
TInt theRes = serv.Connect();
if(theRes == KErrNone)
{
serv.Stop();
serv.Close();
// Now make sure we wait until the server has stopped
// Not sure this is necessary but safer
while (ETrue)
{
TFindServer findCountServer(KMessageServerName);
TFullName name;
if (findCountServer.Next(name)!=KErrNone)
{
break;
}
}
}
}
CleanupStack::PopAndDestroy(&ls);
CleanupStack::PopAndDestroy(cmdLine);
CActiveScheduler::Start();
delete theSheduler;
delete iMessage;
iMessage = NULL;
REComSession::FinalClose();
RecordTestResultL();
CloseTMSGraphicsStep();
__UHEAP_MARKEND;
return TestStepResult();
}
