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

//

#include <smuthdr.h>

#include <csmsemailfields.h>

#include <gsmuieoperations.h>

#include <gsmumsg.h>

#include <msvstore.h>	

#include <cntdb.h>

#include <gsmunonieoperations.h>

#include <gsmuelem.h>

#ifdef SYMBIAN_ENABLE_SPLIT_HEADERS  

#include <tmsvsmsentry.h>

#endif

#if (defined SYMBIAN_MESSAGESTORE_HEADER_BODY_USING_SQLDB)

#include <msvrcpt.h> 

#endif

const TUid KUidMsvSMSHeaderStream		= {0x10001834};

const TInt16 KMsvSmsHeaderVersion		= 1;

const TInt KSmcmRecipientsGranularity	= 8;

#if (defined SYMBIAN_MESSAGESTORE_HEADER_BODY_USING_SQLDB)

_LIT16(KComma, ",");

_LIT16(KDelimiter, ";");

#endif

/** 

Allocates and constructs a new CSmsHeader object.

Use this function to create a new SMS-SUBMIT, SMS-COMMAND, SMS-DELIVER or 

SMS-STATUS-REPORT type message.

@param	aType

The Protocol Data Unit (PDU) type for the SMS message.

@param	aText

The message text.

@return

A new CSmsHeader object.

*/

EXPORT_C CSmsHeader* CSmsHeader::NewL(CSmsPDU::TSmsPDUType aType, CEditableText& aText)

	{

	CSmsHeader* self = new(ELeave) CSmsHeader();

	CleanupStack::PushL(self);

	self->ConstructL(aType, aText);

	CleanupStack::Pop(self);

	return self;

	}

/** 

Allocates and constructs a new CSmsHeader object.

Use this function to create a new SMS-SUBMIT, SMS-COMMAND, SMS-DELIVER or 

SMS-STATUS-REPORT type message. This version uses a previously connected

file server session handle.

@param	aType

The Protocol Data Unit (PDU) type for the SMS message.

@param	aText

The message text.

@param aFs

Handle to an open file server session. CSmsHeader will not close the file session.

@return

A new CSmsHeader object.

*/

EXPORT_C CSmsHeader* CSmsHeader::NewL(CSmsPDU::TSmsPDUType aType, CEditableText& aText, RFs& aFs)

	{

	CSmsHeader* self = new(ELeave) CSmsHeader();

	CleanupStack::PushL(self);

	self->ConstructL(aType, aText, aFs);

	CleanupStack::Pop(self);

	return self;

	}

/** 

Allocates and constructs a new CSmsHeader object.

Use this function to create a new SMS-DELIVER type message.

@param	aMessage

The SMS message encapsulation from the SMS stack.

@return

A new CSmsHeader object.

*/

EXPORT_C CSmsHeader* CSmsHeader::NewL(CSmsMessage* aMessage)

	{

	CSmsHeader* self = new(ELeave) CSmsHeader(aMessage);

	CleanupStack::PushL(self);

	self->ConstructL();

	CleanupStack::Pop(self);

	return self;

	}

/**

Destructor.

*/

EXPORT_C CSmsHeader::~CSmsHeader()

	{

	iRecipients.ResetAndDestroy();

	delete iMessage;

	delete iEmailFields;

	if(iCloseFs)

		{

		iFs.Close();

		}

	}

/** 

Sets the SMS message settings for the message.

This can only be used on SMS-SUBMIT, SMS-COMMAND, SMS-DELIVER or SMS-STATUS-REPORT

type messages.

NOTE - if this is an Email over SMS message then the PID of is not changed. The

PID would have been set correctly when the email fields were set.

@param	aSmsSettings

The SMS message settings for the message

@leave	KErrNotSupported

The message PDU type was not supported, or the message conversion value was not

supported.

@panic	SMCM	0

The message PDU is not supported (debug only).

*/

EXPORT_C void CSmsHeader::SetSmsSettingsL(const CSmsMessageSettings& aSmsSettings)

	{

	__ASSERT_DEBUG( (Type()==CSmsPDU::ESmsSubmit) || (Type()==CSmsPDU::ESmsDeliver) || (Type()==CSmsPDU::ESmsStatusReport) || (Type()==CSmsPDU::ESmsCommand), Panic(ESmutPanicUnsupportedMsgType)); 

	switch(Type())

		{

		case(CSmsPDU::ESmsSubmit):

			{

			Submit().SetRejectDuplicates(aSmsSettings.RejectDuplicate());

			Submit().SetReplyPath(aSmsSettings.ReplyPath());

			//Check if delivery report for the last segment only is required . 

			if(aSmsSettings.LastSegmentDeliveryReport())

				{

				CSmsTPSRROperations& tpSRROperations = static_cast<CSmsTPSRROperations&>(iMessage->GetOperationsForNonIEL(ESmsTPSRRParameter));

				tpSRROperations.SetSchemeL();

				tpSRROperations.SetLastSegmentStatusReportL(ETrue);

				}

			else

				{

				Submit().SetStatusReportRequest(aSmsSettings.DeliveryReport());	

				}

			Submit().SetValidityPeriod(aSmsSettings.ValidityPeriod());

			Submit().SetValidityPeriodFormat(aSmsSettings.ValidityPeriodFormat());

			break;

			}

		case(CSmsPDU::ESmsCommand):

			{

			Command().SetStatusReportRequest(aSmsSettings.DeliveryReport());

			break;

			}

		case(CSmsPDU::ESmsDeliver):

		case(CSmsPDU::ESmsStatusReport):

			break;

		default:

			{			

			User::Leave(KErrNotSupported);

			break;

			}

		};

	if (Message().TextPresent())

		SetCanConcatenate(aSmsSettings.CanConcatenate());

	CSmsPDU& pdu=Message().SmsPDU();

	if (pdu.DataCodingSchemePresent())

		pdu.SetAlphabet(aSmsSettings.CharacterSet());

	if (pdu.ProtocolIdentifierPresent() && iEmailFields->Length() == 0 )

		{

		// The email fields object for this message is empty - therefore the

		// PID can be set. With a non-empty email fields object the PID would

		// have been set for interworking with email and MUST not be changed.

		pdu.SetPIDType(TSmsProtocolIdentifier::ESmsPIDTelematicInterworking);

		// MessageConversion

		switch(aSmsSettings.MessageConversion())

			{

			case(ESmsConvPIDNone):

				{

				pdu.SetTelematicDeviceIndicator(TSmsProtocolIdentifier::ESmsNoTelematicDevice);

				break;

				}

			case ESmsConvFax:

			case ESmsConvX400:

			case ESmsConvPaging:

			case ESmsConvMail:

			case ESmsConvErmes:

			case ESmsConvSpeech:

				{

				pdu.SetTelematicDeviceIndicator(TSmsProtocolIdentifier::ESmsTelematicDevice);

				pdu.SetTelematicDeviceType((TSmsProtocolIdentifier::TSmsTelematicDeviceType) aSmsSettings.MessageConversion());

				break;

				}

			default:

				{

				User::Leave(KErrNotSupported);

				break;

				}

			}; 

		}

	}

/** 

Gets the SMS message settings for the message.

This can only be used on SMS-SUBMIT type messages.

@param	aSmsSettings

The output argument with the SMS message settings.

@leave	KErrNotSupoprted

The Telematic Device type is not supported.

@panic	SMCM	0

The message PDU is not supported (debug only).

*/

EXPORT_C void CSmsHeader::GetSmsSettingsL(CSmsMessageSettings& aSmsSettings) const

	{

	__ASSERT_DEBUG( Type()==CSmsPDU::ESmsSubmit, Panic(ESmutPanicUnsupportedMsgType)); 

	switch(Type())

		{

		case(CSmsPDU::ESmsSubmit):

			{

			aSmsSettings.SetRejectDuplicate(Submit().RejectDuplicates());

			aSmsSettings.SetReplyPath(Submit().ReplyPath());

			TSmsStatusReportScheme scheme = iMessage->Scheme();

			if (scheme == ETPSRRScheme)	

				{

				aSmsSettings.SetLastSegmentDeliveryReport(ETrue);

				}

			else

				{

				aSmsSettings.SetDeliveryReport(Submit().StatusReportRequest());

				}

			aSmsSettings.SetValidityPeriod(Submit().ValidityPeriod());

			aSmsSettings.SetValidityPeriodFormat(Submit().ValidityPeriodFormat());

			aSmsSettings.SetCharacterSet(Submit().Alphabet());

			if (iMessage->SmsPDU().PIDType() == TSmsProtocolIdentifier::ESmsPIDTelematicInterworking)

				{

				if (iMessage->SmsPDU().TelematicDeviceIndicator() == TSmsProtocolIdentifier::ESmsNoTelematicDevice)

					{

					aSmsSettings.SetMessageConversion(ESmsConvPIDNone);

					}

				else //if (iMessage->SmsPDU().TelematicDeviceIndicator() == TSmsProtocolIdentifier::ESmsTelematicDevice)

					{

					switch (iMessage->SmsPDU().TelematicDeviceType())

						{

						case TSmsProtocolIdentifier::ESmsGroup3TeleFax:

						case TSmsProtocolIdentifier::ESmsX400MessageHandlingSystem:

						case TSmsProtocolIdentifier::ESmsNationalPagingSystem:

						case TSmsProtocolIdentifier::ESmsInternetElectronicMail:

						case TSmsProtocolIdentifier::ESmsERMES:

						case TSmsProtocolIdentifier::ESmsVoiceTelephone:

							aSmsSettings.SetMessageConversion((TSmsPIDConversion) iMessage->SmsPDU().TelematicDeviceType());

							break;

						default:

							User::Leave(KErrNotSupported);

							break;

						}

					}

				}

			aSmsSettings.SetCanConcatenate(CanConcatenate());

			break;

			}

		default:

			{

			break;

			}

		}

	}

/**

Sets the email fields for the message.

If the supplied email fields is not empty then the PID of the PDU of the message

is set for interworking with email.

If the supplied email fields is empty and the PID of the PDU of the message is 

set for interworking with email then the PID is set to the default value that

indicates no telematic device. If the PID was not set for interworking with 

email then it is left unchanged.

@param	aEmailFields

The email fields object. A copy is made of this object.

*/	

EXPORT_C void CSmsHeader::SetEmailFieldsL(const CSmsEmailFields& aEmailFields)

	{

	__ASSERT_DEBUG( Type()==CSmsPDU::ESmsSubmit, Panic(ESmutPanicUnsupportedMsgType)); 

	CSmsEmailFields* temp = CSmsEmailFields::NewL(aEmailFields);

	delete iEmailFields;

	iEmailFields = temp;

	CSmsPDU& pdu = Message().SmsPDU();

	if( pdu.ProtocolIdentifierPresent() )

		{

		if( iEmailFields->Length() > 0 )

			{

			// Set the PID for interworking with email.

			pdu.SetPIDType(TSmsProtocolIdentifier::ESmsPIDTelematicInterworking);

			pdu.SetTelematicDeviceIndicator(TSmsProtocolIdentifier::ESmsTelematicDevice);

			pdu.SetTelematicDeviceType(TSmsProtocolIdentifier::ESmsInternetElectronicMail);

			}

		else

			{

			// The email fields are empty - if the PID is set for interworking

			// with email, set to indicate no telematic device.

			if(	pdu.PIDType() == TSmsProtocolIdentifier::ESmsPIDTelematicInterworking &&

				pdu.TelematicDeviceIndicator() == TSmsProtocolIdentifier::ESmsTelematicDevice &&

				pdu.TelematicDeviceType() == TSmsProtocolIdentifier::ESmsInternetElectronicMail )

				{

				pdu.SetTelematicDeviceIndicator(TSmsProtocolIdentifier::ESmsNoTelematicDevice);

				}

			}

		}

	}

/**

Sets the email fields for a reply message.

The address field is copied from the specified email fields. The subject field 

is formatted according to the specified subject format using the subject from 

the specified email fields.

The PID of the PDU of the message is set for interworking with email.

@param	aEmailFields

The email fields object.

@param	aReplySubjectFormat

The format of the subject field.

@internalComponent

*/

void CSmsHeader::SetReplyEmailFieldsL(const CSmsEmailFields& aEmailFields, const TDesC& aReplySubjectFormat)

	{

	// Create the reply email fields - copy address and then format the subject,

	// if one exists according to the reply prefix.

	CSmsEmailFields* temp = CSmsEmailFields::NewL();

	CleanupStack::PushL(temp);

	temp->AddAddressL(aEmailFields.Addresses().MdcaPoint(0));

	SetEmailReplyForwardSubjectL(temp, aEmailFields.Subject(), aReplySubjectFormat);

	CleanupStack::Pop(temp);

	delete iEmailFields;

	iEmailFields = temp;

	// Set the PID for interworking with email.

	CSmsPDU& pdu = Message().SmsPDU();

	if( pdu.ProtocolIdentifierPresent() )

		{

		pdu.SetPIDType(TSmsProtocolIdentifier::ESmsPIDTelematicInterworking);

		pdu.SetTelematicDeviceIndicator(TSmsProtocolIdentifier::ESmsTelematicDevice);

		pdu.SetTelematicDeviceType(TSmsProtocolIdentifier::ESmsInternetElectronicMail);

		}

	}

/**

Sets the email fields for a forward message.

The address field is left empty. The subject field is formatted according to the

specified subject format using the subject from the specified email fields.

The PID of the PDU of the message is set for interworking with email.

@param	aEmailFields

The email fields object.

@param	aForwardSubjectFormat

The format of the subject field.

@internalComponent

*/

void CSmsHeader::SetForwardEmailFieldsL(const CSmsEmailFields& aEmailFields, const TDesC& aForwardSubjectFormat)

	{

	// Create the reply email fields - copy address and then format the subject,

	// if one exists according to the reply prefix.

	CSmsEmailFields* temp = CSmsEmailFields::NewL();

	CleanupStack::PushL(temp);

	SetEmailReplyForwardSubjectL(temp, aEmailFields.Subject(), aForwardSubjectFormat);

	CleanupStack::Pop(temp);

	delete iEmailFields;

	iEmailFields = temp;

	// Set the PID for interworking with email.

	CSmsPDU& pdu = Message().SmsPDU();

	if( pdu.ProtocolIdentifierPresent() )

		{

		pdu.SetPIDType(TSmsProtocolIdentifier::ESmsPIDTelematicInterworking);

		pdu.SetTelematicDeviceIndicator(TSmsProtocolIdentifier::ESmsTelematicDevice);

		pdu.SetTelematicDeviceType(TSmsProtocolIdentifier::ESmsInternetElectronicMail);

		}

	}

void CSmsHeader::SetEmailReplyForwardSubjectL(CSmsEmailFields* aEmailFields, const TDesC& aSubject, const TDesC& aSubjectFormat)

	{

	TInt length = aSubject.Length();

	if( length > 0 )

		{

		// Prevent a chain of the format string appearing in the subject - check

		// to see if the format string is already the prefix of the subject.

		TInt formatPosInSubject = KErrNotFound;

		_LIT(KFormatStringSpecifier, "%S");

		TInt formatPos = aSubjectFormat.Find(KFormatStringSpecifier);

		if( formatPos > 0 )

			{

			// Look in current subject for the format string - avoid the '%'.

			formatPosInSubject = aSubject.FindF(aSubjectFormat.Left(formatPos - 1));

			}

		// Need to format the string if the format string is not at the start of

		// the current subject.

		if( formatPosInSubject != 0 )

			{

			// Create a buffer large enough to hold re-formated subject - need

			// to subtract two from the prefix length (the %S).

			length += aSubjectFormat.Length() - 2;

			HBufC* buf = HBufC::NewLC(length);

			TPtr ptr(buf->Des());

			// Format the reply subject and set in the email fields.

			ptr.Format(aSubjectFormat, &aSubject);

			aEmailFields->SetSubjectL(*buf);

			CleanupStack::PopAndDestroy(buf);

			}

		else

			{

			// Subject already contains the format string - use it.

			aEmailFields->SetSubjectL(aSubject);

			}

		}

	}

/**

The email fields object for this message.

@return

The email fields object for this message.

*/	

EXPORT_C const CSmsEmailFields& CSmsHeader::EmailFields() const

	{

	return *iEmailFields;

	}

/** 

Internalises the object from the specified stream.

@param	aStream

The stream to be read from.

*/

EXPORT_C void CSmsHeader::InternalizeL(RMsvReadStream& aStream)

	{

#if (!defined SYMBIAN_MESSAGESTORE_HEADER_BODY_USING_SQLDB)

	aStream.ReadInt16L(); //version. Not used yet

	iRecipients.ResetAndDestroy();

	TInt count=aStream.ReadInt32L();

	while(count--)

		{

		CSmsNumber* recipient=CSmsNumber::NewL();  

		CleanupStack::PushL(recipient);

		recipient->InternalizeL(aStream);

		iRecipients.AppendL(recipient);

		CleanupStack::Pop(recipient);

		}

	iFlags = aStream.ReadUint32L();

	iBioMsgIdType = (TBioMsgIdType) aStream.ReadInt8L();

	iMessage->InternalizeWithoutBufferL(aStream);

#else

	iMessage->InternalizeWithoutBufferL(aStream);

#endif

	}

/**

Externalises the object to the specified stream.

@param	aStream

The stream to be writen to.

*/

EXPORT_C void CSmsHeader::ExternalizeL(RMsvWriteStream& aStream) const

	{

#if (!defined SYMBIAN_MESSAGESTORE_HEADER_BODY_USING_SQLDB)

	aStream.WriteInt16L(KMsvSmsHeaderVersion);

	TInt count=iRecipients.Count();

	aStream.WriteInt32L(count);

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

		iRecipients[i]->ExternalizeL(aStream);

	aStream.WriteUint32L(iFlags);

	aStream.WriteInt8L(iBioMsgIdType);

	iMessage->ExternalizeWithoutBufferL(aStream);