/*

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

* 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: 

*

*/

#include <e32debug.h>

#include <ecom/ecom.h>

#include "resolver.h"

#include <caf/agentfactory.h>

#include <caf/agentinterface.h>

#include "agentinfo.h"

#include <caf/agent.h>

#include <caf/cafpanic.h>

#include <caf/caferr.h>

#include <caf/patchdata.h>

using namespace ContentAccess;

// Constants for the F32 agent

_LIT(KF32Agent,"F32 CA Agent");

_LIT(KParentDir, "..\\");

_LIT(KPrivateDir, "\\private\\");

const TInt KPrivateDirLength = 9;   // "\\private\\"

const TInt KPrivateDirAndDriveLength = 11;   // "x:\\private\\"

const TInt KPrivateDirOffset = 2; // "x:\\"

EXPORT_C CAgentResolver* CAgentResolver::NewLC(const TBool aDynamicAgentUpdate)

	{

	CAgentResolver* self = new (ELeave) CAgentResolver(aDynamicAgentUpdate);

	CleanupStack::PushL(self);

	self->ConstructL();

	return self;

	}

EXPORT_C CAgentResolver* CAgentResolver::NewL(const TBool aDynamicAgentUpdate)

	{

	CAgentResolver* self = CAgentResolver::NewLC(aDynamicAgentUpdate);

	CleanupStack::Pop(self);

	return self;

	}

CAgentResolver::CAgentResolver(const TBool aDynamicAgentUpdate) : CActive(EPriorityStandard), iDynamicAgentUpdate(aDynamicAgentUpdate)

	{

	}

CAgentResolver::~CAgentResolver()

	{

	// remove ourselves from the ActiveScheduler

	if(IsAdded())

		{

		Deque();

		}

	// Unload all the agents

	DestroyListOfAgents();

	// Close our ECOM session

	if(iEcomSession)

		{

		if(iDynamicAgentUpdate)

			{

			iEcomSession->CancelNotifyOnChange(iStatus);

			}

		iEcomSession->Close();

		REComSession::FinalClose();

		}

	iSupplierMimeTypes.Close();

	iConsumerMimeTypes.Close();

	iAgentInfos.Close();

	}

void CAgentResolver::ConstructL()

	{

	if(iDynamicAgentUpdate)

		{

		// Add ourselves to the current active scheduler so we can get dynamic 

		// updates when agents are removed or new agents are added

		CActiveScheduler::Add(this);

		}

	iEcomSession = &REComSession::OpenL();

	// find all the agents

	BuildListOfAgentsL();

	if(iDynamicAgentUpdate)

		{

		// register for ECOM update notifications in case a new agent appears

		SetActive();

		iEcomSession->NotifyOnChange(iStatus);

		}

	}

void CAgentResolver::BuildListOfAgentsL()

	{

	TInt err = KErrNone;

	// Get all plugins which implement the agent interface

	RImplInfoPtrArray implArray;

	CleanupStack::PushL(TCleanupItem(CleanImplArray, &implArray));

	REComSession::ListImplementationsL(KCAAgentInterfaceUid, implArray);

	for (TInt i = 0; i < implArray.Count(); ++i)

		{

#ifdef __EPOC32__

		// On hardware - to load agents from sources other than ROM the patch 

		// data KCafLoadPostProductionAgents must be set to True (non-zero).

		// Default SymbianOS behavior is to only load agents from ROM

		if ((KCafLoadPostProductionAgents == 0) &&

            !implArray[i]->RomBased())

			{

			// If the agent is not in ROM, don't load it because it might

			// be a security risk.

			continue;

			}

#endif

		// Construct all the agent infos from these implementations

		TRAP(err, AddAgentL(*implArray[i]));

		// If we ran out of memory proagate the leave to the caller

		// otherwise don't let a dodgy agent affect the construction of the other

		// agents

		if(err == KErrNoMemory)

			{

			User::Leave(KErrNoMemory);

			}

		}

	CleanupStack::PopAndDestroy(&implArray);  

	if (!iDefaultAgent)

		{

		// If we didn't find a default agent, we have a big problem so panic

		User::Panic(KCafPanicString, ECafPanicNoF32Agent);

		}

	}

void CAgentResolver::AddAgentL(const CImplementationInformation& aImplInfo)

	{

	// Create a CAgentInfo instance

	CAgentInfo* agentInfo = CAgentInfo::NewLC(aImplInfo);

	if(IsF32Agent(*agentInfo))

		{

		// It's the F32 Agent

		if(iDefaultAgent)

			{

			// If we already have a default agent something is seriously wrong

			User::Panic(KCafPanicString, ECafPanicDuplicateF32Agent);

			}

		// Note that the default agent is NOT stored in the agents list, it is a special case

		iDefaultAgent = agentInfo;

		CleanupStack::Pop(agentInfo);

		}

	else

		{

		// All other agents go in the agent list

		User::LeaveIfError(iAgentInfos.Append(agentInfo));

		CleanupStack::Pop(agentInfo);

		TInt mimeIndex=0;

		// Update our list of all supplier mime types supported by CAF

		for(mimeIndex=0;mimeIndex < agentInfo->SupplierMimeTypes().Count(); mimeIndex++) 

			{

			User::LeaveIfError(iSupplierMimeTypes.Append(*agentInfo->SupplierMimeTypes()[mimeIndex]));

			}

		// Update our list of all consumer mime types supported by CAF

		for(mimeIndex=0;mimeIndex < agentInfo->ConsumerMimeTypes().Count(); mimeIndex++) 

			{

			User::LeaveIfError(iConsumerMimeTypes.Append(*agentInfo->ConsumerMimeTypes()[mimeIndex]));

			}

		}

	}

void CAgentResolver::DestroyListOfAgents()

	{

	iSupplierMimeTypes.Reset();

	iConsumerMimeTypes.Reset();

	// cant forget to delete the default agent

	delete iDefaultAgent;

	iDefaultAgent = NULL;

	// Free memory assocated with the iAgentInfos array 

	iAgentInfos.ResetAndDestroy();

	}

void CAgentResolver::DoCancel()

	{

	// Abort any update notification 

	iEcomSession->CancelNotifyOnChange(iStatus);

	}

void CAgentResolver::RunL()

	{

	// Called by the ECOM framework if a new agent appears

	// remove the existing list of agents and build a new one

	DestroyListOfAgents();

	BuildListOfAgentsL();

	// request notification of any further changes

	iEcomSession->NotifyOnChange(iStatus);

	SetActive();

	}	

TBool CAgentResolver::IsF32Agent(CAgentInfo& aAgentInfo)

	{

	// Check if the agent has no consumer or supplier mime types

	// and that it has the correct name and Uid

	if (aAgentInfo.Agent().ImplementationUid() == KF32AgentImplUid

		&& aAgentInfo.Agent().Name().Compare(KF32Agent()) == 0 

		&& aAgentInfo.ConsumerMimeTypes().Count() == 0 

		&& aAgentInfo.SupplierMimeTypes().Count() == 0)

		{

		return ETrue;

		}

	else

		{

		return EFalse;

		}

	}

CAgentInfo& CAgentResolver::ResolveSupplierMimeL(const TDesC8& aMimeType) const

	{

	// Go through all the agents and return the one which supports the

	// required supplier mime type

	CAgentInfo* retVal=NULL;

	for (TInt i = 0; i < iAgentInfos.Count(); ++i)

		{

		if (iAgentInfos[i]->IsSupportedSupplier(aMimeType))

			{

			retVal = iAgentInfos[i];

			break;

			}

		}

	if (!retVal)

		{

		User::Leave(KErrCANoAgent);

		}

	return *retVal;

	}

CAgentInfo& CAgentResolver::ResolveConsumerMime(const TDesC8& aMimeType) const

	{

	// By default, set the return value to be the default agent. If we find

	// anything better, then we change it

	CAgentInfo* retVal = iDefaultAgent;

	for (TInt i = 0; i < iAgentInfos.Count(); ++i)

		{

		if (iAgentInfos[i]->IsSupportedConsumer(aMimeType))

			{

			retVal = iAgentInfos[i];

			break;

			}

		}

	ASSERT(retVal);

	return *retVal;

	}

CAgentInfo& CAgentResolver::ResolveFileL(const TDesC& aURI, TDes& aActualUri, TContentShareMode aShareMode) const

	{

	// Go through all the agents and return the one which supports the file at the given URI	

	TBool thePrivateDir = EFalse;	

	TUid agentUid = ResolveDirectory(aURI, aActualUri, thePrivateDir);

	if(agentUid != iDefaultAgent->Agent().ImplementationUid())

		{

		// this file must be living in a private server directory

		// return the agent who owns the directory

		return AgentInfoL(agentUid);

		}

	else

		{

		TInt agentsCount(iAgentInfos.Count());

		CAgentManager* agentManager = NULL;

		for (TInt i = 0; i < agentsCount; ++i)

			{

			TRAPD(result, agentManager = &iAgentInfos[i]->AgentManagerL());

			if(result != KErrNone)

				{

				if(KErrNoMemory == result)

					{

					User::Leave(result);

					}

				else

					{

					continue;	

					}

				}

			if (agentManager->IsRecognizedL(aURI, aShareMode))

				{

				return *iAgentInfos[i];

				}

			}

		}

	return *iDefaultAgent;

	}

CAgentInfo& CAgentResolver::ResolveFileL(RFile& aFile) const

	{

	// Go through all the agents and return the one which supports the file

	TInt agentsCount(iAgentInfos.Count());

	CAgentManager* agentManager = NULL;

	for (TInt i = 0; i < agentsCount; ++i)

		{

		TRAPD(result, agentManager = &iAgentInfos[i]->AgentManagerL());

		if(result != KErrNone)

			{

			if(KErrNoMemory == result)

				{

				User::Leave(result);

				}

			else

				{

				continue;	

				}

			}

		if (agentManager->IsRecognizedL(aFile))

			{

			return *iAgentInfos[i];

			}

		}

	return *iDefaultAgent;

	}

TUid CAgentResolver::ResolveDirectory(const TDesC& aPath, TDes& aActualPath, TBool& aThePrivateDir) const

	{

	TInt i = 0;

	TInt pathLength = 0;

	TBuf <KPrivateDirAndDriveLength> pathLowerCase;

	// Assume it's a publicly accessable path

	aThePrivateDir = EFalse;

	// Find the length of the path and private directory

	pathLength = aPath.Length();

	// Check that the path is long enough to be within a private directory

	// and does not include "..\\".The  "..\\" sequence could be a security risk

	if(aPath.Find(KParentDir()) == KErrNotFound && pathLength >= KPrivateDirAndDriveLength)

		{

		// Create a lower case copy of the left hand side of the path

		TPtrC lowerCasePtr = aPath.Mid(KPrivateDirOffset, KPrivateDirLength);

		pathLowerCase.Copy(lowerCasePtr);

		pathLowerCase.LowerCase();

		// Compare the first directory in the path to \\private\\ 

		if(KPrivateDir() == pathLowerCase)

			{

			// It is a private directory of some sort

			if(pathLength > KPrivateDirAndDriveLength)

				{

				// It must be a server private directory data cage

				TPtrC serverDirectoryPath = aPath.Right(pathLength - KPrivateDirAndDriveLength);

				for(i = 0; i < AgentInfoCount(); i++)

					{

					// See if the part after \\private\\ matches the agent name

					TPtrC privateDirectoryName = AgentInfo(i).PrivateDirectoryName();

					TPtrC agentName = AgentInfo(i).Agent().Name();

					if(privateDirectoryName.Length() && agentName.Length() && agentName == serverDirectoryPath.Left(agentName.Length()))

						{

						// It must be this agent's private directory

						// Convert \\private\\agentName\\... to \\private\\SID\\...

						aActualPath.Copy(aPath.Left(KPrivateDirAndDriveLength));

						aActualPath.Append(privateDirectoryName);

						aActualPath.Append(aPath.Right(pathLength - KPrivateDirAndDriveLength - agentName.Length()));

						return AgentInfo(i).Agent().ImplementationUid();

						}

					}

				}

			else

				{

				// It's just the c:\\private\\ directory

				// Use the default agent, any calls will just fail

				aThePrivateDir = ETrue;

				}

			}

		}

	// Not an agent private directory so just return the default agent

	aActualPath.Copy(aPath);

	return iDefaultAgent->Agent().ImplementationUid();

	}

HBufC* CAgentResolver::ConvertAgentFileNameL(const TDesC& aFileName) const

	{

	TInt i = 0;

	TInt fileNameLength = 0;

	TBuf <KPrivateDirAndDriveLength> pathLowerCase;

	fileNameLength = aFileName.Length();

	// If the path is shorter than the x:\\private\\ it must be a F32 file

	if(fileNameLength  > KPrivateDirAndDriveLength)

		{

		// Create a lower case copy of the left hand side of the path

		TPtrC lowerCasePtr = aFileName.Mid(KPrivateDirOffset, KPrivateDirLength);

		pathLowerCase.Copy(lowerCasePtr);

		pathLowerCase.LowerCase();

		// Compare the first directory in the path to \\private\\ 

		if(KPrivateDir() == pathLowerCase)

			{

			// It is a private directory of some sort

			if(fileNameLength > KPrivateDirAndDriveLength)

				{

				// It must be a server private directory data cage

				TPtrC serverDirectoryPath = aFileName.Right(fileNameLength - KPrivateDirAndDriveLength);

				for(i = 0; i < AgentInfoCount(); i++)

					{

					// See if the part after \\private\\ matches the agent name

					TPtrC privateDirectoryName = AgentInfo(i).PrivateDirectoryName();

					TPtrC agentName = AgentInfo(i).Agent().Name();

					if(privateDirectoryName.Length() && agentName.Length() && privateDirectoryName == serverDirectoryPath.Left(privateDirectoryName.Length()))

						{

						// It is this agent's private directory

						// Convert \\private\\SID\\... \\private\\agentName\\... 

						HBufC* buffer = HBufC::NewL(fileNameLength - privateDirectoryName.Length() + agentName.Length());

						TPtr ptr = buffer->Des();

						ptr.Copy(aFileName.Left(KPrivateDirAndDriveLength));

						ptr.Append(agentName);

						ptr.Append(aFileName.Right(fileNameLength - KPrivateDirAndDriveLength - privateDirectoryName.Length()));

						return buffer;

						}

					}

				}

			}

		}

	return aFileName.AllocL();

	}

EXPORT_C TBool CAgentResolver::DoRecognizeL(const TDesC& aName, const TDesC8& aBuffer, TDes8& aFileMimeType, TDes8& aContentMimeType)

	{

	// Given the filename and buffer from apparc, ask the agents in turn if they recognize the file

	// Note this will not call the DefaultAgent (F32) because it won't be able to recognize anything

	TInt agentsCount(iAgentInfos.Count());

	CAgentManager* agentManager = NULL;

	for (TInt i = 0; i < agentsCount; ++i)

		{

		TRAPD(result, agentManager = &iAgentInfos[i]->AgentManagerL());

		if(result != KErrNone)

			{

			if(KErrNoMemory == result)

				{

				User::Leave(result);

				}

			else

				{

				continue;	

				}

			}

		if (agentManager->RecognizeFileL(aName, aBuffer, aFileMimeType, aContentMimeType))

			{

			// force to lower case to ensure that chosen lower case scheme for mime types is maintained

			aFileMimeType.LowerCase();

			aContentMimeType.LowerCase();			

			return ETrue;

			}

		}

	return EFalse;

	}