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

// IACP.CPP

//

#include <msvids.h>

#include <mentact.h>

#include <msvapi.h>

#include "BSP.H"

#include "IACP.H"

#include "ISPP.H"

#include "ISSP.H"

#include "IMP.H"

#include "SMSP.H"

#include "TVMP.H"

#include "gprsp.h"

#include "wwwp.h"

#include "IACPDEF.H"

#include "IACPERR.H"

#ifdef SYMBIAN_ENABLE_SPLIT_HEADERS 

#include "tmsvbioinfo.h"

#endif

const TInt SMS_SCRIPT_DATA_LEN = 5;

const TInt SMS_SCRIPT_ADD_LEN  = 4;

const TInt KParsedFieldsGranularity=16;

#define KUidMsvBIOInternetAccessPointMessageType  0x1000552F 

#define KCharSlash			'/'

_LIT(KIacpLowerY, "y");

_LIT(KIacpLowerT, "t");

_LIT(KIacpLowerN, "n");

_LIT(KIacpLowerF, "f");

//

// Constructor

//

CIacSettingsParser::CIacSettingsParser(CRegisteredParserDll& aRegisteredParserDll, CMsvEntry& aEntry, RFs& aFs)

:CBaseScriptParser2(aRegisteredParserDll, aEntry, aFs)

	{

	}

//

// Factory fns

//

EXPORT_C CIacSettingsParser* CIacSettingsParser::NewL(CRegisteredParserDll& aRegisteredParserDll, CMsvEntry& aEntry, RFs& aFs)

	{

	CIacSettingsParser* self= new(ELeave) CIacSettingsParser(aRegisteredParserDll,aEntry,aFs);

	CleanupStack::PushL(self);

	self->ConstructL();

	CleanupStack::Pop();

	return self;

	}

//

// 2nd stage of construction

//

void CIacSettingsParser::ConstructL()

	{

	iParsedFieldArray = new(ELeave) CArrayPtrSeg<CParsedField>(KParsedFieldsGranularity);	

	iSmsParsed=EFalse;

	iParsedFieldCollections = new(ELeave)CArrayPtrSeg<CParsedFieldCollection>(4);

	CActiveScheduler::Add(this);

	}

//

// Destruction

//

CIacSettingsParser::~CIacSettingsParser()

	{

	Cancel();

	if(iParsedFieldCollections)

		{

		iParsedFieldCollections->ResetAndDestroy();

		delete iParsedFieldCollections;

		}

	if(iParsedFieldArray)

		{

		iParsedFieldArray->ResetAndDestroy();

		delete iParsedFieldArray;

		}

	delete iSmsBuf;

	delete iMailParser;

	delete iIspParser;

	delete iScriptParser;

	delete iSmsParser;

	delete iTelVoiceMailboxParser;

	delete iGprsParser;

	delete iWWWHotlistParser;

	}

//

// 

//

void CIacSettingsParser::RestoreParsedDataL()

	{

	//	We are assuming the server context is set to the Bio Msg entry	

	iEntry.SetEntryL(iEntryId);

	if(iEntry.Entry().MtmData3() != KBIO_MSG_ENTRY_PARSED && iEntry.Entry().MtmData3() != KBIO_MSG_ENTRY_PROCESSED)

		{

		iSmsParsed=EFalse; //sms not parsed yet

		User::Leave(KIacpErrSmsDataNotRestored);

		}

	if(!iEntry.HasStoreL())

		{

		iSmsParsed=EFalse; //sms not parsed yet

		User::Leave(KIacpErrSmsDataNotRestored);

		}

	CMsvStore* store=iEntry.EditStoreL();

	CleanupStack::PushL(store);

	RestoreL(*store);

	CleanupStack::PopAndDestroy();//store

	// work out what type it is

	PopulateFieldCollectionsL();

	}

void CIacSettingsParser::ParseL(TRequestStatus& aStatus,const TDesC& aSms)

	{

	__ASSERT_DEBUG (aSms.Length() > 0 ,User::Panic(KIACP, EIacpEmptyBuffer));

	//make a local copy of sms

	if(iSmsBuf)

		{

		delete iSmsBuf;

		iSmsBuf=NULL;

		}

	iSmsBuf = aSms.AllocL();

	iSms = iSmsBuf->Des(); //initialise Tlex

	ChangeStateL(EParseSms); //Set to initial request

	aStatus = KRequestPending;

	iReport = &aStatus;

	}

//

// Create service or database entries

//

void CIacSettingsParser::ProcessL(TRequestStatus& aStatus)

	{

	iState = EProcessSms;

	iEntryId= iEntry.Entry().Id(); //store id of Bio Msg entry 

	__ASSERT_DEBUG(iEntry.Entry().iMtm==KUidSmartMessageMtm, User::Panic(KIACP,EIacpInvalidEntry));

	__ASSERT_DEBUG(iEntry.Entry().iBioType==KUidMsvBIOInternetAccessPointMessageType, User::Panic(KIACP,EIacpInvalidEntry));

	__ASSERT_DEBUG(iEntry.Entry().Failed()== 0 , User::Panic(KIACP,EIacpInvalidEntry));

	ChangeStateL(ESetParsersData); //Set to initial state

	aStatus = KRequestPending;

	iReport = &aStatus;

	}

void CIacSettingsParser::ChangeStateL(TParseSession aState)

	{

	iState = aState;

	switch (iState)

		{

		case EParseSms:

			ParseSmsL();

			break;

		case ECheckData:

			iCurrentSettingsCtr = 0;

			CheckMandatoryDataL();

			break;

		case ESetParsersData:

			iCurrentSettingsCtr = 0;

			SetDataL();

			break;

		case EProcessSms:

			// Commit parsed data

			DoProcessL();

			break;

		default:

			break;

		}

		RequestComplete(iStatus,KErrNone);

		SetActive();

	}

void CIacSettingsParser::CheckMandatoryDataL()

	{

	CParsedFieldCollection& currentFieldCollection = *(*iParsedFieldCollections)[iCurrentSettingsCtr];

	TSmsType currentType = currentFieldCollection.MessageType();

	switch(currentType)

		{

	case EBasicMail:

		delete iMailParser;

		iMailParser = NULL;

		iMailParser = CMailParser::NewL();

		iMailParser->CheckMandatoryFieldsL(currentFieldCollection);

		break;

	case EBasicIAP:

	case EExtendedIAP:

		delete iIspParser;

		iIspParser = NULL;

		iIspParser = CIspParser::NewL(currentType);

		iIspParser->CheckMandatoryFieldsL(currentFieldCollection);

		break;

	case EExtScriptSettings:

	case EExtSmsSettings:

	case EExtTelephoneSettings:

	case EExtendedMail:

	case EExtWWWHostListItem:

	case EExtTelnetSettings:

	case EExtTerminalSettings:

	case EExtWWWSettings:	

	case EExtTTMLSettings:

	case EExtFTPSettings:

	case EExtInternetSettings:

	case EExtWWWAutofetchSettings:

	case ESmsTypeUndefined:

	case EBasicMailIAP:

	case EExtGprsIAP:	

	case EExtGprsMail:

	case EExtGprsIAPMail:

	case ESmsMixedContent:

		break;

	case EExtGprsSettings:

		delete iGprsParser;

		iGprsParser = NULL;

		iGprsParser = CGprsParser::NewL();

		iGprsParser->CheckMandatoryFieldsL(currentFieldCollection);

		break;

		}

	}

void CIacSettingsParser::SetDataL()

	{

	if(!iSmsParsed)

		{

		RestoreParsedDataL();

		}

	SetParsersDataL();

	}

void CIacSettingsParser::DoProcessL()

	{

	switch((*iParsedFieldCollections)[iCurrentSettingsCtr]->MessageType())

		{

		case EBasicMail:

			iMailParser->ProcessL(iEntry);

			break;

		case EBasicIAP:

			iIspParser->ProcessL(iConnectionPreference);

			break;

		case EExtendedIAP:

			iIspParser->ProcessL(iConnectionPreference);

			break;

		case EExtScriptSettings:

			iScriptParser->ProcessL(iEntry);

			break;

		case EExtSmsSettings:

			iSmsParser->ProcessL(iEntry);

			break;

		case EExtTelephoneSettings:

			iTelVoiceMailboxParser->ProcessL(iEntry);

			break;

		case EExtGprsSettings:

			iGprsParser->ProcessL(iConnectionPreference);

			break;

		case EExtWWWHostListItem:

			iWWWHotlistParser->ProcessL(iEntry);

			break;

		default:

			User::Leave(KIacpUnknownSmsType);

		}

	}

//

//

//

void CIacSettingsParser::DoCancel()

	{

	User::RequestComplete(iReport,KErrCancel);

	}

//

//  

//

TInt CIacSettingsParser::RunError(TInt aError)

	{

	User::RequestComplete(iReport, aError);

	return KErrNone;

	}

//

//  

//

void CIacSettingsParser::RunL()

	{

	TInt eCode = iStatus.Int();

	if(eCode==KErrNone)

		{

		switch(iState)

			{

			case EParseSms:

				ChangeStateL(ECheckData);

				return;

			case ECheckData:

				if(++iCurrentSettingsCtr < iParsedFieldCollections->Count())

					{

					CheckMandatoryDataL();

					SetActive();

					RequestComplete(iStatus, KErrNone);

					return;

					}

				else

					{

					// Storing parsed data array as a new stream within the CMsvStore

					// associated with the Msg Entry

					StoreParsedDataL();

					iSmsParsed=ETrue;

					}

				break;

			case ESetParsersData:

				ChangeStateL(EProcessSms);

				return;

			case EProcessSms:

				if(eCode == KErrNone)

					{

					if(++iCurrentSettingsCtr < iParsedFieldCollections->Count())

						{

						// set connections preferences flag

						TSmsType currentType = (*iParsedFieldCollections)[iCurrentSettingsCtr-1]->MessageType();

						if(currentType==EBasicIAP || currentType== EExtGprsSettings || currentType== EExtendedIAP)

							{

							if(iConnectionPreference==EIacpAttempCreateAsFirstRank)

								iConnectionPreference =  EIacpAttempCreateAsSecondRank;

							else

								iConnectionPreference = EIacpDoNotCreatePreference;

							}

						// If IAP settings are found, store a ref to them

						if(currentType== EBasicIAP || currentType== EExtendedIAP)

							{

							iDefaultIAP = iIspParser->IapEntryId();

							// If Mail settings have been found previously, associate mail with IAP

							if(iDefaultMail)

								{

								iMailParser->AssociateIAPWithMailL(iEntry,iDefaultIAP);

								}

							}

						// If Mail settings are found, set a flag

						if(currentType== EBasicMail || currentType== EExtendedMail)

							{

							iDefaultMail = 1;

							// If IAP settings have ben found previously, associate mail with IAP

							if(iDefaultIAP)

								{

								iMailParser->AssociateIAPWithMailL(iEntry,iDefaultIAP);

								}

							}

						SetParsersDataL();

						iState = ESetParsersData;

						SetActive();

						RequestComplete(iStatus,KErrNone);

						return;

						}

					else

						eCode = CompleteMessage();

					}

					TSmsType currentType = (*iParsedFieldCollections)[iCurrentSettingsCtr-1]->MessageType();

					// If IAP settings are found, store a ref to them

					if(currentType== EBasicIAP || currentType== EExtendedIAP)

						{

						iDefaultIAP = iIspParser->IapEntryId();

						// If Mail settings have been found previously, associate mail with IAP

						if(iDefaultMail)

							{

							iMailParser->AssociateIAPWithMailL(iEntry,iDefaultIAP);

							}

						}

					// If Mail settings are found, set a flag

					if(currentType== EBasicMail || currentType== EExtendedMail)

						{

						iDefaultMail = 1;

						// If IAP settings have ben found previously, associate mail with IAP

						if(iDefaultIAP)

							{

							iMailParser->AssociateIAPWithMailL(iEntry,iDefaultIAP);

							}

						}

				break;

			}

		}

	User::RequestComplete(iReport,eCode);

	}

//

//

//

TInt CIacSettingsParser::CompleteMessage()

	{

	TMsvEntry entry = iEntry.Entry();

	entry.SetMtmData3(KBIO_MSG_ENTRY_PROCESSED);

	TRAPD(error, iEntry.ChangeL(entry));

	return error;

	}

//

// Untility function which sends completion signal to client active object

//

void CIacSettingsParser::RequestComplete(TRequestStatus& aStatus,TInt aCompletion)

	{

	TRequestStatus* statusPtr=&aStatus;

	User::RequestComplete(statusPtr,aCompletion);

	}

//

//

//Data structure "LeftToken:RightToken<LF>"

//

void CIacSettingsParser::ParseSmsL()

	{

	iEntryId= iEntry.Entry().Id(); //store id of Bio Msg entry if changed 

	__ASSERT_DEBUG(iEntry.Entry().iMtm==KUidSmartMessageMtm, User::Panic(KIACP,EIacpInvalidEntry));

	__ASSERT_DEBUG(iEntry.Entry().iBioType==KUidMsvBIOInternetAccessPointMessageType, User::Panic(KIACP,EIacpInvalidEntry));

	__ASSERT_DEBUG(iEntry.Entry().Failed()== 0 , User::Panic(KIACP,EIacpInvalidEntry));

	iParsedFieldArray->ResetAndDestroy();

	//if SMS allready parsed no need to parse again, restore the parsed data

	iEntry.Entry().MtmData3() == KBIO_MSG_ENTRY_PARSED ? iSmsParsed = ETrue : iSmsParsed = EFalse;

	if(iSmsParsed)

		{

		RestoreParsedDataL();

		return;

		}

	// default to create 1st ranking Connection preference ntry in CommDb if required

	iConnectionPreference = EIacpAttempCreateAsFirstRank;

	DoParseL();

	}

//

// append sms data field/value to array,

// set iSmsType to EBasicMail orEBasicIAP

//

void CIacSettingsParser::DoParseL()

	{

	TBuf<256> tempBuf;

	// Set extraction mark at first character

    iSms.SkipSpaceAndMark();

	// might or might not have header?

	if(iSms.Peek() == KCharSlash)

		{

		// Check first line is <header>

		iSms.SkipCharacters();

		if (iSms.MarkedToken() != KSmsHeader)

			{

			User::Leave(KBspInvalidMessage);

			}

		tempBuf=iSms.MarkedToken(); //save a copy of header field

		//appending header field to array

		CParsedField* headerField= new (ELeave) CParsedField;

		CleanupStack::PushL(headerField);

		SetDataFieldsL(*headerField, SMS_HEADER,tempBuf,ETrue);

		iParsedFieldArray->AppendL(headerField);

		iSms.Inc();

		CleanupStack::Pop();//headerField (No need to delete the CParsedField object, since it's now owned by the array)

		}

	// might or might not have password?

	// if line does not contain ':' then we consider it as password

	// if line contains ':' then we check the left token for any valid field names,

	// a line with valid field name is not considered as password.

    TBool PwdWithColumn=EFalse;

	iSms.SkipSpaceAndMark();

	while ( iSms.Peek()!= '\n'  && !iSms.Eos())

		iSms.Inc();

	TLex lex(iSms.MarkedToken());

	while (lex.Peek() != ':' && lex.Peek() != '\n' && !lex.Eos())

		lex.Inc();

	if(lex.Peek() == ':')

		{

		TPtrC LeftToken = lex.MarkedToken(); // extract left token

		if(!IsValidToken(LeftToken))

			PwdWithColumn=ETrue;//we consider it as password containing ':'

		else

			iSms.Inc(-iSms.MarkedToken().Length());	//reset pos. (password is not included in SMS message)

		}

	if(lex.Peek() != ':' || PwdWithColumn )

		{

		if (iSms.TokenLength() >255)

			User::Leave(KErrOverflow); //leave if there is a ridiculously long password even though Nokia Smart Messaging Spec 3 allows password of length 0-infinity

		tempBuf = iSms.MarkedToken(); //save a copy of password field 

		//appending password field to array

		CParsedField* passwordField = new (ELeave) CParsedField();

		CleanupStack::PushL(passwordField);

		SetDataFieldsL(*passwordField, SMS_PASSWORD,tempBuf,ETrue);

		iParsedFieldArray->AppendL(passwordField);

		CleanupStack::Pop();//passwordField

		}

	//start parsing body of message

	while (!iSms.Eos())

		{