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

// Tests Application Apparc base classes and utility functions to get application's data.\n

// 

// t_prostep.cpp

//

/**

 @file t_prostep.cpp

 @test

 @internalComponent - Internal Symbian test code

*/

#include <f32file.h>

#include <fbs.h>

#include <s32std.h> 

#include <s32stor.h> 

#include <s32file.h> 

#include <ecom/ecom.h>

#include <apaid.h>

#include "../apparc/apadll.h"

#include "../apgrfx/APGSTD.H"

#include <apgaplst.h>

#include <apgicnfl.h>

#include <apgdoor.h>

#include <apfrec.h>

#include <apfctlf.h>

#include <apgctl.h>

#include <apgaplst.h>

#include <apaflrec.h>

#include "testableapalssession.h"

#include <apacmdln.h>

#include "T_ProStep.h"

#include "tstapp.h"

#include "appfwk_test_utils.h"

#if !defined(__E32TEST_H__)

#include <e32test.h>

#endif

TInt PanicTestThread(TAny* aOption);

enum TPanicOption 

	{

	EFirst,

	ENegativePanicTest,

	EUnknownPanicOption,	

	ELast

	};

_LIT(KCTLDIR,"C:\\private\\10003a3f\\import\\apps\\");

_LIT(KSOURCEPATH,"z:\\private\\10003a3f\\import\\apps\\m_ctrl_reg.rsc");

_LIT(KNEWCTLPATH,"C:\\private\\10003a3f\\import\\apps\\m_ctrl_reg.rsc");

_LIT(KNEWPATH,"C:\\cm.txt");

_LIT(KEMPTYFILEPATH,"z:\\system\\data\\Testpath\\FilterTests\\testfile1.txt");

_LIT(KRSCDIR,"C:\\Resource\\apps\\");

_LIT(KLOCPATH,"z:\\Resource\\apps\\M_ctrl_loc.rsc");

_LIT(KNEWLOCPATH,"C:\\Resource\\apps\\M_ctrl_loc.rsc");

_LIT(KCTRLNAME,"C:\\sys\\bin\\m_ctrl.exe");

TFileName ctlPath=_L("z:\\sys\\bin\\m_ctrl.exe");

LOCAL_D TInt SimulateKeyL(TAny*)

	{

	User::After(3000000);

	RWsSession session;

	User::LeaveIfError(session.Connect());	

	//control down

	TRawEvent rawEvent;

	rawEvent.Set(TRawEvent::EKeyDown,EStdKeyLeftCtrl);

	session.SimulateRawEvent(rawEvent);

	// e down

	rawEvent.Set(TRawEvent::EKeyDown,'E');

	session.SimulateRawEvent(rawEvent);

	// e up

	rawEvent.Set(TRawEvent::EKeyUp,'E');

	session.SimulateRawEvent(rawEvent);

	//control up

	rawEvent.Set(TRawEvent::EKeyUp,EStdKeyLeftCtrl);

	session.SimulateRawEvent(rawEvent);

	session.Flush();

	session.Close();

	return KErrNone;

	}

void CT_ProStep::setup()

	{

#if defined(__EPOC32__)

	TFullName filePath=_L("c:\\docs\\tstapp.doc");

	TFullName tempPath=_L("c:\\system\\temp\\");

	// if we're on the rack create the directories we need

	TParse parser;

	parser.Set(filePath,NULL,NULL);

	iFs.MkDirAll(parser.DriveAndPath());

	parser.Set(tempPath,NULL,NULL);

	iFs.MkDirAll(parser.DriveAndPath());

#endif

	}

/**

   @SYMTestCaseID T-ProStep-testAppIdentifierL

   @SYMPREQ

   @SYMTestCaseDesc Tests TApaAppIdentifier API.

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions Create a temporary store. Construct an application identifier

   for the specified application DLL, and Uid. Call WriteAppIdentifierL() to

   store application identifier details. Read the stored application identifier

   details.\n

   API Calls:\n	

   TApaAppIdentifier::TApaAppIdentifier(TUid aAppUidType,const TFileName& aDllName)\n

   CApaProcess::WriteAppIdentifierL(CStreamStore& aStore,CStreamDictionary& aStreamDic,const TApaAppIdentifier& aAppId)\n

   CApsProcess::ReadAppIdentifierL(const CStreamStore& aStore,const CStreamDictionary& aStreamDic)\n

   @SYMTestExpectedResults Test checks whether stored and read application

   identifier details match.

 */

void CT_ProStep::testAppIdentifierL()

	{

	const TFullName tempPath=_L("c:\\system\\temp\\");

	const TUid testUid={1};

	INFO_PRINTF1(_L("Testing TApaAppIdentifier"));

	// create a process

	TRAPD(ret,iProcess = CApaProcess::NewL(iFs));	

	TEST(ret==KErrNone);

	// create a temporary store and stream dictionary

	TParse newFilePath;

	HBufC* related = HBufC::NewL(20);

	(*related)=_L("temp.idf");

	newFilePath.Set(tempPath,related,NULL);

	delete related;

	iFs.MkDirAll(newFilePath.DriveAndPath());

	CDirectFileStore* store = CDirectFileStore::ReplaceLC(iFs,newFilePath.FullName(),EFileWrite);

	store->SetTypeL(TUidType(KDirectFileStoreLayoutUid,testUid,testUid));

	CStreamDictionary* streamDic=CStreamDictionary::NewL();

	CleanupStack::PushL(streamDic);

	// set up an id

	TApaAppIdentifier* origId=new(ELeave) TApaAppIdentifier (testUid,_L("FileName"));

	CleanupStack::PushL(origId);

	// write it out and read it in again

	iProcess->WriteAppIdentifierL(*store,*streamDic,*origId);

	TApaAppIdentifier* copyId=new(ELeave) TApaAppIdentifier();

	*copyId=iProcess->ReadAppIdentifierL(*store,*streamDic);

	CleanupStack::PushL(copyId);

	TEST((origId->iAppUid==copyId->iAppUid));

	TEST((origId->iFullName==copyId->iFullName));

	// tidy up

	CleanupStack::PopAndDestroy(4); // store,streamDic,origId,copyId

	delete iProcess;

	iFs.Delete(newFilePath.FullName());

	}

/**

   @SYMTestCaseID T-ProStep-doTestGenerateFileName

   @SYMPREQ

   @SYMTestCaseDesc Tests CApaApplication::GenerateFileName().

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions Call GenerateFileName() under following scenarios:\n

   (1) when root name doesn't exist\n

   (2) when root name exists\n

   (3) when illegal paths are mentioned.\n

   (4) when no memory is available to perfom the operation.\n

   API Calls:\n	

   CApaApplication::GenerateFileName(RFs& aFs,TFileName& aRootName)\n

   @SYMTestExpectedResults Test should return the desired filename or error

   code for each scenario

 */

void CT_ProStep::doTestGenerateFileName()

	{

	TFileName rootName;

	// delete the test files just in case...

	iFs.Delete(_L("c:\\path\\name"));

	iFs.Delete(_L("c:\\path\\name.ext"));

	// try it with a root that doesn't exist

	rootName = _L("c:\\path\\name");

	TInt ret=CApaApplication::GenerateFileName(iFs,rootName);

	TEST(ret==KErrNone);

	TEST(rootName.CompareF(_L("c:\\path\\name"))==0);

	// try it with a root (inc ext) that doesn't exist

	rootName = _L("c:\\path\\name.ext");

	ret=CApaApplication::GenerateFileName(iFs,rootName);

	TEST(ret==KErrNone);

	TEST(rootName.CompareF(_L("c:\\path\\name.ext"))==0);

	// create a couple of files

	RFile file;

	file.Create(iFs,_L("c:\\path\\name"),EFileWrite);

	file.Close();

	file.Create(iFs,_L("c:\\path\\name.ext"),EFileWrite);

	// file.Close(); // purposely don't close this one

	// try it with a root that exists

	rootName = _L("c:\\path\\name");

	ret=CApaApplication::GenerateFileName(iFs,rootName);

	TEST(ret==KErrNone);

	TEST(rootName.CompareF(_L("c:\\path\\name(01)"))==0);

	// try it with a root (inc ext) that exists

	rootName = _L("c:\\path\\name.ext");

	ret=CApaApplication::GenerateFileName(iFs,rootName);

	TEST(ret==KErrNone);

	TEST(rootName.CompareF(_L("c:\\path\\name(01).ext"))==0);

	// try with illegal paths

	rootName = _L("c:name");

	ret=CApaApplication::GenerateFileName(iFs,rootName);

	TEST((ret==KErrArgument));

	rootName = _L("\\dir\\name");

	ret=CApaApplication::GenerateFileName(iFs,rootName);

	TEST((ret==KErrArgument));

	rootName = _L("c:\\dir\\");

	ret=CApaApplication::GenerateFileName(iFs,rootName);

	TEST((ret==KErrBadName));

	// try when no memory is available to perform the operation. 

	// 	(we haven't used a conventional OOM loop, but this is not a leaving function)

	__UHEAP_MARK;

	__UHEAP_SETFAIL(RHeap::EDeterministic,1);

	rootName = _L("c:\\path\\nomemory.ext");

	ret=CApaApplication::GenerateFileName(iFs,rootName);

	TEST(ret==KErrNoMemory);

	__UHEAP_MARKEND;

	__UHEAP_RESET;

	// tidy up

	file.Close();

	iFs.Delete(_L("c:\\path\\name"));

	iFs.Delete(_L("c:\\path\\name.ext"));

	}

/**

   @SYMTestCaseID APPFWK-APPARC-0055

   @SYMDEF DEF092509

   @SYMTestCaseDesc Tests CApaProcess::ReadRootStreamLC ().

   @SYMTestPriority High

   @SYMTestStatus Implemented

   @SYMTestActions Call ReadRootStreamLC() under following scenarios:\n

   (1) when File name Doesnt Exists\n

   (2) When an empty file is present \n

   @SYMTestExpectedResults Test should return  KErrNotFound for scenario (1). And  error 

   KErrEof orKErrCorrupt for scenario (2).

 */

 void CT_ProStep::testReadStreamL()

	{

	CFileStore* docStore=NULL;

	TUint appFileMode=EFileRead|EFileWrite;

	CStreamDictionary* streamDic=NULL;

	TRAPD(err,streamDic=CApaProcess::ReadRootStreamLC(iFs,docStore,KNEWPATH,appFileMode));

	TEST(err==KErrNotFound);

	delete docStore;

	delete streamDic;

	docStore=NULL;

	streamDic=NULL;

	appFileMode=EFileRead;

	TRAP(err,streamDic=CApaProcess::ReadRootStreamLC(iFs,docStore,KEMPTYFILEPATH,appFileMode));

	TEST(err==KErrCorrupt || err==KErrEof); 

	}

/**

   @SYMTestCaseID T-ProStep-testDocCreation1L

   @SYMPREQ

   @SYMTestCaseDesc Tests CApaProcess::AddNewDocumentL().

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions Create a process, call AddNewDocumentL() to create a new

   document for an app DLL by\n

   (1) passing full path of app.\n

   (2) passing full path of app and the Uid.\n

   In both cases call DestroyDocument() to destroy the document thus created.\n

   API Calls:\n	

   CApaProcess::NewL(const RFs& aFs,CApaAppFinder& aAppFinder)\n

   CApaProcess::AddNewDocumentL(const TDesC& aDllFileName,TUid aDllUid=KNullUid)\n

   CApaProcess::DestroyDocument(CApaDocument* aDoc)\n

   CApaProcess::ResetL()\n

   @SYMTestExpectedResults Test checks results against expected values.

 */

void CT_ProStep::testDocCreation1L()

	{

	const TFullName filePath=_L("c:\\docs\\tstapp.doc");

	INFO_PRINTF1(_L("Testing CApaProcess"));

	iFs.MkDirAll(filePath);

	// delete the file to be created by the testcode

	iFs.Delete(filePath);

	// create a process

	TRAPD(ret,iProcess = CApaProcess::NewL(iFs));

	TEST(ret==KErrNone);

	// create a new doc passing the full path of the app dll

	CApaDocument* doc=NULL;

	TApaApplicationFactory appFact(KUidTestApp);

	TRAP(ret,doc=iProcess->AddNewDocumentL(appFact));

	TEST(ret==KErrNone);

	iProcess->DestroyDocument(doc);

	doc = NULL;

	TRAP(ret,iProcess->ResetL());

	TEST(ret==KErrNone);

	}

/**

   @SYMTestCaseID T-ProStep-testDocCreation2L

   @SYMPREQ

   @SYMTestCaseDesc Tests CApaProcess::AddNewDocumentL().

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions Call AddNewDocumentL() to create a new document for an app DLL.

   Set it as the main document. Associate it with a temporary store. Initialize

   the document to default settings. Store the document.\n

   API Calls:\n	

   CApaProcess::AddNewDocumentL(const TDesC& aDllFileName,TUid aDllUid=KNullUid)\n

   CApaDocument::NewDocumentL()\n

   CApaDocument::SaveL()\n

   @SYMTestExpectedResults Test checks results against expected values.

 */

void CT_ProStep::testDocCreation2L()

	{

	const TFullName filePath=_L("c:\\docs\\tstapp.doc");

	CApaDocument* doc=NULL;

	TApaApplicationFactory appFact(KUidTestApp);

	TRAPD(ret,doc=iProcess->AddNewDocumentL(appFact));

	TEST(ret==KErrNone);

	iProcess->SetMainDocument(doc);

	CFileStore* store=NULL;

	// create the store and initialise it

	TRAP(ret, {

		store=doc->CreateFileStoreLC(iProcess->FsSession(),filePath);

		CleanupStack::Pop(); // store 

		});

	TEST(ret==KErrNone);

	((CTestAppDoc*)iProcess->MainDocument())->iStore = store;

	iProcess->SetMainDocFileName(filePath);

	// initialise the document with factory settings

	TRAP(ret, doc->NewDocumentL() );

	TEST(ret==KErrNone);

	// close it 

	TRAP(ret,doc->SaveL());

	TEST(ret==KErrNone);

	TRAP(ret, iProcess->ResetL() );

	TEST(ret==KErrNone);

	store = NULL;

	doc = NULL;

	}

/**

   @SYMTestCaseID T-ProStep-testDocCreation3L

   @SYMPREQ

   @SYMTestCaseDesc Tests CApaProcess::OpenNewDocumentL() and CApaAppFileReader APIs.

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions Create a document from a specified file. Set it as main

   document file. Create a CApaAppInfoFileReader object by calling

   OpenAppInfoFileL(). Use CaptionL() and CreateMaskedBitmapL() to read

   application information like caption and bitmap.\n

   API Calls:\n	

   CApaProcess::OpenNewDocumentL(CFileStore*& aStore,CStreamDictionary*& aStreamDic,const TDesC& aDocFullFileName,TUint aFileMode);\n

   CApaApplication::OpenAppInfoFileL() const\n

   CApaAppInfoFileReader::CaptionL(TLanguage aLanguage)\n

   CApaAppInfoFileReader::CreateMaskedBitmapL(TInt aIconSideInPixels)\n

   @SYMTestExpectedResults Test checks results against expected values.

 */

CApaDocument* CT_ProStep::testDocCreation3L()

	{

	// try re-opening it

	const TFullName filePath=_L("c:\\docs\\tstapp.doc");

	CStreamDictionary* streamDic=NULL;

	CApaDocument* doc=NULL;

	CFileStore* store=NULL;

	TRAPD(ret,doc=iProcess->OpenNewDocumentL(store,streamDic,filePath,EFileShareExclusive|EFileWrite));

	TEST(ret==KErrNone);

	delete streamDic;

	streamDic = NULL;

	iProcess->SetMainDocument(doc);

	iProcess->SetMainDocFileName(filePath);

	((CTestAppDoc*)iProcess->MainDocument())->iStore = store;

	// remove the main document

	iProcess->DestroyDocument(iProcess->MainDocument());

	TEST(iProcess->MainDocument()==NULL);

	// try re-opening the doc without the app in memory

	TRAP(ret,iProcess->ResetL());

	TEST(ret==KErrNone);

	delete iProcess;

	return doc;

	}

/**

   @SYMTestCaseID T-ProStep-testDocCreation4L

   @SYMPREQ

   @SYMTestCaseDesc Tests CApaProcess::OpenNewDocumentL(). 

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions Create a Process. Create a document for an app DLL from a 

   specified file by calling OpenNewDocumentL(). Call DestroyDocument() to

   delete the document.\n

   API Calls:\n	

   CApaProcess::OpenNewDocumentL(CFileStore*& aStore,CStreamDictionary*& aStreamDic,const TDesC& aDocFullFileName,TUint aFileMode);\n

   CApaProcess::DestroyDocument(CApaDocument* aDoc)\n

   @SYMTestExpectedResults Test checks results against expected values.

 */

void CT_ProStep::testDocCreation4L(CApaDocument* aDoc)

	{

	const TFullName filePath=_L("c:\\docs\\tstapp.doc");

	CStreamDictionary* streamDic=NULL;

	CFileStore* store=NULL;

	TRAPD(ret,iProcess = CApaProcess::NewL(iFs));

	TEST(ret==KErrNone);

	TRAP(ret,aDoc=iProcess->OpenNewDocumentL(store,streamDic,filePath,EFileShareExclusive|EFileWrite));

	TEST(ret==KErrNone);

	iProcess->DestroyDocument(aDoc);

	delete store;

	delete streamDic;

	// tidy up

	TRAP(ret,iProcess->ResetL());

	TEST(ret==KErrNone);

	delete iProcess;

	// delete the file created by the testcode

	iFs.Delete(filePath);

	}

/**

  Auxiliary Fn for Test Case ID T-ProStep-testDocCreation1L, T-ProStep-testDocCreation2L,

  T-ProStep-testDocCreation3L, T-ProStep-testDocCreation4L.

  The method initiates tests on operation such as creation, storing

  and deletion of a document.

*/

void CT_ProStep::testDocCreationL()

	{

	//Create a session with F & B server