// Copyright (c) 2001-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:
// This file contains the implementation for the class defined in MtScheme.h
// 
//

/**
 @file
 @see	MtScheme.h
*/

// System includes
//		
#include <txtrich.h>
#include <inetprottextutils.h>
#include <escapeutils.h>
#include <sendas2.h>

// Local includes
//
#include "MTSCHEME.H"
#include "msgurlparser.h"

// Mailto field name
//
_LIT(KTo, "to");
_LIT(KCc, "cc");
_LIT(KBcc, "bcc");
_LIT(KSubject, "subject");
_LIT(KBody, "body");

// Constants
//
const TUid KMailMtm = {0x10001028};
const TInt KEqualChar = '=';


CMailtoSchemeHandler::CMailtoSchemeHandler()
	{
	}

CMailtoSchemeHandler* CMailtoSchemeHandler::NewLC()
	{
	CMailtoSchemeHandler* self=new (ELeave) CMailtoSchemeHandler();
	CleanupStack::PushL(self);
	self->ConstructL();
	return self;
	}

CMailtoSchemeHandler* CMailtoSchemeHandler::NewL()
	{
	CMailtoSchemeHandler* self = NewLC();
	CleanupStack::Pop(self);
	return self;
	}

void CMailtoSchemeHandler::ConstructL()
	{
	CMsgSchemeHandlerBase::ConstructL();
	}

CMailtoSchemeHandler::~CMailtoSchemeHandler()
	{
	iTo.Close();
	delete iMailtoPart;
	}

void CMailtoSchemeHandler::ParseUrlL(const TDesC& aUrl)
	{
	// Get the scheme specific part
	TPtrC mailtoPart;
	GetSchemeSpecificPartL(aUrl, mailtoPart);

	// Convert %xx chars in the URL to ascii characters
	HBufC* temp = EscapeUtils::EscapeDecodeL(mailtoPart);
	delete iMailtoPart;
	iMailtoPart = temp;

	// Parse the scheme specific part
	TMailtoUrlParser parser;
	parser.Parse(*iMailtoPart);
	TPtrC segment;

	// Parse the address segment separated by ','
	TDelimitedAddressParser address = parser.ExtractAddresses();
	while (address.GetNext(segment) != KErrNotFound)
		{
		SetFieldL(ETo, segment);
		}

	// Parse the body segment separated by '&'
	TDelimitedBodyParser body = parser.ExtractBody();
	while (body.GetNext(segment) != KErrNotFound)
		{
		TPtrC value;
		TField field = GetFieldAndValue(segment, value);
		SetFieldL(field, value);
		}	
	}

void CMailtoSchemeHandler::SetFieldL(TField aField, const TDesC& aFieldValue)
	{
	
	TPtrC  value(aFieldValue); 
	InetProtTextUtils::RemoveWhiteSpace(value, InetProtTextUtils::ERemoveBoth);

	// Set the field values
	switch (aField)
		{
		case ETo:
		case ECc:
		case EBcc:
			User::LeaveIfError(iTo.Append(value));
			break;

		case ESubject:
			__ASSERT_DEBUG(!iSubject.Ptr(), User::Leave(KErrAlreadyExists));
			iSubject.Set(value);
			break;

		case EBody:
			__ASSERT_DEBUG(!iBody.Ptr(), User::Leave(KErrAlreadyExists));
			iBody.Set(value);
			break;

		case EUnknown:
		default:
			break;
		}
	}

CMailtoSchemeHandler::TField CMailtoSchemeHandler::GetFieldAndValue(const TDesC& aComponent, TPtrC& aFieldValue) const
	{
	// Initialise
	TField field = EUnknown;
	
	// Look for the field separator
	TInt pos = aComponent.Locate(KEqualChar);	

	if (pos != KErrNotFound)
		{
		// Set the field name
		TPtrC fieldName = aComponent.Left(pos);
		InetProtTextUtils::RemoveWhiteSpace(fieldName, InetProtTextUtils::ERemoveBoth);

		// Set the field value i.e everything after the equal.
		aFieldValue.Set(aComponent.Mid(pos+1));

		// Check the field name is valid and set the field.
		if (fieldName.CompareF(KTo) == 0)
			field = ETo;
		else if (fieldName.CompareF(KCc) == 0)
			field = ECc;
		else if (fieldName.CompareF(KBcc) == 0)
			field = EBcc;
		else if (fieldName.CompareF(KSubject) == 0)
			field = ESubject;
		else if (fieldName.CompareF(KBody) == 0)
			field = EBody;
		}
	else 
		aFieldValue.Set(KNullDesC);

	return field;
	}


void CMailtoSchemeHandler::SendL()
	{
	RSendAs sendAs;
	CleanupClosePushL(sendAs);
	User::LeaveIfError(sendAs.Connect()); // Connect to the SendAs2 server.

	RSendAsMessage mailMessage;
	CleanupClosePushL(mailMessage);

	mailMessage.CreateL(sendAs, KMailMtm);
	// Set recipient list
	const TInt count = iTo.Count();
	for (TInt i=0; i<count; ++i)
		{
		mailMessage.AddRecipientL(iTo[i], RSendAsMessage::ESendAsRecipientTo);
		}
	mailMessage.SetSubjectL(iSubject);
	mailMessage.SetBodyTextL(iBody);
	mailMessage.LaunchEditorAndCloseL();
	CleanupStack::Pop(&mailMessage); // Closed by LaunchEditorAndCloseL

	CleanupStack::PopAndDestroy(&sendAs);

	}