/*
* Copyright (c) 2010 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 "KoreanLunarDateUtil.h"
// debug
#include "calendarui_debug.h"

const TInt KMaxLunarYear = 60;

/**
 * Public methods for constructing a CKoreanLunarDateUtil object.
 */
CKoreanLunarDateUtil* CKoreanLunarDateUtil::NewL(MCalenServices* aServices)
    {
    TRACE_ENTRY_POINT;
    CKoreanLunarDateUtil* self = CKoreanLunarDateUtil::NewLC(aServices);
    CleanupStack::Pop( self );
    
    TRACE_EXIT_POINT;
    return self;
    }

CKoreanLunarDateUtil* CKoreanLunarDateUtil::NewLC(MCalenServices* aServices)
    {
    TRACE_ENTRY_POINT;
    CKoreanLunarDateUtil* self = new (ELeave) CKoreanLunarDateUtil(aServices);
    CleanupStack::PushL( self );
    self->ConstructL();
    return self;
    }


CKoreanLunarDateUtil::CKoreanLunarDateUtil(MCalenServices* aServices):iServices(aServices)
	{
    TRACE_ENTRY_POINT;
	}


void CKoreanLunarDateUtil::ConstructL()
	{
    TRACE_ENTRY_POINT;
    iConverter = CKoreanCalConv::NewL();
	}

CKoreanLunarDateUtil::~CKoreanLunarDateUtil()
    {
    TRACE_ENTRY_POINT;
    delete iConverter;
    }

/**
 * Method for getting nearest gregorian date from
 * lunar day and month and gregorian reference.
 */
TDateTime CKoreanLunarDateUtil::GetNearestGregorianDateL( const TInt aMonth,
                                                          const TInt aDay,
                                                          const TBool aLeap,
                                                          const TDateTime& aReference ) const
	{
    TRACE_ENTRY_POINT;
    TKoreanDate refLunarDate;
    TKoreanDate lunarDate;
    TDateTime resDateTime;
    TInt err = KErrNone;

    iConverter->DateTimeToKoreanL( aReference, refLunarDate );
    /* Try to convert with the year and cycle we got with the reference */
    lunarDate.iCycle = refLunarDate.iCycle;
    lunarDate.iYear = refLunarDate.iYear;
    lunarDate.iMonth = aMonth;
    lunarDate.iDay = aDay;
    lunarDate.iLeapMonth = aLeap;
    TRAP( err, iConverter->KoreanToDateTimeL( lunarDate, resDateTime ) );
    if( err == KErrArgument )
        { /* Date is invalid for this year (day 30 on a month
             that has only 29 days on selected year or a leap month
             not in this year), try to find suitable */
        TKoreanDate lowerLimit;
        TKoreanDate upperLimit;
        iConverter->DateRange( lowerLimit, upperLimit );
        while( 1 )
            { /* Search by increasing year */
            if( lunarDate.iYear < KMaxLunarYear )
               {
                lunarDate.iYear++;
                }
            else
                {
                lunarDate.iYear = 1;
                lunarDate.iCycle++;
                }
            if( (lunarDate.iCycle == upperLimit.iCycle &&
                 lunarDate.iYear > upperLimit.iYear)  ||
                lunarDate.iCycle > upperLimit.iCycle )
                { /* Could not find, just break */
                break;
                }
            TRAP( err, iConverter->KoreanToDateTimeL( lunarDate, resDateTime ) );
            if( err == KErrNone )
                { /* Found suitable */
                break;
                }
            }
        if( err != KErrNone )
            { /* Suitable not found by increasing,
                 reset values and search by decreasing year */
            lunarDate.iCycle = refLunarDate.iCycle;
            lunarDate.iYear = refLunarDate.iYear;
            lunarDate.iMonth = aMonth;
            lunarDate.iDay = aDay;
            while( 1 )
                { /* Search by decreasing year */
                if( lunarDate.iYear > 1 )
                   {
                    lunarDate.iYear--;
                    }
                else
                    {
                    if( lunarDate.iCycle == 0 )
                        { /* Run out of cycles, break with error */
                        break;
                        }
                    lunarDate.iYear = KMaxLunarYear;
                    lunarDate.iCycle--;
                    }
                if( (lunarDate.iCycle == lowerLimit.iCycle &&
                     lunarDate.iYear < lowerLimit.iYear)  ||
                    lunarDate.iCycle < lowerLimit.iCycle )
                    { /* Could not find, just break */
                    break;
                    }
                TRAP( err, iConverter->KoreanToDateTimeL( lunarDate, resDateTime ) );
                if( err == KErrNone )
                    { /* Found suitable */
                    break;
                    }
                }
            }
        }
    /* If still not found, leave with error */
    User::LeaveIfError( err );
    
    TRACE_ENTRY_POINT;
    /* Otherwise return the result */
    return resDateTime;
	}

/**
* Method for getting lunar yearly repeats in gregorian dates.
*/
void CKoreanLunarDateUtil::GetLunarYearlyRepeatsL( RArray<TCalTime>& aRDates,
                                                   const TDateTime& aEntryDate,
                                                   const TBool aFloating ) const
    {
    TInt err = KErrNone;
    TCalTime repeatDate;
    TDateTime resDateTime;
    TDateTime lowerLimit;
    TKoreanDate upperKoreanLimit;
    TKoreanDate lunarStartDate;
    
    /* Get the upper limit for dates in Korean lunar format */
    iConverter->DateRange( lunarStartDate, upperKoreanLimit );
    
    /* Get the entry date in Korean lunar format */
    iConverter->DateTimeToKoreanL( aEntryDate, lunarStartDate );
    
    /* Get the lower limit for dates in Gregorian format */
    iConverter->DateRange( lowerLimit, resDateTime );
    
    /* Get the first occurrence of the event after
    the lower limit in Korean lunar format */
    iConverter->DateTimeToKoreanL(  GetNearestGregorianDateL( lunarStartDate.iMonth,
                                  lunarStartDate.iDay,
                                  lunarStartDate.iLeapMonth,
                                  lowerLimit ),
                                  lunarStartDate );
    
    while( 1 )
        {
        TRAP( err, iConverter->KoreanToDateTimeL( lunarStartDate, resDateTime ) );
        if( err == KErrNone )
            { /* Date exists in current year */
            if( aFloating )
                {
                repeatDate.SetTimeLocalFloatingL( resDateTime );
                }
            else
                {
                repeatDate.SetTimeLocalL( resDateTime );
                }
            aRDates.AppendL( repeatDate );
            }
        /* Increase to next lunar year */
        if( lunarStartDate.iYear < KMaxLunarYear )
            {
            lunarStartDate.iYear++;
            }
        else
            {
            lunarStartDate.iYear = 1;
            lunarStartDate.iCycle++;
            }
        if( (lunarStartDate.iCycle == upperKoreanLimit.iCycle &&
                lunarStartDate.iYear > upperKoreanLimit.iYear)  ||
                lunarStartDate.iCycle > upperKoreanLimit.iCycle )
            { /* Reached the limit, break */
            break;
            }
        }
    }
    
// End of file