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

/**
 @file
*/
 
 
#include "CMtfTestActionUtilsPopScripts.h"

#include <pop3set.h>
#include <smtpset.h>
#include <iapprefs.h>

#include "CMtfTestActionUtilsConfigFileParser.h"
#include "CMtfTestActionUtilsConfigFileMachineName.h"

#include "CMtfTestCase.h"
#include "CMtfTestActionParameters.h"

// POP Settings 

_LIT(KCfgPopServerAddress, "PopServerAddress"); //*
_LIT(KEmailAddressExtension, "EmailAddressExtension");
_LIT(KCfgPopLoginName, "PopLoginName"); //*
_LIT(KCfgPopPassword, "PopPassword"); //*
_LIT(KCfgPopMaxEmailSize, "PopMaxEmailSize"); //*
_LIT(KCfgPopPort, "PopPort"); //*
_LIT(KCfgPopInboxSynchronisationLimit, "PopInboxSynchronisationLimit"); //*
_LIT(KCfgPopSecureSockets, "PopSecureSockets"); //*
_LIT(KCfgPopSSLWrapper, "PopSSLWrapper"); //*
_LIT(KCfgPopGetMailOptions, "PopGetMailOptions"); //*
_LIT(KCfgPopPopulationLimit, "PopPopulationLimit"); //*
_LIT(KCfgPopAutoSendOnConnect, "PopAutoSendOnConnect" ); //* 
_LIT(KCfgPopDeleteEmailsWhenDisconnecting, "PopDeleteEmailsWhenDisconnecting" ); //*
_LIT(KCfgPopAcknowledgeReceipts, "PopAcknowledgeReceipts" ); //*
_LIT(KCfgPopDisconnectedUserMode, "PopDisconnectedUserMode" ); //*
_LIT(KCfgPopAPOPEncryption, "PopAPOPEncryption" ); //*


_LIT(KCfgPopIapList , "PopIapList" );

// SMTP settings

_LIT(KCfgSmtpServerAddress, "SmtpServerAddress");  //*
_LIT(KCfgSmtpEmailAddress, "SmtpEmailAddress");  //*
_LIT(KCfgSmtpBodyEncoding, "SmtpBodyEncoding");  //*
_LIT(KCfgSmtpReceiptAddress, "SmtpReceiptAddress");  //*
_LIT(KCfgSmtpRequestReceipts, "SmtpRequestReceipts");  //*
_LIT(KCfgSmtpSendMessageOption, "SmtpSendMessageOption");  //* Constants Added
_LIT(KCfgSmtpSetPort, "SmtpSetPort");  //*
_LIT(KCfgSmtpEmailAlias, "SmtpEmailAlias");  //*
_LIT(KCfgSmtpDefaultMsgCharSet, "SmtpMsgCharSet");  //*



_LIT(KCfgSmtpSetReplyToAddress, "SmtpSetReplyToAddress");  //*
_LIT(KCfgSmtpSetAddVCardToEmail, "SmtpSetAddVCardToEmail"); //*
_LIT(KCfgSmtpSetAddSignatureToEmail, "SmtpSetAddSignatureToEmail");  //*
_LIT(KCfgSmtpSetSendCopyToSelf, "SmtpSetSendCopyToSelf");  //* 
_LIT(KCfgSmtpSetLoginName, "SmtpSetLoginName");  //*
_LIT(KCfgSmtpSetPassword, "SmtpSetPassword");  //*
_LIT(KCfgSmtpSetSMTPAuth, "SmtpSetSMTPAuth");  //*
_LIT(KCfgSmtpSetInboxLoginDetails, "SmtpSetInboxLoginDetails");  //*


_LIT(KCfgSmtpSecureSockets, "SmtpSetSecureSockets");  //*
_LIT(KCfgSmtpSSLWrapper, "SmtpSetSSLWrapper");  //*
	//???? Currently All in same file is this what is intended or are they intended to be in 
	// seperate files, which would require more index's ?

_LIT(KCfgSmtpIapList , "SmtpIapList" );


void CMtfTestActionUtilsPopScripts::ReadPopSettingsFromConfigurationFileL(CMtfTestCase& aTestCase, const TDesC& aSettingsFile, 
											CImPop3Settings& aPopSet, CImIAPPreferences& aPopIapPref, 
											CImSmtpSettings& aSmtpSet, CImIAPPreferences& aSmtpIapPref)
{
	CMtfTestActionUtilsConfigFileParser* scriptFileParser = CMtfTestActionUtilsConfigFileParser::NewL(aSettingsFile);
	CleanupStack::PushL(scriptFileParser);
	
	TPtrC8 string8Ptr; 
	TPtrC stringPtr; 
	TInt intValue;


	// POP3 settings
	if(scriptFileParser->GetFieldAsString(KCfgPopServerAddress, stringPtr) == KErrNone)
	{	
		aPopSet.SetServerAddressL(stringPtr);
	}
	
	CMtfTestActionUtilsConfigFileMachineName* machineNameFile = NULL;

	TPtrC emailAddressExtension;
	if (scriptFileParser->GetFieldAsString(KEmailAddressExtension, emailAddressExtension) == KErrNone)
		{
		machineNameFile = CMtfTestActionUtilsConfigFileMachineName::NewLC(emailAddressExtension);
		}
	else
		{
		machineNameFile = CMtfTestActionUtilsConfigFileMachineName::NewLC(stringPtr);
		}
	
	TPtrC8 machineName(machineNameFile->MachineName());

	if(scriptFileParser->GetFieldAsString8(KCfgPopLoginName, string8Ptr) == KErrNone)
	{
		aPopSet.SetLoginNameL(string8Ptr);
	}
	else
	{
		aPopSet.SetLoginNameL(machineName);
	}
	
	if(scriptFileParser->GetFieldAsString8(KCfgPopPassword, string8Ptr) == KErrNone)
	{
		aPopSet.SetPasswordL(string8Ptr);
	}
	else
	{
		aPopSet.SetPasswordL(machineName);
	}

	if(scriptFileParser->GetFieldAsInteger(KCfgPopMaxEmailSize, intValue) == KErrNone)
	{
		aPopSet.SetMaxEmailSize(intValue);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopPort, intValue) == KErrNone)
	{
		aPopSet.SetPort(intValue);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopInboxSynchronisationLimit, intValue) == KErrNone)
	{
		aPopSet.SetInboxSynchronisationLimit(intValue); // ??? should this be SetInboxSynchronisation?
	}
	
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopSecureSockets, intValue) == KErrNone)
	{
		aPopSet.SetSecureSockets((TBool)intValue);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopSSLWrapper, intValue) == KErrNone)
	{
		aPopSet.SetSSLWrapper((TBool)intValue);
	}
	
	if(scriptFileParser->GetFieldAsString(KCfgPopGetMailOptions, stringPtr) == KErrNone)
	{
		TPop3GetMailOptions options = ObtainValueParameterL<TPop3GetMailOptions>(aTestCase, stringPtr);
		aPopSet.SetGetMailOptions(options);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopPopulationLimit, intValue) == KErrNone)
	{
		aPopSet.SetPopulationLimitL(intValue);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopAutoSendOnConnect, intValue) == KErrNone)
	{	
		aPopSet.SetAutoSendOnConnect((TBool) intValue);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopDeleteEmailsWhenDisconnecting, intValue) == KErrNone)
	{	
		aPopSet.SetDeleteEmailsWhenDisconnecting((TBool) intValue);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopAcknowledgeReceipts, intValue) == KErrNone)
	{	
		aPopSet.SetAcknowledgeReceipts((TBool) intValue);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopDisconnectedUserMode, intValue) == KErrNone)
	{	
		aPopSet.SetDisconnectedUserMode((TBool) intValue);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgPopAPOPEncryption, intValue) == KErrNone)
	{	
		aPopSet.SetApop((TBool) intValue);
	}
		
	scriptFileParser->GetFieldAsString(KCfgPopIapList, stringPtr);
	
	ReadIAPAndAddL( aTestCase, scriptFileParser, KCfgPopIapList, aPopIapPref );
	
	
	// SMTP settings
	if(scriptFileParser->GetFieldAsString(KCfgSmtpServerAddress, stringPtr) == KErrNone)
	{
		aSmtpSet.SetServerAddressL(stringPtr);
	}
	
	TPtrC emailAddr(machineNameFile->MachineNameEmail());
	if(scriptFileParser->GetFieldAsString(KCfgSmtpEmailAddress, stringPtr) == KErrNone)
	{
		aSmtpSet.SetEmailAddressL(stringPtr);
	}
	else
	{
		aSmtpSet.SetEmailAddressL(emailAddr);
	}
	

	if(scriptFileParser->GetFieldAsString(KCfgSmtpBodyEncoding, stringPtr) == KErrNone)
	{
		TMsgOutboxBodyEncoding setGetMailOptions = ObtainValueParameterL<TMsgOutboxBodyEncoding>(aTestCase, stringPtr);
		aSmtpSet.SetBodyEncoding(setGetMailOptions);
	}
	
	if(scriptFileParser->GetFieldAsString(KCfgSmtpReceiptAddress, stringPtr) == KErrNone)
	{
		aSmtpSet.SetReceiptAddressL(stringPtr);
	}
	else
	{
		aSmtpSet.SetReceiptAddressL(emailAddr);
	}
	

	
	if(scriptFileParser->GetFieldAsInteger(KCfgSmtpRequestReceipts, intValue) == KErrNone)
	{		
		aSmtpSet.SetRequestReceipts( (TBool) intValue );
	}
	
	if(scriptFileParser->GetFieldAsString(KCfgSmtpSendMessageOption, stringPtr) == KErrNone)
	{
		TImSMTPSendMessageOption setSendMessageOption = ObtainValueParameterL<TImSMTPSendMessageOption>(aTestCase, stringPtr);
		aSmtpSet.SetSendMessageOption(setSendMessageOption);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgSmtpSetPort, intValue) == KErrNone)
	{
		aSmtpSet.SetPort(intValue);
	}
	
	if(scriptFileParser->GetFieldAsString(KCfgSmtpEmailAlias, stringPtr) == KErrNone)
	{
		aSmtpSet.SetEmailAliasL(stringPtr);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgSmtpDefaultMsgCharSet, intValue) == KErrNone)
	{
		TUid tmp = { intValue };
		aSmtpSet.SetDefaultMsgCharSet( tmp );
	}
	
	
	if(scriptFileParser->GetFieldAsString(KCfgSmtpSetReplyToAddress, stringPtr) == KErrNone)
	{
		aSmtpSet.SetReplyToAddressL(stringPtr);
	}
	else
	{
		aSmtpSet.SetReplyToAddressL(emailAddr);
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgSmtpSetAddVCardToEmail, intValue) == KErrNone)
	{		
		aSmtpSet.SetAddVCardToEmail( (TBool) intValue );
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgSmtpSetAddSignatureToEmail, intValue) == KErrNone)
	{		
		aSmtpSet.SetAddSignatureToEmail( (TBool) intValue );
	}
	
	if(scriptFileParser->GetFieldAsString(KCfgSmtpSetSendCopyToSelf, stringPtr) == KErrNone)
	{
		TImSMTPSendCopyToSelf setSMTPSendCopyToSelf = ObtainValueParameterL<TImSMTPSendCopyToSelf>(aTestCase, stringPtr);
		aSmtpSet.SetSendCopyToSelf(setSMTPSendCopyToSelf);
	}
	
	if(scriptFileParser->GetFieldAsString8(KCfgSmtpSetLoginName, string8Ptr) == KErrNone)
	{
		aSmtpSet.SetLoginNameL(string8Ptr);
	}
	else
	{
		aSmtpSet.SetLoginNameL(machineName);
	}

	if(scriptFileParser->GetFieldAsString8(KCfgSmtpSetPassword, string8Ptr) == KErrNone)
	{
		aSmtpSet.SetPasswordL(string8Ptr);
	}
	else
	{
		aSmtpSet.SetPasswordL(machineName);
	}
		
	if(scriptFileParser->GetFieldAsInteger(KCfgSmtpSetSMTPAuth, intValue) == KErrNone)
	{		
		aSmtpSet.SetSMTPAuth( (TBool) intValue );
	}

	if(scriptFileParser->GetFieldAsInteger(KCfgSmtpSetInboxLoginDetails, intValue) == KErrNone)
	{		
		aSmtpSet.SetInboxLoginDetails( (TBool) intValue );
	}

	if(scriptFileParser->GetFieldAsInteger(KCfgSmtpSecureSockets, intValue) == KErrNone)
	{		
		aSmtpSet.SetSecureSockets( (TBool) intValue );
	}
	
	if(scriptFileParser->GetFieldAsInteger(KCfgSmtpSSLWrapper, intValue) == KErrNone)
	{		
		aSmtpSet.SetSSLWrapper( (TBool) intValue );
	}
	
	ReadIAPAndAddL( aTestCase, scriptFileParser, KCfgSmtpIapList, aSmtpIapPref );
	
	//Pop and destroy scriptfileParser and machineNameFile	
	CleanupStack::PopAndDestroy(2,scriptFileParser);	
}

void CMtfTestActionUtilsPopScripts::ReadIAPAndAddL( CMtfTestCase& aTestCase, 
	CMtfTestActionUtilsConfigFileParser* aScriptFileParser , 
	const TDesC& aParamListName , CImIAPPreferences& aIapPref )
{
	TPtrC stringPtr; 	
	TPtrC baseString; 
	
	if( aScriptFileParser->GetFieldAsString(aParamListName, stringPtr ) == KErrNone )
	{
		
		TInt start=0;
		TInt end=stringPtr.Length();
		
		while ( GetString( stringPtr , start, end , baseString ) )
		{
			_ReadIAPAndAddL( aTestCase, aScriptFileParser, baseString, aIapPref );
		}
	}		
}

TBool CMtfTestActionUtilsPopScripts::GetString( const TDesC& aStringPtr , TInt& aStart, TInt aEnd , TPtrC& aBaseString )
{
	TBool ret=EFalse;
	
	if (aStart==aEnd)
	{
		return EFalse;				
	}
	
	TInt currPos=aStart;
	

	// strip out any starting spaces.
	while (currPos<aEnd )
	{
		if ( aStringPtr[currPos] == ' ' || aStringPtr[currPos] == '\t' )
		{			
			currPos++;	
		}
		else
		{			
			break;	
		}
	}
	TInt startTmp=currPos;
	
	while (currPos<aEnd )
	{
		if ( aStringPtr[currPos] == ' ' || aStringPtr[currPos] == '\t' )
		{			
			break;
		}
		else
		{
			currPos++;
			ret=ETrue;
		}
	}
	
	if (ret)
	{	// We have a string.
		aBaseString.Set( aStringPtr.Mid( startTmp, currPos-startTmp) ); 
	}
		
	aStart=currPos;
	
	return ret;
}


void CMtfTestActionUtilsPopScripts::_ReadIAPAndAddL( CMtfTestCase& aTestCase, 
	CMtfTestActionUtilsConfigFileParser* aScriptFileParser , 
	const TDesC& aFieldName , CImIAPPreferences& aIapPref )
{
	
	TPtrC stringPtr; 
	TInt intTmp;
	
	TImIAPChoice iapChoice;
	iapChoice.iIAP = 0;
	iapChoice.iDialogPref = ECommDbDialogPrefUnknown;
	
	TInt index=0;
	TBool modified=EFalse;
		
	HBufC* buf = HBufC::NewLC(100);
			
	buf->Des() = aFieldName;
	buf->Des().Append( _L("_PopIAP") );
	
			
	if(aScriptFileParser->GetFieldAsInteger(buf->Des(), intTmp) == KErrNone)
	{
		iapChoice.iIAP = intTmp;
		modified=ETrue;
	}
	

	buf->Des() = aFieldName;
	buf->Des().Append( _L("_PopCommDbDialogPref") );
	if(aScriptFileParser->GetFieldAsString(buf->Des(), stringPtr) == KErrNone)
	{
		TCommDbDialogPref setCommDbDialogPref = ObtainValueParameterL<TCommDbDialogPref>(aTestCase, stringPtr);
		iapChoice.iDialogPref= setCommDbDialogPref;
		modified=ETrue;
	}

	
	buf->Des() = aFieldName;
	buf->Des().Append( _L("_PopIAPIndex") );
	if(aScriptFileParser->GetFieldAsInteger(buf->Des(), intTmp) == KErrNone)
	{
		index = intTmp;
		modified=ETrue;
	}
	
	if (modified)
	{	// Note only want to set the values if they are specified. Otherwise leave well alone.
		// Really should specify iapChoice.iIAP and iapChoice.iDialogPref at the same time.
		aIapPref.AddIAPL(iapChoice ,index );
	}

	CleanupStack::PopAndDestroy(buf);
}