// Copyright (c) 2006-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 "cimaplogin.h"

#include "moutputstream.h"

#include "cimapsessionconsts.h"

#include "imappaniccodes.h"

// IMAP LOGIN command

_LIT8(KCommandLogin, "%d LOGIN %S %S\r\n");

_LIT8(KCommandLoginUsernameLength, "%d LOGIN {%d}\r\n");

_LIT8(KCommandLoginUsernamePasswordLength, "%d LOGIN %S {%d}\r\n");

_LIT8(KCommandContinueUsernameLitPassword, "%S %S\r\n");

_LIT8(KCommandContinueUsernameLitPasswordLength, "%S {%d}\r\n");

_LIT8(KCommandContinuePasswordLit, "%S\r\n");

CImapLogin* CImapLogin::NewL(CImapFolderInfo* aSelectedFolderData, TInt aLogId, const TDesC8& aUserName, const TDesC8& aPassword, CImapCapabilityInfo& aCapabilityInfo)

// static method first phase construction

	{		

	CImapLogin* self = new (ELeave) CImapLogin(aSelectedFolderData, aLogId, aCapabilityInfo);

	CleanupStack::PushL(self);

	self->ConstructL(aUserName, aPassword);

	CleanupStack::Pop();

	return self;

	}

CImapLogin::CImapLogin(CImapFolderInfo* aSelectedFolderData, TInt aLogId, CImapCapabilityInfo& aCapabilityInfo)

	: CImapCapability(aSelectedFolderData, aLogId, aCapabilityInfo)

	{				

	}

void CImapLogin::ConstructL(const TDesC8& aUserName, const TDesC8& aPassword)

	{

	iUserName =	aUserName.AllocL();

	iPassword = aPassword.AllocL();

	}

CImapLogin::~CImapLogin()

	{

	delete iUserName;

	delete iPassword;

	}

/**

Check whether the username or/and password needs to be sent as literal data.

The data needs to be sent as a literal if it contains non ASCII characters

or it contains special characters

*/

void CImapLogin::CheckLiteralInUserNameAndPassword()

	{

	iLiteralUsername = EFalse;

	TPtr8 userName = iUserName->Des();

	for(TInt a=0;a<iUserName->Length();a++)

		{

		if (userName[a]<=32  || userName[a]>=127 || userName[a]=='\"' || userName[a]=='%'  ||

		    userName[a]=='(' || userName[a]==')' || userName[a]=='*'  || userName[a]=='\\' ||

		    userName[a]=='{' || userName[a]=='}' )

			{

			iLiteralUsername=ETrue;

			break;

			}

		}

	iLiteralPassword=EFalse;

	TPtr8 password = iPassword->Des();

	for(TInt a=0;a<iPassword->Length();a++)

		{

		if (password[a]<=32  || password[a]>=127 || password[a]=='\"' || password[a]=='%'  ||

		    password[a]=='(' || password[a]==')' || password[a]=='*'  || password[a]=='\\' ||

		    password[a]=='{' || password[a]=='}' )

			{

			iLiteralPassword=ETrue;

			break;

			}

		}

	}

/** 

Formats and sends the IMAP LOGIN command.

@param aTagId Command sequence id which will be send along with the IMAP command.

@param aStream A wrapper for the outbound stream of a connected socket, using which 

the command will be send to the server

*/

void CImapLogin::SendMessageL(TInt aTagId, MOutputStream& aStream)

	{

	iTagId = aTagId;

	iStream = &aStream;

	CheckLiteralInUserNameAndPassword();

	__ASSERT_DEBUG(iOutputBuffer==NULL, TImapServerPanic::ImapPanic(TImapServerPanic::ECommandOutputBufferNotNull));		

	if (!iLiteralUsername && !iLiteralPassword)

		{

		// send username and password now

		TInt bufLength = KCommandLogin().Length() + TagLength(aTagId) + iUserName->Length() + iPassword->Length();

		iOutputBuffer = HBufC8::NewL(bufLength);

		iOutputBuffer->Des().Format(KCommandLogin, aTagId, iUserName, iPassword);		

		}

	else

		{	

		if (iLiteralUsername)

			{

			// send the username's length

			TInt bufLength = KCommandLoginUsernameLength().Length() + TagLength(aTagId) + TagLength(iUserName->Length());

			iOutputBuffer = HBufC8::NewL(bufLength);

			iOutputBuffer->Des().Format(KCommandLoginUsernameLength(), aTagId, iUserName->Length());

			iSentUserNameLength = ETrue;	

			}

		else 

			{

			// send the username and the passwords's length

			TInt bufLength = KCommandLoginUsernamePasswordLength().Length() + TagLength(aTagId) + iUserName->Length() + TagLength(iPassword->Length());

			iOutputBuffer = HBufC8::NewL(bufLength);

			iOutputBuffer->Des().Format(KCommandLoginUsernamePasswordLength(), aTagId, iUserName, iPassword->Length());

			}

		}

	//send the command to the server

	aStream.SendDataReq(*iOutputBuffer);

	}

void CImapLogin::ParseContinuationResponseL()

	{

	__ASSERT_DEBUG(iStream != NULL, TImapServerPanic::ImapPanic(TImapServerPanic::ECommandOutputStreamIsNull));

	delete iOutputBuffer;

	iOutputBuffer = NULL;

	if(iLiteralUsername && !iLiteralPassword)

		{

		// send the username's literal data and then password.

		TInt bufLength = KCommandContinueUsernameLitPassword().Length() + iUserName->Length() + iPassword->Length();

		iOutputBuffer = HBufC8::NewL(bufLength);				

		iOutputBuffer->Des().Format(KCommandContinueUsernameLitPassword, iUserName, iPassword);

		}

	else if(iSentUserNameLength && iLiteralPassword)

		{

		// send the username's literal data and then password's length.

		TInt bufLength = KCommandContinueUsernameLitPasswordLength().Length() + iUserName->Length() + TagLength(iPassword->Length());

		iOutputBuffer = HBufC8::NewL(bufLength);

		iOutputBuffer->Des().Format(KCommandContinueUsernameLitPasswordLength, iUserName, iPassword->Length());

		iSentUserNameLength = EFalse;

		}

	else

		{

		// send the password as literal data

		TInt bufLength = KCommandContinuePasswordLit().Length() + iPassword->Length();

		iOutputBuffer = HBufC8::NewL(bufLength);

		iOutputBuffer->Des().Format(KCommandContinuePasswordLit, iPassword);

		}

	iStream->SendDataReq(*iOutputBuffer);

	}

/**

Calls the base class for default parsing,

then checks for and processes the CAPABILITY response text code if it has been sent.

E.g. The tagged response may have been something like

123 OK [CAPABILITY IMAP4rev1 STARTTLS AUTH=PLAIN LOGINDISABLED]

@param aTagId The incoming tag id.

@return ETrue - indicating that the command is completed by this tagged response.

*/

TBool CImapLogin::ParseTaggedResponseL(TInt aTagId)

	{

	BaseParseTaggedResponseL(aTagId);

	TPtrC8 responseTextCode = GetResponseTextCodeL();

	if (responseTextCode.Length() > 0)

		{

		// If this is a CAPABILITY response text code, then process it now

		iUnparsedData.Set(responseTextCode);

		TPtrC8 part = GetNextPart();

		if (part.CompareF(KTxtImapCapability) == 0)

			{

			ParseCapabilityDataL(iUnparsedData);

			}

		}

	return ETrue;

	}