/*

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of the License "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: 

* Application Processor.

*

*/

/**

 @file 

 @released

 @internalTechnology 

*/

#include <hash.h>

#include "installationprocessor.h"

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

#include <usif/sts/sts.h>

#include "swtypereginfo.h"

#include "installswtypehelper.h"

#else

#include "integrityservices.h"

#endif

#include "sisregistryentry.h"

#include "sishelperclient.h"

#include "sisregistryfiledescription.h"

#include "sisregistrypackage.h"

#include "sisstring.h"

#include "hashcontainer.h"

#include "siscontroller.h"

#include "application.h"

#include "userselections.h"

#include "log.h"

#include "secutils.h"

#include "sisuihandler.h"

#include "filesisdataprovider.h"

#include "securitymanager.h"

#include "securitypolicy.h"

#include "sislauncherclient.h"

#include "sisinfo.h"

#include "sisuid.h"

#include "plan.h"

#include "sidcache.h"

#include "sistruststatus.h"

#include "securitycheckutil.h"

#include "sisfieldtypes.h"

#include "progressbar.h"

#include "fileextractor.h"

#include "securitycheckutil.h"

using namespace Swi;

_LIT(KApparcRegDir, "\\private\\10003a3f\\import\\apps\\");

_LIT(KSisExt, ".sis");

const TInt KSwiDaemonUid = 0x10202DCE;

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

CInstallationProcessor* CInstallationProcessor::NewL(const CPlan& aPlan, CSecurityManager &aSecurityManager, 

	RSisHelper& aSisHelper, RUiHandler& aUiHandler, 

	Usif::RStsSession& aStsSession, CRegistryWrapper& aRegistryWrapper,

	const TDesC8& aControllerData, RSwiObserverSession& aObserver)

	{

	CInstallationProcessor* self = CInstallationProcessor::NewLC(aPlan, 

		aSecurityManager, aSisHelper, aUiHandler, aStsSession, aRegistryWrapper, 

		aControllerData, aObserver);

	CleanupStack::Pop(self);

	return self;

	}

#else

CInstallationProcessor* CInstallationProcessor::NewL(const CPlan& aPlan, CSecurityManager &aSecurityManager, 

	RSisHelper& aSisHelper, RUiHandler& aUiHandler, 

	CIntegrityServices& aIntegrityServices, const TDesC8& aControllerData, RSwiObserverSession& aObserver)

	{

	CInstallationProcessor* self = CInstallationProcessor::NewLC(aPlan, 

		aSecurityManager, aSisHelper, aUiHandler, aIntegrityServices, aControllerData, aObserver);

	CleanupStack::Pop(self);

	return self;

	}

#endif

CInstallationProcessor* CInstallationProcessor::NewL(CInstallationProcessor& aProcessor)

	{

	CInstallationProcessor* self = CInstallationProcessor::NewLC(aProcessor.Plan(), 

		aProcessor.iSecurityManager, aProcessor.iSisHelper, aProcessor.UiHandler(), 

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

		aProcessor.TransactionSession(), aProcessor.iRegistryWrapper,

#else

		aProcessor.IntegrityServices(),

#endif

		aProcessor.iControllerData, aProcessor.Observer());

	CleanupStack::Pop(self);

	return self;

	}

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

CInstallationProcessor* CInstallationProcessor::NewLC(

	const CPlan& aPlan, CSecurityManager &aSecurityManager, 

	RSisHelper& aSisHelper, RUiHandler& aUiHandler, 

	Usif::RStsSession& aStsSession, CRegistryWrapper& aRegistryWrapper,

	const TDesC8& aControllerData, RSwiObserverSession& aObserver)

	{

	CInstallationProcessor* self = new(ELeave) CInstallationProcessor(aPlan, 

		aSecurityManager, aSisHelper, aUiHandler, aStsSession, aRegistryWrapper, 

		aControllerData, aObserver);

	CleanupStack::PushL(self);

	self->ConstructL();

	return self;

	}

#else

CInstallationProcessor* CInstallationProcessor::NewLC(

	const CPlan& aPlan, CSecurityManager &aSecurityManager, 

	RSisHelper& aSisHelper, RUiHandler& aUiHandler, 

	CIntegrityServices& aIntegrityServices, const TDesC8& aControllerData, RSwiObserverSession& aObserver)

	{

	CInstallationProcessor* self = new(ELeave) CInstallationProcessor(aPlan, 

		aSecurityManager, aSisHelper, aUiHandler, aIntegrityServices, aControllerData, aObserver);

	CleanupStack::PushL(self);

	self->ConstructL();

	return self;

	}

#endif

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

CInstallationProcessor::CInstallationProcessor(const CPlan& aPlan, 

	CSecurityManager &aSecurityManager, RSisHelper& aSisHelper, 

	RUiHandler& aUiHandler, Usif::RStsSession& aStsSession, 

	CRegistryWrapper& aRegistryWrapper,

	const TDesC8& aControllerData, RSwiObserverSession& aObserver)

	: CProcessor(aPlan, aUiHandler, aStsSession, aRegistryWrapper, aObserver), 

	iSecurityManager(aSecurityManager), 

	iSisHelper(aSisHelper),

	iControllerData(aControllerData)

	{

	}

#else

CInstallationProcessor::CInstallationProcessor(const CPlan& aPlan, 

	CSecurityManager &aSecurityManager, RSisHelper& aSisHelper, 

	RUiHandler& aUiHandler, CIntegrityServices& aIntegrityServices, 

	const TDesC8& aControllerData, RSwiObserverSession& aObserver)

	: CProcessor(aPlan, aUiHandler, aIntegrityServices, aObserver), 

	iSecurityManager(aSecurityManager), 

	iSisHelper(aSisHelper),

	iControllerData(aControllerData)

	{

	}

#endif

CInstallationProcessor::~CInstallationProcessor()

	{

	Cancel();

	delete iEmbeddedProcessor;

	delete iFileExtractor;

	iFilesToCopy.ResetAndDestroy();

	iApparcRegFiles.ResetAndDestroy();

	iLoader.Close();

	iSkipFile.Close();

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

	iSoftwareTypeRegInfoArray.Close();

#endif

	}

void CInstallationProcessor::ConstructL()

	{

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

	CProcessor::ConstructL();

	iFileExtractor=CFileExtractor::NewL(Fs(), iSisHelper, UiHandler(), Plan().AppInfoL());

	}

void CInstallationProcessor::DoCancel()

	{

	CProcessor::DoCancel();

	if (iEmbeddedProcessor && iEmbeddedProcessor->IsActive())

		{

		iEmbeddedProcessor->Cancel();

		}

	if (iFileExtractor->IsActive())

		{

		iFileExtractor->Cancel();

		}

	}

void CInstallationProcessor::DisplayFileL(const CSisRegistryFileDescription& aFileDescription, Sis::TSISFileOperationOptions aFileOperationOption)

	{

	// Default to continue

	TFileTextOption fileTextOption(EInstFileTextOptionContinue);

	bool forceAbortFlag = EFalse;

	if (aFileOperationOption & Sis::EInstFileTextOptionSkipIfNo)

		{

		fileTextOption=EInstFileTextOptionSkipOneIfNo;

		}

	else if (aFileOperationOption & Sis::EInstFileTextOptionAbortIfNo)

		{

		fileTextOption=EInstFileTextOptionAbortIfNo;

		}

	else if (aFileOperationOption & Sis::EInstFileTextOptionExitIfNo)

		{

		fileTextOption=EInstFileTextOptionExitIfNo;

		}

	else if (aFileOperationOption & Sis::EInstFileTextOptionForceAbort)

		{

		//converts FA option to TC option.

		fileTextOption=EInstFileTextOptionContinue;

		forceAbortFlag = ETrue;

		}

	TFileName temporaryFileName;

	TemporaryFileNameLC(aFileDescription, temporaryFileName);

	EnsureTemporaryInstallDirExistsL(temporaryFileName);

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

	TransactionSession().RegisterTemporaryL(temporaryFileName);

#else

	IntegrityServices().TemporaryL(temporaryFileName);

#endif

	//	Extract this file to its temporary location.

	// However this file may have already been extracted, due to displaying it as

	// text, so we don't need to extract it again under this circumstance

	RFile temporaryFile;

	TInt err = temporaryFile.Create(Fs(), temporaryFileName, EFileWrite);

	if (err==KErrNone)

		{

		// We are passing the file handle to SISHelper but still need to close 

		// it here.

		CleanupClosePushL(temporaryFile);

		User::LeaveIfError(iSisHelper.ExtractFileL(Fs(), temporaryFile,

			aFileDescription.Index(), ApplicationL().AbsoluteDataIndex(), UiHandler()));

		CleanupStack::PopAndDestroy(&temporaryFile);

		}

	else if (err != KErrAlreadyExists)

		{

		User::Leave(err);

		}

	User::LeaveIfError(temporaryFile.Open(Fs(), temporaryFileName, EFileRead));

	CleanupClosePushL(temporaryFile);

	TInt fileSize=0;

	User::LeaveIfError(temporaryFile.Size( fileSize));

	HBufC8* text=HBufC8::NewMaxLC(fileSize);

	TPtr8 textPtr(text->Des());

	User::LeaveIfError(temporaryFile.Read(textPtr));	

	CDisplayText* displayText = NULL;

	displayText = CDisplayText::NewLC(Plan().AppInfoL(), fileTextOption, textPtr);

	UiHandler().ExecuteL(*displayText);

	switch (fileTextOption)

		{

		case EInstFileTextOptionContinue:

		//for FA option ,raise a TC dialog and abort the installation.

		if(forceAbortFlag)

			{

			User::Leave(KErrCancel);

			}

		break;

		case EInstFileTextOptionSkipOneIfNo:

			{

			iSkipFile.AppendL(displayText->ReturnResult());

			}

		break;

		case EInstFileTextOptionAbortIfNo:

		case EInstFileTextOptionExitIfNo:

		if (!displayText->ReturnResult())	

			{

			User::Leave(KErrCancel);

			}

		break;			

		}

	CleanupStack::PopAndDestroy(3, &temporaryFile);

	}

TBool CInstallationProcessor::ExtractFileL(CSisRegistryFileDescription& aFileToExtract)

	{

	DEBUG_PRINTF2(_L("Install Server - Installation Processor Extracting File '%S'"),

		&aFileToExtract.Target());

	if (ApplicationL().IsPreInstalledApp() || ApplicationL().IsPreInstalledPatch()

			|| aFileToExtract.Operation() == Sis::EOpNull)

		{

		// This file will not really be copied, but still need to update the progress bar.

		// Increment for extract stage (scaled by file size)

		TInt ammount = ProgressBarFileIncrement(aFileToExtract.UncompressedLength());

		// Increment for install/copy stage

		ammount += KProgressBarEndIncrement;

		UiHandler().UpdateProgressBarL(Plan().AppInfoL(), ammount);

		// move onto next file

		return EFalse;	

		}

	TFileName temporaryFileName;

	TemporaryFileNameLC(aFileToExtract, temporaryFileName);

	// Add to the list of files to copy

	CFileCopyDescription* fileCopyDescription=CFileCopyDescription::NewLC(

		temporaryFileName, aFileToExtract);

	User::LeaveIfError(iFilesToCopy.Append(fileCopyDescription));

	CleanupStack::Pop(fileCopyDescription);	// Ownership is transferred

	EnsureTemporaryInstallDirExistsL(temporaryFileName);

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

	TransactionSession().RegisterTemporaryL(temporaryFileName);

#else

	IntegrityServices().TemporaryL(temporaryFileName);

#endif

	iFileExtractor->ExtractFileL(ApplicationL().AbsoluteDataIndex(), aFileToExtract, temporaryFileName, iStatus);

	return ETrue;

	}

void CInstallationProcessor::DoExtractHashL(const CSisRegistryFileDescription& aFileToProcess)

	{

	TParsePtrC targetPath(aFileToProcess.Target());

	// If the target is in sys\bin, write its hash into \sys\hash and name

	// it after the file.  The check in the process file state will ensure

	// that it must be a valid exe or dll to get this far.

	if (targetPath.Path().CompareF(KBinPath) == 0)

		{

		ExtractHashL(aFileToProcess.Target(), aFileToProcess.Hash());

		}	

	}

void CInstallationProcessor::CheckHashL(const CSisRegistryFileDescription& aFileToProcess, const TDesC& aCurrentFileName)

	{

	const CHashContainer& hash = aFileToProcess.Hash();

	// Calculate and check correct hash value

	CFileSisDataProvider* fileDataProvider=CFileSisDataProvider::NewLC(Fs(), aCurrentFileName);

	TBool hashIsValid=iSecurityManager.VerifyFileHashL(*fileDataProvider,hash);

	CleanupStack::PopAndDestroy(fileDataProvider);

	if (!hashIsValid)

		{

		User::Leave(KErrCorrupt);

		}

	}

void CInstallationProcessor::EnsureTemporaryInstallDirExistsL(const TDesC& aFileTarget)

	{

	TInt err = Fs().MkDirAll(aFileTarget);

	if (err!= KErrNone && err != KErrAlreadyExists)

		{

		User::LeaveIfError(err);

		}

	}

void CInstallationProcessor::TemporaryFileNameLC(const CSisRegistryFileDescription& aFileToExtract, TDes& aTemporaryFileName)

	{

	static TInt localTempCnt = 0;

	TChar drive;

	if(aFileToExtract.Target().Length())

		{

		// set temporary drive to be same as final target

		drive = aFileToExtract.Target()[0];

		}

	else

		{

		// set temporary drive to the user selected drive

		drive = ApplicationL().UserSelections().Drive();

		}

 	// If no drive has been selected then use the C drive for

 	// temporary files. This should only happen if the SIS file

 	// just contains text files to display but not install.

 	if (drive == TChar(KNoDriveSelected))

 		{

 		drive = iSystemDriveChar;

		}

	// construct the temporary filename

	// Format is  {Drive}:\sys\install\temp\file-{Data Unit}-{File Index}-{LocalCounter}

	_LIT(KTemporaryFileFormat, "%c:%Sfile-%d-%d-%d");

	TUint driveCh(drive); // Can't pass TChar to Format.

	aTemporaryFileName.Format(KTemporaryFileFormat, driveCh, &KSysInstallTempPath, 

							 ApplicationL().AbsoluteDataIndex(), aFileToExtract.Index(),

							 localTempCnt++);

	}

///\short Extracts executable hash from controller to file for the loader

void CInstallationProcessor::ExtractHashL(const TFileName& aFileName, 

	const CHashContainer& aHash)

	{	

	const TDesC8& hashData = aHash.Data();

	TBuf<32> hashPath;	

	TUint driveCh(iSystemDriveChar); // can't pass TChar to Format

	hashPath.Format(KHashPathFormat, driveCh, &KHashPath);	

	TParse hashFileName;

	hashFileName.Set(hashPath, &aFileName, NULL);

	TInt err = Fs().MkDirAll(hashFileName.DriveAndPath());

	if (err!=KErrNone && err!=KErrAlreadyExists)

		{

		User::LeaveIfError(err);

		}

	// If the hash already exists, leave with KErrAlreadyExists

	TEntry hashEntry;

	if ( KErrNone == Fs().Entry(hashFileName.FullName(), hashEntry))

		{

		User::Leave( KErrAlreadyExists );

		}

	DEBUG_PRINTF2(_L("Install Server - Installation Processor, extracting hash file '%S'"), 

		&(hashFileName.FullName()));

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

	TransactionSession().RegisterNewL(hashFileName.FullName());

#else

	IntegrityServices().AddL(hashFileName.FullName());

#endif

	RFile file;

	User::LeaveIfError(file.Create(Fs(), hashFileName.FullName(), 

		EFileWrite|EFileShareExclusive|EFileStream));

	CleanupClosePushL(file);

	User::LeaveIfError(file.Write(hashData));

	CleanupStack::PopAndDestroy(&file);

	//Write a SWI event log for this hash file

	TUint8 fileFlag(EFileAdded);

	CObservationData *event = CObservationData::NewLC(hashFileName.FullName(),TUid::Null(),fileFlag);

	Observer().AddEventL(*event);

	CleanupStack::PopAndDestroy(event);

	}

void CInstallationProcessor::VerifyInstallPathL(const CSisRegistryFileDescription& aFileDescription)

	{

	// Check the target path of every file is legal

	SecurityCheckUtil::TProtectedDirectoryCheckError targetError;

	// sis file signed by Su Cert are allowed to install files in private dir 

	// without corresponding executable in the package.

	if (ApplicationL().IsInstallSuCertBased())

		{

		return;

		}

	TBool pathOk = SecurityCheckUtil::CheckProtectedDirectoriesL(

		aFileDescription.Target(), aFileDescription.Operation(), iSidsAdded, targetError);

	if (!pathOk)

		{

		/// Initialized to  EUiSIDMismatch to make RVCT Compiler happy / supress the warnings during ARM build.

		TErrorDialog uiError = EUiSIDMismatch;

		switch(targetError)

			{

			case SecurityCheckUtil::ESIDMismatch:

			uiError = EUiSIDMismatch;

			break;

			case SecurityCheckUtil::EInvalidFileName:

			uiError = EUiInvalidFileName;

			break;

			default:

			User::Leave(KErrNotSupported);

			}

		CDisplayError* cmd=CDisplayError::NewLC(Plan().AppInfoL(),uiError,KNullDesC);

		UiHandler().ExecuteL(*cmd);

		CleanupStack::PopAndDestroy(cmd);

		User::Leave(KErrAccessDenied);			

		}		

	}

void CInstallationProcessor::InstallFileL(const CFileCopyDescription& aFileCopyDescription)

	{

	DEBUG_PRINTF2(_L("Install Server - Installation Processor, installing file to '%S'"),

		&aFileCopyDescription.FileDescription().Target());

	// move file to it's final location

#ifdef SYMBIAN_UNIVERSAL_INSTALL_FRAMEWORK

	TransactionSession().RegisterNewL(aFileCopyDescription.FileDescription().Target());

#else

	IntegrityServices().AddL(aFileCopyDescription.FileDescription().Target());

#endif

	// Move try 1 of 3

	TInt err =Fs().Rename(aFileCopyDescription.TemporaryFileName(), aFileCopyDescription.FileDescription().Target());

	if(err != KErrNone)

		{

		// Move failed - maybe dir did not exist

		(void) Fs().MkDirAll(aFileCopyDescription.FileDescription().Target());

		// Move try 2 of 3

		err =Fs().Rename(aFileCopyDescription.TemporaryFileName(), aFileCopyDescription.FileDescription().Target());

		if(err != KErrNone)

			{

			// Maybe destination already exists?

			// Is this possible? Or would install have deleted file earlier!?!?

			// Clear Read only attributes and delete the file

			Fs().SetAtt(aFileCopyDescription.FileDescription().Target(), 0, KEntryAttReadOnly);

			iLoader.Delete(aFileCopyDescription.FileDescription().Target()); // ignore failure here since the rename will fail instead

			// Move try 3 of 3