// Copyright (c) 2007-2009 Nokia Corporation and/or its subsidiary(-ies).

// All rights reserved.

// This component and the accompanying materials are made available

// which accompanies this distribution, and is available

//

// Initial Contributors:

// Nokia Corporation - initial contribution.

//

// Contributors:

//

// Description:

// Test wrapper to Application Architecture Server.

// Tests Application information, Data recognition and application

// launching capabilities of the application architecture server.\n

// 

//

/**

 @file

 @test 

 @internalComponent - Internal Symbian test code

*/

#include <f32file.h>

#include <fbs.h>

#include <apaid.h>

#include <apgaplst.h>

#include <apaflrec.h>

#include "testableapalssession.h"

#include <apacmdln.h>

#include <apsserv.h>

#include <apfrec.h>

#include <datastor.h>

#include <apgicnfl.h>

#include <apasvst.h>

#include "tstapp.h"

//

#include <e32test.h>

#include "T_Serv2Step.h"

#include <coemain.h>

#include <eikenv.h>

#include "TAppEmbedUids.h"

#include "appfwk_test_utils.h"

// Constants

const TInt KOneSecondDelay = 1000000;

/**

  This function accepts a filename with full path and searches all available

  drives for the presence of file.

  The method returns Filename if a match is found. 

*/

TFileName CT_Serv2Step::SearchAndReturnCompleteFileName(const TDesC& aFileName)

	{

	RFs fs;

	TInt ret = fs.Connect();

	TEST(ret==KErrNone);

	TParsePtrC parse(aFileName);

	TFindFile findFile(fs);

	ret = findFile.FindByDir(parse.NameAndExt(), parse.Path());

	if (ret!=KErrNone)

		{

		TBuf<64> buffer;

		buffer.Format(_L("Error while finding the file, %d"), ret);

		}

	fs.Close();

	return findFile.File();

	}

/**

  @SYMTestCaseID T-Serv2Step-AppInfoTest1

  @SYMPREQ

  @SYMTestCaseDesc Test RApaLsSession::GetNextApp() 

  @SYMTestPriority High 

  @SYMTestStatus Implemented

  @SYMTestActions Call RApaLsSession::GetAllApps() to initialize the process of

  getting all applications in the cached list. Traverse the application list

  by calling RApaLsSession::GetNextApp() to search for application tstapp.

  Test the application info obtained from GetNextApp() to ensure the application

  info obtained is of tstapp. Complete traversal of the list to ensure that at

  the end of the list, the enum ENoMoreAppInList is returned by GetNextApp().\n

  API Calls:\n	

  RApaLsSession::GetAllApps() const\n

  RApaLsSession::GetNextApp(TApaAppInfo& aInfo) const\n

  @SYMTestExpectedResults The test compares the results obtained with expected values.

 */

void CT_Serv2Step::AppInfoTest1(RApaLsSession& aLs)

	{

	_LIT(KLitAppPath,"z:\\sys\\bin\\tstapp.exe");

	TFullName appPath(KLitAppPath);

	//Search for TestApp

	TApaAppInfo info;

	TInt ret = aLs.GetAllApps();

	TEST(ret==KErrNone);

	do

		{

		ret=aLs.GetNextApp(info);

		} 

		while (ret==KErrNone && info.iUid!=KUidTestApp);

	TEST(ret==KErrNone);

	info.iFullName.LowerCase();	

	TEST(info.iFullName.Compare(appPath) == 0);

	//Make sure ENoMoreAppsInList is returned at the end of list.

	do

		{

 		ret=aLs.GetNextApp(info);

 		}

 		while (ret != RApaLsSession::ENoMoreAppsInList);

 	ret=aLs.GetNextApp(info);

 	TEST(ret==RApaLsSession::ENoMoreAppsInList);

	}

/**

   @SYMTestCaseID T-Serv2Step-DoCheckServerIconLoadingBySizeL

   @SYMPREQ

   @SYMTestCaseDesc Test loading of Icon by size. 

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions Allocate a flat dynamic buffer which would hold available icon

   sizes for tstapp. Call RApaLsSession::GetAppIconSizes() to store the sizes

   of icons available for the app tstapp to the allocated flat dynamic buffer.

   Call RApaLsSession::GetAppIcon() by passing each of the icon sizes stored.

   Verify whether icon is retrieved each time by GetAppIcon().

   Test calling RApaLsSession::GetAppIcon() by specifying reduced size than

   the actual icon size. Since no match would be found, KErrNotFound should be

   returned. Test GetAppIcon() again by specifying an increased size than the

   actual icon size. Observe whether the GetAppIcon() in this case gets the

   closest icon available.\n

   API Calls:\n	

   RApaLsSession::GetAppIcon(TUid aAppUid, TSize aSize, CApaMaskedBitmap& aAppBitmap) const\n

   @SYMTestExpectedResults The results obtained are compared with the expected values to verify

   functionality of RApaLsSession::GetAppIcon().

 */

void CT_Serv2Step::DoCheckServerIconLoadingBySizeL(RApaLsSession& aLs)

	{

	CArrayFixFlat<TSize>* array=new(ELeave) CArrayFixFlat<TSize>(3);

	CleanupStack::PushL(array);

	TInt ret=KErrNone;

	ret=aLs.GetAppIconSizes(KUidTestApp,*array);

	if(ret==KErrNoMemory)

		User::Leave(KErrNoMemory);

	TEST(ret==KErrNone);

	TEST(array->Count());

	for(TInt i=0;i<array->Count();i++)

		{

		CApaMaskedBitmap* iconBySize=CApaMaskedBitmap::NewLC();

		ret=aLs.GetAppIcon(KUidTestApp,(*array)[i],*iconBySize); //by Size

		if(ret==KErrNoMemory)

			User::Leave(KErrNoMemory);

		TEST(ret==KErrNone);

		TEST(iconBySize->SizeInPixels()==(*array)[i]);

		CleanupStack::PopAndDestroy(); //iconBySize

		}

	// now try non exact sizes

	CApaMaskedBitmap* iconBySize=CApaMaskedBitmap::NewLC();

	ret=aLs.GetAppIcon(KUidTestApp,((*array)[0])+TSize(-5,-5),*iconBySize); //by Size

	if(ret==KErrNoMemory)

		User::Leave(KErrNoMemory);

	TEST(ret==KErrNotFound);

	CleanupStack::PopAndDestroy(); //iconBySize

	for(TInt ii=0;ii<array->Count();ii++)

		{

		CApaMaskedBitmap* iconBySize=CApaMaskedBitmap::NewLC();

		ret=aLs.GetAppIcon(KUidTestApp,((*array)[ii])+TSize(5,5),*iconBySize); //by Size

		if(ret==KErrNoMemory)

			User::Leave(KErrNoMemory);

		TEST(ret==KErrNone);

		TEST(iconBySize->SizeInPixels()==(*array)[ii]); // should get size below always!!!

		CleanupStack::PopAndDestroy(); //iconBySize

		}

	CleanupStack::PopAndDestroy(); //array

	}

/**

   @SYMTestCaseID T-Serv2Step-AppInfoTest3

   @SYMPREQ

   @SYMTestCaseDesc Test RApaLsSession::GetNextApp() 

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions Call RApaLsSession::GetAllApps() to initialize the process of

   getting all applications in the cached list. Traverse the application list

   by calling RApaLsSession::GetNextApp() to search for application tstapp.

   Test the application information obtained from GetNextApp() to ensure that

   information retrieved is of tstapp.\n

   API Calls:\n	

   RApaLsSession::GetAllApps() const\n

   RApaLsSession::GetNextApp(TApaAppInfo& aInfo) const\n

   @SYMTestExpectedResults The test compares the results obtained with expected values.

 */

void CT_Serv2Step::AppInfoTest3(RApaLsSession& aLs)

	{

	_LIT(KLitAppPath,"z:\\sys\\bin\\tstapp.exe");

	TFullName appPath(KLitAppPath);

	// get the first app...

	TApaAppInfo info;

	TInt ret = aLs.GetAllApps();

	TEST(ret==KErrNone);

	do

		{

		aLs.GetNextApp(info);

		}

		while (info.iUid!=KUidTestApp);

	TEST(ret==KErrNone);

	TEST(info.iUid==KUidTestApp);

	info.iFullName.LowerCase();	

	TEST(info.iFullName.Compare(appPath) == 0);

	}

/**

   @SYMTestCaseID T-Serv2Step-AppInfoTest4

   @SYMPREQ

   @SYMTestCaseDesc Test RApaLsSession::GetAppInfo(). 

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions Call RApaLsSession::GetAppInfo() by passing the Uid of test

   application tstapp and test the application info obtained from GetAppInfo()

   to ensure the obtained information is of test application tstapp.\n

   API Calls:\n	

   RApaLsSession::GetAppInfo(TApaAppInfo& aInfo,TUid aAppUid) const\n

   @SYMTestExpectedResults The test confirms that RApaLsSession::GetAppInfo()

   returns the expected application info.

 */

void CT_Serv2Step::AppInfoTest4(RApaLsSession& aLs)

	{

	_LIT(KLitAppPath,"z:\\sys\\bin\\tstapp.exe");

	TFullName appPath(KLitAppPath);

	// Get info for an app that exists

	TApaAppInfo info;

	TInt ret = aLs.GetAppInfo(info,KUidTestApp);

	TEST(ret==KErrNone);

	TEST(info.iUid==KUidTestApp);

	info.iFullName.LowerCase();	

	TEST(info.iFullName.Compare(appPath) == 0);

	}

/**

   @SYMTestCaseID T-Serv2Step-AppInfoTest5

   @SYMPREQ

   @SYMTestCaseDesc Test if RApaLsSession::GetAppInfo() return KErrNotFound. 

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions The method calls RApaLsSession::GetAppInfo() by passing the null Uid

   KNullUid. Observe whether KErrNotFound is returned when Uid that doesn't match

   is passed to GetAppInfo().\n

   API Calls:\n	

   RApaLsSession::GetAppInfo(TApaAppInfo& aInfo,TUid aAppUid) const\n

   @SYMTestExpectedResults The test confirms RApaLsSession::GetAppInfo() returns

   KErrNotFound when no match is found for the Uid passed.\n

 */

void CT_Serv2Step::AppInfoTest5(RApaLsSession& aLs)

	{

	// get info for a non-existant app

	TApaAppInfo info;

	TInt ret = aLs.GetAppInfo(info,KNullUid);

	TEST(ret==KErrNotFound);

	}

/**

  Auxiliary Fn for Test Case ID T-Serv2Step-AppInfoTest1, T-Serv2Step-AppInfoTest3, T-Serv2Step-AppInfoTest4, T-Serv2Step-AppInfoTest5

  This function initiates test for retrieving Application Information.

*/

void CT_Serv2Step::DoAppInfoTests(RApaLsSession& aLs)

	{

	AppInfoTest1(aLs);

	AppInfoTest3(aLs);

	AppInfoTest4(aLs);

	AppInfoTest5(aLs);

	}

/**

   @SYMTestCaseID T-Serv2Step-StartAppTests1L

   @SYMPREQ

   @SYMTestCaseDesc Test Launching of an application. 

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions Prepare command line information to start an application using

   CApaCommandLine Apis.Call RApaLsSession::StartApp() to start an

   application defined by the command line information.\n

   Test the launching of application for following scenarios:\n

   (1) When Application specified by command line exists.\n

   (2) When Application specified by command line does not exist.\n

   API Calls:\n	

   RApaLsSession::StartApp(const CApaCommandLine& aCommandLine)\n

   @SYMTestExpectedResults The test observes that StartApp() returns KErrNone and

   starts the app in the first scenario. In the second case KErrNotFound is

   returned.

 */	

void CT_Serv2Step::StartAppTests1L(RApaLsSession& aLs)

{

	CApaCommandLine* cmdLn=CApaCommandLine::NewLC();

	TFileName filename;

	_LIT(KLitExePath,"\\sys\\bin\\texe.exe");

	TFullName exePath(KLitExePath);

	filename = SearchAndReturnCompleteFileName(exePath);

	_LIT8(KLitDogfish,"dogfish");

	_LIT(KLitWibble,"wibble");

	cmdLn->SetExecutableNameL(filename);

	cmdLn->SetTailEndL(KLitDogfish);

	TInt ret = aLs.StartApp(*cmdLn); // explicit

	TEST(ret==KErrNone);

	// start a non-existant app

	cmdLn->SetExecutableNameL(KLitWibble);

	ret = aLs.StartApp(*cmdLn);

	TEST(ret==KErrNotFound);

	//

	//

	CleanupStack::PopAndDestroy(); // cmdLn

}

/**

 * @SYMTestCaseID T_Serv2Step_StartAppTests4L

 *

 * @SYMPREQ

 *

 * @SYMTestCaseDesc Test Launching of an application. 

 * 

 * @SYMTestActions Call RApaLsSession::StartDocument() to start an

 * application defined by the command line information.\n

 * Test the launching of application for following scenarios:\n

 * (1) When Application specified by command line is EmbeddableOnly.\n

 * (2) When Application specified by command line is EmbeddableUiNotStandAlone.\n

 * (3) When Application specified by command line is Embeddable or StandAlone.\n

 * API Calls:\n	

 * RApaLsSession::StartDocument(const TDesC &aFileName, TUid aAppUid, TThreadId &aId, TLaunchType aLaunchType=ELaunchNewApp)\n

 * 

 * @SYMTestExpectedResults The test observes that StartDocument() returns KErrNone and

 * starts the app in the third scenario. In the first and second case KErrNotSupported is

 * returned.

 *  

 */	

void CT_Serv2Step::StartAppTests4L(RApaLsSession& aLs)

	{

	TInt ret;

	TThreadId id;

	_LIT(KLitSdkDocPath,"\\system\\data\\sdk.txt");

	TFileName filename = SearchAndReturnCompleteFileName(KLitSdkDocPath);

	// Test starting a file using an app which can be embeddable only.

	ret=aLs.StartDocument(filename,KUidAppEmbeddableUiNotStandAlone,id);

	TEST(ret==KErrNotSupported);

	// Test starting a file using an app which can be embeddable only.

	ret=aLs.StartDocument(filename,KUidAppEmbeddableOnly,id);

	TEST(ret==KErrNotSupported);

	// Test starting a file using an app which can be embeddable or standalone.

	ret=aLs.StartDocument(filename,KUidAppEmbeddable,id);

	TEST(ret==KErrNone);

	}

/**

* Auxiliary Fn for Test Case ID T_Serv2Step_StartAppTests1L, T_Serv2Step_StartAppTests3L,StartAppTests4L(aLs)

*

* This method tests launching of an application from command line by calling

* CT_Serv2Step::StartAppTests1L().

*

*/

void CT_Serv2Step::DoStartAppTestsL(RApaLsSession& aLs)

	{

	INFO_PRINTF1(_L("Checking application launching"));

	// start the test exe

	StartAppTests1L(aLs);

    StartAppTests4L(aLs);

	}

/**

   @SYMTestCaseID T-Serv2Step-DoEnquiryTestsL

   @SYMPREQ

   @SYMTestCaseDesc Tests querying of data (MIME) type information. 

   @SYMTestPriority High 

   @SYMTestStatus Implemented

   @SYMTestActions Test setting and getting the confidence threshold for

   successful data recognition by calling RApaLsSession::SetAcceptedConfidence()

   and RApaLsSession::GetAcceptedConfidence().\n

   Test setting and getting maximum size of the data that can be read

   from a file for the purpose of recognizing the data type by calling

   RApaLsSession::SetMaxDataBufSize() and RApaLsSession::GetMaxDataBufSize().

   Finally test retrieval of all supported data (MIME) types.\n

   API Calls:\n	

   RApaLsSession::SetAcceptedConfidence(TInt aConfidence)\n

   RApaLsSession::GetAcceptedConfidence(TInt& aConfidence) const\n

   RApaLsSession::SetMaxDataBufSize(TInt aBufSize)\n

   RApaLsSession::GetMaxDataBufSize(TInt& aBufSize) const\n

   RApaLsSession::GetSupportedDataTypesL(CDataTypeArray& aDataTypes) const\n

   @SYMTestExpectedResults Test results against expected values.

 */

void CT_Serv2Step::DoEnquiryTestsL(RApaLsSession& aLs)

	{

	TInt temp=1234;

	TInt ret;

	TSecurityInfo info;

	info.Set(RProcess());

	TBool hasCapability=info.iCaps.HasCapability(ECapabilityWriteDeviceData);

	if(hasCapability)

		{

		ret=aLs.SetAcceptedConfidence(temp);

		INFO_PRINTF2(_L(" Error= %d \n"),ret);

		TEST(ret==KErrNone);

		}

	else

		{

		ret=aLs.SetAcceptedConfidence(temp);

		INFO_PRINTF2(_L(" Error= %d \n"),ret);

		TEST(ret==KErrPermissionDenied);

		}

	temp=0;

	ret=aLs.GetAcceptedConfidence(temp);

	TEST(ret==KErrNone);

	TEST(temp==1234);

	ret=aLs.SetMaxDataBufSize(temp);

	TEST(ret==KErrNone);

	temp=0;

	ret=aLs.GetMaxDataBufSize(temp);

	CDataTypeArray* dataTypes=new(ELeave) CDataTypeArray(5);

	CleanupStack::PushL(dataTypes);

	TInt err=0;

	TInt failRate=0;

	for (failRate=1;failRate<=KMaxTInt;failRate++)

		{

		__UHEAP_RESET;

		__UHEAP_SETFAIL(RHeap::EFailNext,failRate);

		TRAP(err, ret=aLs.GetSupportedDataTypesL(*dataTypes));

		if (err!=KErrNoMemory)

			{

		 	if (err==KErrNone)

		 		{

		 		err=ret;

		 		}

		 	break;

		 	}

		}

	__UHEAP_RESET;

	TEST(ret==KErrNone);

	TEST(err==KErrNone);

	TEST(dataTypes->Count()>=4);

	CleanupStack::PopAndDestroy(); // dataTypes

	}

/**

   @SYMTestCaseID T-Serv2-DoGetAllApps

   @SYMPREQ PHAR-5Q4FX8

   @SYMTestCaseDesc

   Check that RApaLsSession::GetAllApps() hasn't been

   affected by the new code to filter the app list

   based on embeddability (implemented for CR PHAR-5Q4FX8)