/*

* Copyright (c) 2010 Sun Microsystems, Inc. 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 Contributor:

* Maximilian Odendahl

*

* Contributors:

* 

* Description: 	various utility classes and functions

*				used in Caldav client and server code

*/

#include "caldavutils.h"

#include <http\MHTTPAuthenticationCallback.h>

#include <http\mhttptransactioncallback.h>

#include <http\mhttpdatasupplier.h>

#include <http\rhttpheaders.h> 

/**

 * CalDavUtils::CalDavUtils

 * default constructor

 */

CalDavUtils::CalDavUtils()

	{

	// No implementation required

	}

/**

 * CalDavUtils::~CalDavUtils

 * default destructor

 */

CalDavUtils::~CalDavUtils()

	{

	}

/**

 * CalDavUtils::NewLC

 * first phase construction

 */

CalDavUtils* CalDavUtils::NewLC()

	{

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

	CleanupStack::PushL(self);

	self->ConstructL();

	return self;

	}

/**

 * CalDavUtils::NewL

 * first phase construction

 */

CalDavUtils* CalDavUtils::NewL()

	{

	CalDavUtils* self = CalDavUtils::NewLC();

	CleanupStack::Pop(self); // self;

	return self;

	}

/**

 * CalDavUtils::ConstructL

 * second phase construction

 */

void CalDavUtils::ConstructL()

	{

	}

/**

 * CalDavUtils::FixImportIssues

 * fix import issues

 */

void CalDavUtils::FixImportIssues(TDes8 &aDes)

	{

	const TUint KICalCarriageReturnChar('\r');

	_LIT8(KICalNewlineChar,"\n");

	_LIT8(KICalCarriageReturnLineFeed,"\r\n");

	TInt ret = aDes.Find(KICalNewlineChar);

	while ((ret != KErrNotFound) && (ret == 0 ? ETrue : (aDes[ret - 1]

			!= KICalCarriageReturnChar)))

		{

		aDes.Replace(ret, 1, KICalCarriageReturnLineFeed);

		TInt mid = aDes.Mid(ret + 2).Find(KICalNewlineChar);

		ret = mid != KErrNone ? mid + ret + 2 : KErrNotFound;

		}

	}

/**

 * CalDavUtils::FixExportIssues

 * fix export issues, hopefully can be removed in the future

 */

void CalDavUtils::FixExportIssues(TDes8 &aDes)

	{

	FixSameTime(aDes);

	FindAndRemoveMethod(aDes);

	FixBYMONTHDAY(aDes);

	FixLineFeed(aDes);

	//TODO: using public, nothing is exported

	}

/**

 * CalDavUtils::FixLineFeed

 * fix lidne feed

 */

void CalDavUtils::FixLineFeed(TDes8 &aDes)

	{

	_LIT8(lf1,"
");

	_LIT8(KBackSlashN,"\\n");

	TInt ret = aDes.Find(lf1);

	while (ret != KErrNotFound)

		{

		aDes.Replace(ret, lf1().Length(), KBackSlashN);

		ret = aDes.Find(lf1);

		}

	}

/**

 * CalDavUtils::FixSameTime

 * fix same time

 */

void CalDavUtils::FixSameTime(TDes8 &aDes)

	{

#define DATELENGTH	15

	_LIT8(DTSTART,"DTSTART:");

	_LIT8(DTEND,"DTEND:");

	_LIT8(DUE,"DUE:");

	_LIT8(nine,"9");

	_LIT8(five,"5");

	_LIT8(VEVENT,"VEVENT");

	_LIT8(VTODO,"VTODO");

	// add one second if DTSTART and DTEND is the same

	// ATTENTION: works only for very simple cases right now

	// DTSTART:20090630T000000

	// DTEND:20090630T000000

	if (aDes.Find(VEVENT) != KErrNone)

		{

		TInt PosStart = aDes.Find(DTSTART);

		TInt PosDue = aDes.Find(DTEND);

		if ((PosStart != KErrNone) && (PosDue != KErrNone))

			{

			TPtrC8 PtrStart = aDes.Mid(PosStart + DTSTART().Length(),

					DATELENGTH);

			TPtrC8 PtrStop = aDes.Mid(PosDue + DTEND().Length(), DATELENGTH);

			if (PtrStart == PtrStop)

				{

				aDes.Replace(PosDue + DTEND().Length() + DATELENGTH - 1, 1,

						nine);

				aDes.Replace(PosDue + DTEND().Length() + DATELENGTH - 2, 1,

						five);

				aDes.Replace(PosDue + DTEND().Length() + DATELENGTH - 3, 1,

						nine);

				}

			}

		}

	// add one second if DTSTART and DUE is the same

	// ATTENTION: works only for very simple cases right now

	// DTSTART:20090630T000000

	// DUE:20090630T000000

	if (aDes.Find(VTODO) != KErrNone)

		{

		TInt PosStart = aDes.Find(DTSTART);

		TInt PosDue = aDes.Find(DUE);

		if ((PosStart != KErrNone) && (PosDue != KErrNone))

			{

			TPtrC8 PtrStart = aDes.Mid(PosStart + DTSTART().Length(),

					DATELENGTH);

			TPtrC8 PtrStop = aDes.Mid(PosDue + DUE().Length(), DATELENGTH);

			if (PtrStart == PtrStop)

				{

				aDes.Replace(PosDue + DUE().Length() + DATELENGTH - 1, 1, nine);

				aDes.Replace(PosDue + DUE().Length() + DATELENGTH - 2, 1, five);

				aDes.Replace(PosDue + DUE().Length() + DATELENGTH - 3, 1, nine);

				}

			}

		}

	}

/**

 * CalDavUtils::FindAndRemoveMethod

 * fix wrong method export

 */

void CalDavUtils::FindAndRemoveMethod(TDes8 &aDes)

	{

	_LIT8(method,"METHOD:PUBLISH\r\n");

	TInt Ret = aDes.Find(method);

	while (Ret != KErrNotFound)

		{

		aDes.Delete(Ret, method().Length());

		Ret = aDes.Find(method);

		}

	}

/**

 * CalDavUtils::FixBYMONTHDAY

 * fix wrong BYMONTHDAY export

 */

void CalDavUtils::FixBYMONTHDAY(TDes8 &aDes)

	{

	_LIT8(method0,"BYMONTHDAY=0");

	_LIT8(method1,"BYMONTHDAY=1");

	TInt ret = aDes.Find(method0);

	while (ret != KErrNotFound)

		{

		aDes.Replace(ret, method1().Length(), method1);

		ret = aDes.Find(method0);

		}

	}

/**

 * CalDavUtils::ScanAllowHeaderL

 * fix scan allow header

 */

void CalDavUtils::ScanAllowHeaderL(RHTTPTransaction &aTransaction,

		TCalDAVOptions &aOptions)

	{

	RStringF Header = aTransaction.Session().StringPool().OpenFStringL(ALLOW);

	THTTPHdrVal HeaderVal;

	if (aTransaction.Response().GetHeaderCollection().GetField(Header, 0,

			HeaderVal) == KErrNone)

		{

		RStringF FieldValStr = aTransaction.Session().StringPool().StringF(

				HeaderVal.StrF());

		const TDesC8 &FieldValDesC = FieldValStr.DesC();

		HBufC8 *FieldVal = FieldValDesC.AllocLC();

		// delete all colons

		TInt Pos = FieldVal->Find(colon);

		while (Pos != KErrNotFound)

			{

			FieldVal->Des().Delete(Pos, 1);

			Pos = FieldVal->Find(colon);

			}

		TLex8 Lex(FieldVal->Des());

		TBool stop = EFalse;

		while (!stop)

			{

			TPtrC8 Ptr = Lex.NextToken();

			stop = Ptr.Length() == 0;

			if (Ptr == DELETE)

				aOptions.DELETE = ETrue;

			else if (Ptr == GET)

				aOptions.GET = ETrue;

			else if (Ptr == HEAD)

				aOptions.HEAD = ETrue;

			else if (Ptr == MKCALENDAR)

				aOptions.MKCALENDAR = ETrue;

			else if (Ptr == MKCOL)

				aOptions.MKCOL = ETrue;

			else if (Ptr == OPTIONS)

				aOptions.OPTIONS = ETrue;

			else if (Ptr == PROPFIND)

				aOptions.PROPFIND = ETrue;

			else if (Ptr == PROPPATCH)

				aOptions.PROPPATCH = ETrue;

			else if (Ptr == PUT)

				aOptions.PUT = ETrue;

			else if (Ptr == REPORT)

				aOptions.REPORT = ETrue;

			else if (Ptr == COPY)

				aOptions.COPY = ETrue;

			else if (Ptr == POST)

				aOptions.POST = ETrue;

			else if (Ptr == MOVE)

				aOptions.MOVE = ETrue;

			else if (Ptr == ACL)

				aOptions.ACL = ETrue;

			else if (Ptr == LOCK)

				aOptions.LOCK = ETrue;

			else if (Ptr == UNLOCK)

				aOptions.UNLOCK = ETrue;

			}

		CleanupStack::PopAndDestroy(FieldVal);

		}

	Header.Close();

	}

/**

 * CalDavUtils::ScanDAVHeaderL

 * scan DAV header

 */

void CalDavUtils::ScanDAVHeaderL(RHTTPTransaction &aTransaction,

		TCalDAVOptions &aOptions)

	{

	RStringF Header = aTransaction.Session().StringPool().OpenFStringL(DAV);

	THTTPHdrVal aHeaderVal;

	if (aTransaction.Response().GetHeaderCollection().GetField(Header, 0,

			aHeaderVal) == KErrNone)

		{

		RStringF FieldValStr = aTransaction.Session().StringPool().StringF(

				aHeaderVal.StrF());

		const TDesC8 &FieldValDesC = FieldValStr.DesC();

		HBufC8 *FieldVal = FieldValDesC.AllocLC();

		// delete all colons

		TInt Pos = FieldVal->Find(colon);

		while (Pos != KErrNotFound)

			{

			FieldVal->Des().Delete(Pos, 1);

			Pos = FieldVal->Find(colon);

			}

		TLex8 Lex(FieldVal->Des());

		TBool stop = EFalse;

		while (!stop)

			{

			TPtrC8 Ptr = Lex.NextToken();

			stop = Ptr.Length() == 0;

			if (Ptr == ONE)

				aOptions.ONE = ETrue;

			else if (Ptr == TWO)

				aOptions.TWO = ETrue;

			else if (Ptr == THREE)

				aOptions.THREE = ETrue;

			else if (Ptr == access_control)

				aOptions.access_control = ETrue;

			else if (Ptr == calendar_access)

				{

				aOptions.calendar_access = ETrue;

				// this is a CalDAV server for sure, MULTIGET and calendar-query is required

				// we do not check for this anymore in CCaldavEngine::GetOptions()

				aOptions.MULTIGET = ETrue;

				aOptions.QUERY = ETrue;

				}

			else if (Ptr == calendar_schedule)

				aOptions.calendar_schedule = ETrue;

			else if (Ptr == calendar_auto_schedule)

				aOptions.calendar_auto_schedule = ETrue;

			else if (Ptr == sync_collection)

				aOptions.sync_collection = ETrue;

			else if (Ptr == extended_mkcol)

				aOptions.extended_mkcol = ETrue;

			}

		CleanupStack::PopAndDestroy(FieldVal);

		}

	Header.Close();

	}

/**

 * CalDavUtils::EnsureSlashL

 * ensure trailing slash

 */

HBufC8* CalDavUtils::EnsureSlashL(HBufC8* aIn)

	{

	if ((aIn == NULL) || (aIn->Right(KSlash().Length()) == KSlash))

		return aIn;

	else

		{

		HBufC8 *out = HBufC8::NewL(aIn->Length() + KSlash().Length());

		out->Des().Append(*aIn);

		out->Des().Append(KSlash);

		delete aIn;

		aIn = NULL;

		return out;

		}

	}

/**

 * CalDavUtils::EnsureSlashL

 * ensure trailing slash

 */

HBufC8* CalDavUtils::EnsureSlashL(const TDesC8 &aIn)

	{

	HBufC8 *out = aIn.AllocL();

	return CalDavUtils::EnsureSlashL(out);

	}