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

// IMAP4MTM.CPP

// 

//

#include "IMPCMTM.H"

#include "MIUT_ERR.H"

#include <barsc.h>		//RResourceFile

#include <barsread.h>

#include <bautils.h>

#include <txtrich.h>

#include <msvutils.h>

#include <cemailaccounts.h>

#include "MIUTMSG.H"	//CImEmailOperation

#include "CONSYNC.H"

#include <imcm.rsg>

#include "IMCMUTIL.H"

#include <e32base.h>

#include <autosend.h>

#ifdef SYMBIAN_ENABLE_SPLIT_HEADERS  

#include "miut_errconsts.h"

#include "cimmessagepart.h"

#include "timrfc822datefield.h"

#include <mtmuidsdef.hrh>

#endif

#include <msvenhancesearchsortutil.h>

_LIT(KMsvAutoSendExe, "Autosend.exe");

const TUid KMsvAutoSendExeUid = {0x1000A402}; //268477442

#define TODO//@

//

//  Session Observer for the Imap4 Client MTM  

class CImap4ClientSessionObserver : public CBase , public MMsvSessionObserver

	{

public:

	void HandleSessionEventL(TMsvSessionEvent aEvent, TAny* aArg1, TAny* aArg2, TAny* aArg3);

	};

void CImap4ClientSessionObserver::HandleSessionEventL(TMsvSessionEvent /*aEvent*/, TAny* /*aArg1*/, TAny* /*aArg2*/, TAny* /*aArg3*/)

	{

	}

//

//  CImap4ClientMtm methods.

/**

@internalTechnology

*/

/** IMAP4 client MTM factory function.

This function is not called directly by messaging clients. To create a client MTM

object, use CClientMtmRegistry::NewMtmL().

@param aRegisteredMtmDll MTM registry information 

@param aSession Message server session

@return New IMAP4 client MTM object

@see CClientMtmRegistry::NewMtmL()

*/

EXPORT_C CImap4ClientMtm* CImap4ClientMtm::NewL(CRegisteredMtmDll& aRegisteredMtmDll, CMsvSession& aSession)

	{

	CImap4ClientMtm* self = new (ELeave) CImap4ClientMtm(aRegisteredMtmDll, aSession);

	CleanupStack::PushL(self);

	self->ConstructL();

	CleanupStack::Pop();

	return self;

	}

CImap4ClientMtm::CImap4ClientMtm(CRegisteredMtmDll& aRegisteredMtmDll, CMsvSession& aSession)

: CBaseMtm(aRegisteredMtmDll, aSession)

	{

	}

void CImap4ClientMtm::ConstructL()

	{

	iImap4ClientSessionObserver = new (ELeave) CImap4ClientSessionObserver;

	iHeader = CImHeader::NewLC();

	CleanupStack::Pop();	// iHeader

	//open the resource file

	RFs fs;

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

	CleanupClosePushL(fs);

	//	Need to search for IMCM resource file on all drives -

	//	it won't necessarily be on the same one as IMPC.DLL

	//

	TFileName fileName(KImEngineResourceFile);

	MsvUtils::AddPathAndExtensionToResFileL(fileName);

	BaflUtils::NearestLanguageFile( fs, fileName );		//	change to appropriate language

	RResourceFile resourceFile;

	resourceFile.OpenL(fs,fileName);

	CleanupClosePushL(resourceFile);

	HBufC8* buf = resourceFile.AllocReadLC(EMAIL_ADDRESS_FORMATTING_STRING);

	TResourceReader reader;

	reader.SetBuffer(buf);

	iEmailAddressFormatString = (reader.ReadTPtrC()).AllocL();

	CleanupStack::PopAndDestroy(3);// resourceFile (Close resourceFile), fs

	}

CImap4ClientMtm::~CImap4ClientMtm()

/** Destructor. */

	{

	delete iImap4ClientSessionObserver;

	delete iEmailAddressFormatString;

	delete iHeader;

	delete iMsvEntrySelection;

	delete iImIMAP4GetMail;

	delete iImEmailOperation;

	}

void CImap4ClientMtm::SaveMessageL()

/** Empty implementation of base class function. 

To edit an IMAP message, use CImEmailMessage.

*/

	{

	}

EXPORT_C void CImap4ClientMtm::StoreSettingsL()

/** If the current context of the client MTM is an IMAP4 service, stores settings 

in the Central Repository. 

@panic IMCM 33 MTM has no current context (debug builds only)

@panic IMCM 44 Current context is not a service (debug builds only)

*/

	{

	__ASSERT_DEBUG(iMsvEntry!=NULL,gPanic(EImpcNoCMsvEntrySet));

	// check that current context is a service entry

	__ASSERT_DEBUG(iMsvEntry->Entry().iType==KUidMsvServiceEntry,gPanic(EImpcMTMNotAServiceEntry));

	CEmailAccounts* account = CEmailAccounts::NewLC();

  	TImapAccount id;

	account->GetImapAccountL(iMsvEntry->Entry().Id(), id);

	account->SaveImapSettingsL(id, iImImap4Settings);

	CleanupStack::PopAndDestroy(account);    

	}

void CImap4ClientMtm::LoadMessageL()

/** Loads the cache with the message data for the current message context. 

The current context should be an IMAP service or a message. 

If the current context is an IMAP service, then the function loads the service settings

from the Central Repository. This is the same behaviour as RestoreSettingsL().

*/

	{

	Body().Reset();

	iHeader->Reset();

	switch (iMsvEntry->Entry().iType.iUid)

		{

		case KUidMsvServiceEntryValue:

			RestoreSettingsL();

			break;

		case KUidMsvMessageEntryValue:

			{//restore header

			if (!iMsvEntry->HasStoreL())

				return;

			// Get a reference to TMsvEnhanceSearchSortUtil  instance set by CMsvSearchsortOpOnHeaderBody class

			// If advanced search and sort is being performed than do not load the message header and body.

			// These are loaded when the search criteria is known in DoFindL()

			// For API's other than CMsvSearchsortOpOnHeaderBody-> FindInHeaderBodyL(), a call to LoadMessageL()

			// loads the body and the header.

			TMsvEnhanceSearchSortUtil* searchsortutil = (TMsvEnhanceSearchSortUtil*)(GetExtensionData());

			if ( searchsortutil == NULL )

				{

				CMsvStore* msvStore = iMsvEntry->ReadStoreL();

				CleanupStack::PushL(msvStore);

				iHeader->RestoreL(*msvStore);

				CleanupStack::PopAndDestroy();//store

				CImEmailMessage* message=CImEmailMessage::NewLC(*iMsvEntry);

				message->GetBodyTextL(iMsvEntry->Entry().Id(),CImEmailMessage::EThisMessageOnly,Body(),*iParaFormatLayer,*iCharFormatLayer);

				CleanupStack::PopAndDestroy();//message	

				break;

				}

			}

		};

	}

EXPORT_C void CImap4ClientMtm::RestoreSettingsL()

/** If the current context of the client MTM is on an IMAP4 service, restores settings 

from the Central Repository. 

The restored settings can be accessed through the Imap4Settings() function.

@panic IMCM 33 MTM has no current context (debug builds only)

*/

    {

	__ASSERT_DEBUG(iMsvEntry!=NULL,gPanic(EImpcNoCMsvEntrySet));

	CEmailAccounts* account = CEmailAccounts::NewLC();

  	TImapAccount id;

	account->GetImapAccountL(iMsvEntry->Entry().Id(), id);

	account->LoadImapSettingsL(id, iImImap4Settings);

	CleanupStack::PopAndDestroy(account);    

	}

CMsvOperation* CImap4ClientMtm::ReplyL(TMsvId aDestination, TMsvPartList aPartList, TRequestStatus& aCompletionStatus)

/** Creates an SMTP reply message to the current message context.

@param aDestination Entry to which to assign the reply. 

@param aPartList Defines the parts that are to be copied from the original 

message into the reply.

@param aCompletionStatus The request status to be completed when the operation 

has finished.

@return If successful, this is an asynchronously completing reply operation. 

If failed, this is a completed operation, with status set to the relevant 

error code. */

	{

	TMsvEmailTypeList msvEmailTypeList = 0;

	TUid messageType = KUidMsgTypeSMTP;

	return CImEmailOperation::CreateReplyL(aCompletionStatus, Session(), iMsvEntry->EntryId(), aDestination, aPartList, msvEmailTypeList, messageType);

	}

CMsvOperation* CImap4ClientMtm::ForwardL(TMsvId aDestination, TMsvPartList aPartList, TRequestStatus& aCompletionStatus)

/** Creates an forwarded SMTP message from the current message context. 

@param aDestination Entry to which to assign the forwarded message.

@param aPartList Defines the parts that are to be copied from the original 

message into the forwarded message 

@param aCompletionStatus The request status to be completed when the operation 

has finished.

@return If successful, this is an asynchronously completing forward message 

operation. If failed, this is a completed operation, with status set to the 

relevant error code. */

	{

	TMsvEmailTypeList msvEmailTypeList = 0;

	TUid messageType = KUidMsgTypeSMTP;

	return CImEmailOperation::CreateForwardL(aCompletionStatus, Session(), iMsvEntry->EntryId(), aDestination, aPartList, msvEmailTypeList, messageType);

   }

TUint CImap4ClientMtm::ValidateMessage(TUint aPartList)

/** Validates the current message context.

Only the message recipients and sender fields are checked for well-formed 

addresses.

@param aPartList Indicates the value of the message parts for which validation 

is requested.

@return Values of message parts. 

@panic IMCM 33 MTM has no current context (debug builds only)

*/

	{

	__ASSERT_DEBUG(iMsvEntry!=NULL,gPanic(EImpcNoCMsvEntrySet));

	TBool retVal=0;

	if (aPartList & KMsvMessagePartRecipient)

		{

		TBool valid = ETrue;

		// check the recipient list for valid 'addresses' - ie no digits

		for (TInt ii=0; ii < AddresseeList().Count(); ++ii)

			if ( (valid = ValidateAddress((*iAddresseeList)[ii])) == EFalse)

				continue;

		retVal += (valid ? 0 : KMsvMessagePartRecipient);

		}

	if (aPartList & KMsvMessagePartOriginator)

		{

		// check the originator field for valid 'addresses' - ie no digits

		if (!ValidateAddress(iMsvEntry->Entry().iDetails))

			retVal += KMsvMessagePartOriginator;

		}

	return retVal;

	}

TBool CImap4ClientMtm::ValidateAddress(const TPtrC& anAddress)

	{

	return iTImMessageField.ValidInternetEmailAddress(anAddress);

	}

void CImap4ClientMtm::SendOnNextConnectionL()

	{

	TMsvId smtpServiceId = KMsvNullIndexEntryId;

	TMsvId entry = iMsvEntry->Entry().Id();

	if (iMsvEntry->Entry().iType.iUid==KUidMsvServiceEntryValue)

		smtpServiceId = iMsvEntry->Entry().iRelatedId;

	else if (iMsvEntry->Entry().iType.iUid==KUidMsvMessageEntryValue)

		{

		TMsvId id=iMsvEntry->Entry().iServiceId;

		iMsvEntry->SetEntryL(iMsvEntry->Entry().iServiceId);		

		smtpServiceId = iMsvEntry->Entry().iRelatedId;

		iMsvEntry->SetEntryL(id);		

		}

	iMsvEntry->SetEntryL(KMsvGlobalOutBoxIndexEntryId);

	CMsvEntrySelection* sel = iMsvEntry->ChildrenWithMtmL(KUidMsgTypeSMTP);

	CleanupStack::PushL(sel);

	// there is no need to start the autosend operation if there are no SMTP messages

	// in the outbox

	if(sel->Count())

		{

		TBuf<20> cmdString;

		cmdString.Num(smtpServiceId, EDecimal);

			RProcess p;

			TInt error=p.Create(KMsvAutoSendExe, cmdString, TUidType(KNullUid, KNullUid, KMsvAutoSendExeUid));

			if (error==KErrNone)

				{

				p.Resume();

				p.Close();

				}

		}

	CleanupStack::PopAndDestroy(sel);

	iMsvEntry->SetEntryL(entry);

	}

TMsvPartList CImap4ClientMtm::DoFindL(const TDesC& aTextToFind, TMsvPartList aPartList)

	{ 

	CImClientMTMUtils* clientMTMUtils = CImClientMTMUtils::NewL();

	CleanupStack::PushL(clientMTMUtils);

	TMsvPartList retList = KMsvMessagePartNone;

	CMsvFindText* findText = CMsvFindText::NewLC();

	// Get a reference to TMsvEnhanceSearchSortUtil  instance set by CMsvSearchsortOpOnHeaderBody class

	TMsvEnhanceSearchSortUtil* searchsortutil = (TMsvEnhanceSearchSortUtil*)(GetExtensionData());

	if( searchsortutil != NULL )

 		{

 		// Get Advanced search sort setting flag

 		TInt32 searchsortsetting=searchsortutil->GetSearchSortSetting();

 		/* If the search is on message body than Load message Body 

 		 If the search is on message header than Load the message header

 		 Also set searchsortsetting flag EMessagePartBodyLoaded or EMessagePartHeaderLoaded 

 		 in TMsvEnhanceSearchSortUtil class

 		 This ensures that the body or header is not loaded twice if 2 query options

 		 are on the body */

 		if(aPartList & KMsvMessagePartBody && !(searchsortsetting & EMessagePartBodyLoaded))  	

   			{

   			CImEmailMessage* message=CImEmailMessage::NewLC(*iMsvEntry);

			message->GetBodyTextL(iMsvEntry->Entry().Id(),CImEmailMessage::EThisMessageOnly,Body(),*iParaFormatLayer,*iCharFormatLayer);

			CleanupStack::PopAndDestroy();//message

			searchsortutil->SetSearchSortSetting(EMessagePartBodyLoaded);

   			}

   		else if(!(searchsortsetting & EMessagePartHeaderLoaded))

   			{

   			// Load the header

			CMsvStore* msvStore = iMsvEntry->ReadStoreL();

			CleanupStack::PushL(msvStore);

			iHeader->RestoreL(*msvStore);

			CleanupStack::PopAndDestroy();//store

			searchsortutil->SetSearchSortSetting(EMessagePartHeaderLoaded);	

   			}

   		// Issue the Find request

		clientMTMUtils->FindL(aTextToFind, Body(), *iHeader, aPartList, retList);

		/* If the search didn't succeed, than search in the details field of TMsvEntry class. It holds the From field

		   If the search is on subject, than look in description field of TMsvEntry class.	*/

		if(!retList)

			{

			if (aPartList & KMsvMessagePartFrom)

				{

				findText->FindTextL(aTextToFind, iMsvEntry->Entry().iDetails, aPartList) ? retList|=KMsvMessagePartOriginator : retList;	

				}

 			if (aPartList & KMsvMessagePartSubject)

 				{

 				findText->FindTextL(aTextToFind, iMsvEntry->Entry().iDescription, aPartList) ? retList|=KMsvMessagePartDescription : retList;	

 				}

			}

		/* Copy the sort data if sorting is specified.

		 The operations being performed could be only be sort or it could be search and sort

		 If the operation is search and sort than copy the sort data only if the

		 search operation succeeded	*/

		if ((searchsortsetting & EMessagePartSort ) || ((searchsortsetting & EMessagePartSearchSort) && (searchsortsetting & EMessagePartLastQueryOption) && (retList)))

   			{

   			/* Copy the data to be sorted from the header stream.

   			   This done by setting iExtensionData to point to the field being copied */

   			if (iHeader)

   				{

   				if (searchsortsetting & EMessagePartToSort )

   					{

	   				SetExtensionData((TAny*)&iHeader->ToRecipients());

   					}

   				else if(searchsortsetting & EMessagePartCcSort)

   					{

   					SetExtensionData((TAny*)&iHeader->CcRecipients());

	   				}

   				else if(searchsortsetting & EMessagePartBccSort)

    				{

    				SetExtensionData((TAny*)&iHeader->BccRecipients());

	    			}

    			else if(searchsortsetting & EMessagePartFromSort)

    				{

    				SetExtensionData((TAny*)(iHeader->From().Ptr()));

    				}

				else if(searchsortsetting & EMessagePartSubjectSort)

					{

					SetExtensionData((TAny*)(iHeader->Subject().Ptr()));

					}

    			}

   			else // Header not present. Copy sort data from TMsvEntry details and description field

   	   			{

	   		    if(searchsortsetting & EMessagePartFromSort)

	   		    	{

	   		    	SetExtensionData((TAny*)&iMsvEntry->Entry().iDetails);	

	   		    	}

	  			else if(searchsortsetting & EMessagePartSubjectSort)

   					{

   					SetExtensionData((TAny*)&iMsvEntry->Entry().iDescription);		

   					}

   	   			}

   			}

 		}

	else

		{

		// Old implementation for searching

		clientMTMUtils->FindL(aTextToFind, Body(), *iHeader, aPartList, retList);

		if(!retList)

			{

			if (aPartList & KMsvMessagePartOriginator)

				{

				findText->FindTextL(aTextToFind, iMsvEntry->Entry().iDetails, aPartList) ? retList|=KMsvMessagePartOriginator : retList;	

				}

 			if (aPartList & KMsvMessagePartDescription)

 				{

 				findText->FindTextL(aTextToFind, iMsvEntry->Entry().iDescription, aPartList) ? retList|=KMsvMessagePartDescription : retList;	

 				}

			}

		}

	CleanupStack::PopAndDestroy(findText);

	CleanupStack::PopAndDestroy(clientMTMUtils); 

	return retList;

	}

TMsvPartList CImap4ClientMtm::Find(const TDesC& aTextToFind, TMsvPartList aPartList)

/** Searches the specified message part(s) for the plain-text version of the text 

to be found. 

@param aTextToFind The plain-text version of the text to be found. 

@param aPartList Indicates the message parts which should be searched.

@return If the text was not found, or searching is unsupported, 0. If the text 

was found, a bitmask of the TMsvPartList IDs for each part in which the text 

was present. */

	{

 	TMsvPartList retList = KMsvMessagePartNone;

 	TRAPD(ret, retList = DoFindL(aTextToFind, aPartList));

   	return retList;

	}

TInt CImap4ClientMtm::QueryCapability(TUid aCapability, TInt& aResponse)

/** Queries if the MTM supports a particular capability, specified by a UID.

@param aCapability UID of capability to be queried. See MTMDEF.HRH for 

definition of UIDs. 

@param aResponse Response value. The format of the response varies according 

to the capability. 

@return KErrNone: aCapability is a recognised value and a response is returned 

KErrNotSupported: aCapability is not a recognised value 

*/

	{

	TInt error = KErrNone;

   const TInt KImap4MaxTextMessageSize = 0xFFFF;

	switch (aCapability.iUid)

		{

	case KUidMtmQueryMaxBodySizeValue:

	case KUidMtmQueryMaxTotalMsgSizeValue:

		aResponse = KImap4MaxTextMessageSize;

		break;

	case KUidMtmQuerySupportedBodyValue:

		aResponse = KMtm7BitBody + KMtm8BitBody + KMtm16BitBody + KMtmBinaryBody;

		break;

   // Supported

	case KUidMtmQueryCanReceiveMsgValue:		

   case KUidMtmQuerySupportAttachmentsValue:

   case KUidMtmQuerySupportsFolderValue:

		break;

	// Not supported

	case KUidMtmQueryOffLineAllowedValue:	

	case KUidMtmQueryCanSendMsgValue:		

	default:

		aResponse = ETrue;

		return KErrNotSupported;

		}

	return error;

	}

void CImap4ClientMtm::InvokeSyncFunctionL(TInt aFunctionId, const CMsvEntrySelection& aSelection, TDes8& aParameter)

/** Invokes synchronous IMAP-specific operations.

@param aFunctionId ID of the requested function. Supported IDs are #KIMAP4MTMIsConnected and #KIMAP4MTMBusy.

@param aSelection Collection of function entries to invoke.

@param aParameter Buffer containing input and output parameters. 

@panic IMCM 33 MTM has no current context (debug builds only)

@leave KErrNotSupported Function does not provide function specified by aFunctionId

@see #KIMAP4MTMIsConnected 

@see #KIMAP4MTMBusy

*/

	{

	__ASSERT_DEBUG(iMsvEntry!=NULL,gPanic(EImpcNoCMsvEntrySet));

	TInt error = KErrNone;

	switch (aFunctionId)

		{

	case KIMAP4MTMIsConnected:

   case KIMAP4MTMBusy:

		{

		CMsvOperationActiveSchedulerWait *wait = CMsvOperationActiveSchedulerWait::NewLC();