--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/pimappservices/calendar/tsrc/tcal_BadRRule.cpp	Tue Feb 02 10:12:19 2010 +0200
@@ -0,0 +1,467 @@
+// Copyright (c) 2005-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 "tcal_BadRRule.h"
+
+_LIT(KTestName,"tcal_BadRRule");
+_LIT8(KGUID, "A_Global_UID");
+_LIT8(KGUID1, "A_TODO_ENTRY");
+
+static RTest test(KTestName);
+
+static void CleanupCCalEntryArray(TAny* aPointer)
+	{
+	RPointerArray<CCalEntry>* calEntryArray = static_cast<RPointerArray<CCalEntry>*>(aPointer); 
+	if (calEntryArray)
+		{
+		calEntryArray->ResetAndDestroy();
+		}
+	}
+
+
+CBadRRule* CBadRRule::NewL(CCalTestLibrary* aTestLib)
+	{
+	CBadRRule* self = new (ELeave) CBadRRule();
+	CleanupStack::PushL(self);
+	self->iTestLib = aTestLib ;
+	self->ConstructL();
+	CleanupStack::Pop(self);
+	return self;
+	}
+
+	
+void CBadRRule::ConstructL()
+	{
+	iTestLib->ReplaceFileL(KTestName);
+	iTestLib->OpenFileL(KTestName);		
+	}
+
+	
+CBadRRule::~CBadRRule()	
+	{
+	test.Close();
+	}
+
+void CBadRRule::CreateToDoEntryL()
+{
+	RPointerArray<CCalEntry> entryarr ;	
+	CleanupResetAndDestroyPushL(entryarr);	
+
+	
+	TInt num ;
+
+	HBufC8* guid = KGUID1().AllocLC(); // ownership of guid gets transferred
+	CCalEntry *entry = CCalEntry::NewL(CCalEntry::ETodo, guid, CCalEntry::EMethodNone, 0) ;
+	CleanupStack::Pop(guid);	
+	CleanupStack::PushL(entry) ;
+
+	TCalTime startTime ;
+	TCalTime endTime ;	
+	startTime.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 8, 10, 30, 0, 0))) ;
+	endTime.SetTimeUtcL(startTime.TimeUtcL() + TTimeIntervalDays(1)) ;
+			
+	entry->SetStartAndEndTimeL(startTime, endTime) ;
+
+	TCalTime endTime1 ;	
+	endTime1.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 23, 10, 5, 0, 0))) ;		
+
+
+	TCalRRule rrule(TCalRRule::EWeekly) ;
+	
+	rrule.SetDtStart(startTime);
+	rrule.SetUntil(endTime1);
+	rrule.SetInterval(1);	
+	
+	RArray<TDay> days;
+	CleanupClosePushL(days);	
+	days.AppendL(ETuesday);
+	rrule.SetByDay(days);
+	CleanupStack::PopAndDestroy(&days);
+
+	entry->SetRRuleL(rrule) ; 
+	// both entry and rrule start time should be aligned to the first instance
+	TCalRRule setRRule ;
+	entry->GetRRuleL(setRRule) ;
+	
+	test(setRRule.DtStart().TimeUtcL() == rrule.DtStart().TimeUtcL()) ;
+	entryarr.AppendL(entry) ;
+	CleanupStack::Pop(entry);		
+
+	iCalEntryView->StoreL(entryarr, num) ;	
+	entryarr.ResetAndDestroy();
+
+	TCalTime recId;
+	recId.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 9, 10, 30, 0, 0))); // creating recurrence id
+
+	guid = KGUID1().AllocLC(); // ownership of guid gets transferred
+	entry = CCalEntry::NewL(CCalEntry::ETodo, guid, CCalEntry::EMethodNone, 0, recId, CalCommon::EThisOnly);
+	CleanupStack::Pop(guid);			
+	CleanupStack::PushL(entry) ;	
+
+	TCalTime startTime3 ;
+	TCalTime endTime3 ;	
+	startTime3.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 7, 10, 2, 0, 0))) ;
+	endTime3.SetTimeUtcL(startTime3.TimeUtcL() + TTimeIntervalHours(1)) ;
+	entry->SetStartAndEndTimeL(startTime3, endTime3) ;
+	
+	entryarr.AppendL(entry) ;
+	CleanupStack::Pop(entry) ;
+	
+	iCalEntryView->StoreL(entryarr, num) ;		
+	CleanupStack::PopAndDestroy(&entryarr);
+	
+	RArray<TTime> insTimes ;
+
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 7, 11, 2, 0, 0))) ;
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 16, 10, 30, 0, 0))) ;
+
+	CleanupClosePushL(insTimes) ;
+	CheckInstancesL(insTimes) ; 
+	CleanupStack::PopAndDestroy(&insTimes) ;
+			// time portion of repeat's end eliminates the third instance
+
+}
+
+void CBadRRule::CreateParentL()
+{
+	RPointerArray<CCalEntry> entryarr ;	
+	CleanupResetAndDestroyPushL(entryarr);	
+
+	TInt num ;
+
+	HBufC8* guid = KGUID().AllocLC(); // ownership of guid gets transferred
+	CCalEntry *entry = CCalEntry::NewL(CCalEntry::EEvent, guid, CCalEntry::EMethodNone, 0) ;
+	CleanupStack::Pop(guid);	
+	CleanupStack::PushL(entry) ;
+
+	TCalTime startTime ;
+	TCalTime endTime ;	
+	startTime.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 7, 10, 1, 0, 0))) ;
+	endTime.SetTimeUtcL(startTime.TimeUtcL() + TTimeIntervalHours(1)) ;
+			
+	entry->SetStartAndEndTimeL(startTime, endTime) ;
+
+	TCalTime endTime1;
+	endTime1.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 23, 10, 5, 0, 0))) ;		
+
+
+	TCalRRule rrule(TCalRRule::EWeekly) ;
+	
+	rrule.SetDtStart(startTime);
+	rrule.SetUntil(endTime1);
+	rrule.SetInterval(1);	
+	
+	RArray<TDay> days;
+	CleanupClosePushL(days);	
+	days.AppendL(ETuesday);
+	rrule.SetByDay(days);
+	CleanupStack::PopAndDestroy(&days);
+
+	entry->SetRRuleL(rrule) ; 
+	TCalRRule setRRule ;
+	entry->GetRRuleL(setRRule) ;
+	
+	test(setRRule.DtStart().TimeUtcL() == rrule.DtStart().TimeUtcL()) ;
+	entryarr.AppendL(entry) ;
+	CleanupStack::Pop(entry);		
+
+	iCalEntryView->StoreL(entryarr, num) ;	
+	entryarr.ResetAndDestroy() ;
+
+	iCalEntryView->FetchL(KGUID(), entryarr);
+	TCalRRule savedRRule ;
+	entryarr[0]->GetRRuleL(savedRRule) ;
+	
+	TCalTime matchTime ; /* Jan 10, 2006 is the first Tuesday */
+	matchTime.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 9, 10, 1, 0, 0))) ;
+	//When the entry is stored, the repeat start time is adjusted so that it fits the rule (10th January is Tuesday
+	test(savedRRule.DtStart().TimeUtcL() == matchTime.TimeUtcL()) ;
+	test(entryarr[0]->StartTimeL().TimeUtcL() == (matchTime.TimeUtcL())) ;
+	
+	
+	CleanupStack::PopAndDestroy(&entryarr) ;
+
+	RArray<TTime> insTimes ;	
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 9, 10, 1, 0, 0))) ;
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 16, 10, 1, 0, 0))) ;
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 23, 10, 1, 0, 0))) ;
+	
+	CleanupClosePushL(insTimes) ;
+	CheckInstancesL(insTimes) ;
+	CleanupStack::PopAndDestroy(&insTimes) ;
+}
+
+
+void CBadRRule::CreateChild1L()
+{
+	TInt num ;
+	
+	TCalTime recId;
+
+	recId.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 9, 10, 1, 0, 0))); // creating recurrence id
+
+	HBufC8* guid1 = KGUID().AllocLC(); // ownership of guid1 gets transferred
+	CCalEntry *entry1 = CCalEntry::NewL(CCalEntry::EEvent, guid1, CCalEntry::EMethodNone, 0, recId, CalCommon::EThisOnly);
+	CleanupStack::Pop(guid1);			
+	CleanupStack::PushL(entry1) ;	
+
+	TCalTime startTime3 ;
+	TCalTime endTime3 ;	
+	startTime3.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 7, 10, 2, 0, 0))) ;
+	endTime3.SetTimeUtcL(startTime3.TimeUtcL() + TTimeIntervalHours(1)) ;
+	entry1->SetStartAndEndTimeL(startTime3, endTime3) ;
+	
+	RPointerArray<CCalEntry> entryarr1 ;	
+	entryarr1.AppendL(entry1) ;
+	iCalEntryView->StoreL(entryarr1, num) ;		
+	entryarr1.Close() ;	
+	
+	CleanupStack::PopAndDestroy(entry1) ;
+
+}
+
+void CBadRRule::CreateChild2L()
+{
+	TInt num ;
+	
+	TCalTime rec2 ;
+	rec2.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 16, 10, 1, 0, 0))) ; //Jan 17
+
+	HBufC8* guid_c2 = KGUID().AllocLC(); // ownership of guid1 gets transferred
+	CCalEntry *entry_c2 = CCalEntry::NewL(CCalEntry::EEvent, guid_c2, CCalEntry::EMethodNone, 0, rec2, CalCommon::EThisAndAll);
+	CleanupStack::Pop(guid_c2);
+	CleanupStack::PushL(entry_c2) ;	
+
+	TCalTime startTime_c2 ;
+	TCalTime endTime_c2 ;	
+	startTime_c2.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 8, 11, 2, 0, 0))) ;
+	endTime_c2.SetTimeUtcL(startTime_c2.TimeUtcL() + TTimeIntervalHours(1)) ;
+	entry_c2->SetStartAndEndTimeL(startTime_c2, endTime_c2) ;
+	
+	RPointerArray<CCalEntry> entryarr_c2 ;	
+	entryarr_c2.AppendL(entry_c2) ;
+	iCalEntryView->StoreL(entryarr_c2, num) ;		
+	entryarr_c2.Close() ;
+	
+	CleanupStack::PopAndDestroy(entry_c2) ;
+	
+}
+
+
+void CBadRRule::ModifyEntriesL()
+{
+	TInt num, err ;
+
+	RPointerArray<CCalEntry> entryarr3 ;
+	iCalEntryView->FetchL(KGUID(), entryarr3) ;
+	test(entryarr3.Count() == 3) ;
+		/* got 3 entries - EThisAndAll of second child do not have any special effect */	
+
+	CleanupStack::PushL(TCleanupItem(CleanupCCalEntryArray, &entryarr3));
+
+	TCalTime startTime4 ;
+	TCalTime endTime4 ;	
+	startTime4.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 1, 10, 1, 0, 0))) ;
+	endTime4.SetTimeUtcL(startTime4.TimeUtcL() + TTimeIntervalHours(1)) ;
+	
+	entryarr3[0]->SetStartAndEndTimeL(startTime4, endTime4) ;
+	
+	//The repeating starting time will not be adjusted until the entry is stored
+	test(entryarr3[0]->StartTimeL().TimeUtcL() == startTime4.TimeUtcL()) ;
+	
+	TCalRRule savedRRule ;
+	entryarr3[0]->GetRRuleL(savedRRule) ;
+	
+	//The repeating starting time will not be adjusted until the entry is stored
+	test(savedRRule.DtStart().TimeUtcL() == startTime4.TimeUtcL()) ;
+	
+	
+	iCalEntryView->StoreL(entryarr3, num) ;	
+			// store succeeds, because children are still aligned to an instance
+
+	CleanupStack::PopAndDestroy(&entryarr3) ;
+
+	RArray<TTime> insTimes ;
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 2, 10, 1, 0, 0))) ;
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 7, 10, 2, 0, 0))) ;
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 8, 11, 2, 0, 0))) ;
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 23, 10, 1, 0, 0))) ;
+	
+	CleanupClosePushL(insTimes) ;	
+	CheckInstancesL(insTimes) ;
+	CleanupStack::PopAndDestroy(&insTimes) ;
+
+		// this is interesting - there could be 4 instance, but as the count value of the
+		// repeat rule has been kept intact, we still get 3 instances, 
+		// but they are shifted .		
+
+	/* store is successful with modified time - now we shall change rrule */
+
+	RPointerArray<CCalEntry> entryarr4 ;
+	iCalEntryView->FetchL(KGUID(), entryarr4) ;
+	test(entryarr4.Count() == 3) ;	
+
+	CleanupStack::PushL(TCleanupItem(CleanupCCalEntryArray, &entryarr4));
+	
+	CCalEntry *entry = entryarr4[0] ;
+
+
+	TCalTime startTime1 ;
+	TCalTime endTime1 ;	
+	TCalTime untilTime1 ;	
+
+	startTime1.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 16, 10, 1, 0, 0))) ;
+	endTime1.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 16, 11, 1, 0, 0))) ;
+	untilTime1.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 26, 10, 5, 0, 0))) ;		
+
+
+	TCalRRule rrule(TCalRRule::EWeekly) ;		
+
+	rrule.SetDtStart(startTime1);
+	rrule.SetUntil(untilTime1);
+	rrule.SetInterval(1);	
+	
+	RArray<TDay> days;
+	CleanupClosePushL(days);
+	days.AppendL(ETuesday);  
+	rrule.SetByDay(days);
+	CleanupStack::PopAndDestroy(&days);
+
+	entry->SetStartAndEndTimeL(startTime1, endTime1);
+	entry->SetRRuleL(rrule) ;
+	
+	TRAP(err, iCalEntryView->StoreL(entryarr4, num)) ;
+	
+	test(err == -1) ; // due to change in rrule store should fail
+	test(num == 2) ; // only parent + child2 have been saved
+
+	CleanupStack::PopAndDestroy(&entryarr4) ;
+}
+
+
+void CBadRRule::CheckInstancesL(RArray<TTime> &insTimes)
+{
+	RPointerArray<CCalInstance> instanceArray ;
+
+	TCalTime startTime ;
+	TCalTime endTime ;	
+	startTime.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 1, 10, 1, 0, 0))) ;
+	endTime.SetTimeUtcL(TTime(TDateTime(2006, EJanuary, 30, 10, 5, 0, 0))) ;		
+	
+	CalCommon::TCalTimeRange timeRange(startTime, endTime);
+	
+	CCalInstanceView &insView = iTestLib->SynCGetInstanceViewL();	
+	
+	insView.FindInstanceL(instanceArray, CalCommon::EIncludeAll, timeRange);		
+	
+	TInt count = instanceArray.Count() ;
+	TInt count1 = insTimes.Count() ;
+	
+	test(count == count1) ;
+	TInt i, j ;
+	
+	for(i = 0; i < count1; i++)
+		{
+		for(j = 0; j < count; j++)
+			{
+			if (instanceArray[j] == NULL)
+				{
+				continue ;
+				}
+			TTime t1 = instanceArray[j]->Time().TimeUtcL() ;		
+			TDateTime d1 = t1.DateTime() ;	
+			if (insTimes[i] == t1)
+				{
+				delete instanceArray[j] ;
+				instanceArray[j] = NULL ;
+				break ;
+				}			
+			}
+			test(j < count) ;		
+		}
+	
+	instanceArray.Close() ;		
+}
+
+
+void CBadRRule::DeleteEntriesL()
+{
+	
+	RPointerArray<CCalEntry> entryarr5 ;
+	iCalEntryView->FetchL(KGUID(), entryarr5) ;
+	
+	test(entryarr5.Count() == 2) ; 
+		// one bad child entry could not be saved before
+
+	CleanupStack::PushL(TCleanupItem(CleanupCCalEntryArray, &entryarr5));
+	
+	CCalEntry *entry2 = entryarr5[0] ; // get the parent
+	
+	iCalEntryView->DeleteL(*entry2) ;
+		
+
+	CleanupStack::PopAndDestroy(&entryarr5) ;
+	
+	/* now see if it has been deleted */
+
+	RPointerArray<CCalEntry> entryarr6 ;
+	iCalEntryView->FetchL(KGUID(), entryarr6) ;
+	
+	test(entryarr6.Count() == 0) ;
+		
+	entryarr6.Close() ;	
+}
+
+
+
+void CBadRRule::TestBadRRuleL()
+{
+
+	test.Printf(_L("TestBadRRule start\n"));
+
+	CCalEntryView& view = iTestLib->SynCGetEntryViewL() ;
+	iCalEntryView = &view ;
+
+	
+	CreateParentL() ;
+	
+		
+	CreateChild2L() ;   // Create child entry with exception
+
+	CreateChild1L() ;   // Creating a another child 	
+	
+	
+	RArray<TTime> insTimes ;
+
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 7, 10, 2, 0, 0))) ;
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 8, 11, 2, 0, 0))) ;
+	insTimes.Append(TTime(TDateTime(2006, EJanuary, 23, 10, 1, 0, 0))) ;
+	
+	CleanupClosePushL(insTimes) ;	
+	CheckInstancesL(insTimes) ;
+	CleanupStack::PopAndDestroy(&insTimes) ;
+	
+	ModifyEntriesL() ;	// now modifying the parent again 			
+	
+	DeleteEntriesL() ;		// now try deleting entry 		
+
+	CreateToDoEntryL() ;
+	
+	
+	/* if executed to this point test has actully passed */
+	
+	test.Printf(_L("TestBadRRule successful\n"));
+}
+