/*

* Copyright (c) 2006-2007 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: 

*       Location editors   

*     

*

*/

#include <aknlocationed.h>

#include <lbsposition.h>

#include <barsread.h>

#include <eikon.hrh>

#include <e32math.h>

#include <centralrepository.h>

#include <AvkonInternalCRKeys.h>

#include <eikenv.h>

#include <eikctl.rsg>

#include <cenrepnotifyhandler.h>

#include <AknUtils.h>

#include "aknmfneseparator.h"

#include <AknTasHook.h>

struct CLocationStrings : public CBase, public MCenRepNotifyHandlerCallback

{

    HBufC *iDegree;

    HBufC *iMinMark;

    HBufC *iSecMark;

    HBufC *iNorth;

    HBufC *iSouth;

    HBufC *iEast;

    HBufC *iWest;

    ~CLocationStrings()

        {

        delete iDegree;

        delete iMinMark;

        delete iSecMark;

        delete iNorth;

        delete iSouth;

        delete iEast;

        delete iWest;

        }

    TInt iType;

    // From MCenRepNotifyHandlerCallback

    void HandleNotifyInt(TUint32 aId, TInt aNewValue);     

    CAknLocationEditor *iParent;     

    // Handle to Central Repository.

    CRepository* iCenRep;    

    // For Central Repository value change notifications. 

    CCenRepNotifyHandler* iCenRepNotifyHandler;

    TBool iMirroredLayoutUsed;

};

void CLocationStrings::HandleNotifyInt(TUint32 aId, TInt aNewValue)

    {

    TRAP_IGNORE( iParent->HandleCenRepChangedL(aId, aNewValue));

    }

_LIT(KRLM, "\x200F"); // Directionality marker: Right-to-Left Marker.

_LIT(KLRE, "\x202A"); // Directionality marker: Left-to-Right Embedding.

_LIT(KPDF, "\x202C"); // Directionality marker: Pop Directional Format

EXPORT_C CAknLocationEditor::CAknLocationEditor()

    {

    }

EXPORT_C CAknLocationEditor::~CAknLocationEditor()

    {

    AKNTASHOOK_REMOVE();

    // Stop listening CenRep.

    if (iStrings)

        {

        if (iStrings->iCenRepNotifyHandler)

            {

            iStrings->iCenRepNotifyHandler->StopListening();

            }

        delete iStrings->iCenRepNotifyHandler;

        delete iStrings->iCenRep;    

        }

    delete iStrings;

    }

EXPORT_C CAknLocationEditor *CAknLocationEditor::NewL(TPosition &aValue, TLocationContext aContext)

    {

    CAknLocationEditor *editor = new(ELeave)CAknLocationEditor;

    CleanupStack::PushL(editor);

    editor->LoadStringsL(R_EIK_LATITUDE_AND_LONGITUDE);

    editor->ConstructL(aValue, aContext);

    CleanupStack::Pop(editor);

    AKNTASHOOK_ADDL( editor, "CAknLocationEditor" );

    return editor;

    }

static void AppendString(TPtr aBuf, TPtrC aString)

    {

    aBuf.Append(aString);

    }

static void AppendString(TPtr aBuf, TChar aChar)

	{

	aBuf.Append(aChar);

	}

static void AppendNum(TPtr aBuf, TInt aValue, TInt aNumOfDigits)

    {

    aBuf.AppendNumFixedWidthUC(aValue, EDecimal, aNumOfDigits); 

    }

static void AppendNumFst(TPtr aBuf, TInt aValue, TInt /*aNumOfDigits*/)

    {

    aBuf.AppendNum(aValue);

    }

static HBufC *CopyDesL(HBufC *aOrig)

    {

    HBufC *buf = HBufC::NewL(aOrig->Length());

    *buf = aOrig->Des();

    return buf;

    }

static TChar DecimalSeparator()

	{

	TLocale t;

	TChar c = t.DecimalSeparator();

	return c;

	}

EXPORT_C HBufC *CAknLocationEditor::DisplayableLocationL(const TPosition & aValue, TLocationContext aContext)

    {

    // read cenrep key

    TInt type = EDD;

    CRepository* repository = NULL;

    TRAPD(err, repository = CRepository::NewL(KCRUidAvkon));

    TUint32 key = KAknLocationEditorCoordinateDataFormat;

    if (err == KErrNone)

        {

        err = repository->Get(key, (TInt&)type);

        }

    delete repository;

    CLocationStrings *strings = new (ELeave) CLocationStrings;

    CleanupStack::PushL(strings);

    // read resources

    TResourceReader reader;

    CEikonEnv::Static()->CreateResourceReaderLC(reader, R_EIK_LATITUDE_AND_LONGITUDE);

    strings->iDegree = reader.ReadHBufCL();

    strings->iMinMark = reader.ReadHBufCL();

    strings->iSecMark = reader.ReadHBufCL();

    strings->iNorth = reader.ReadHBufCL();

    reader.ReadInt16();

    strings->iSouth = reader.ReadHBufCL();

    reader.ReadInt16();

    strings->iEast = reader.ReadHBufCL();

    reader.ReadInt16();

    strings->iWest = reader.ReadHBufCL();

    reader.ReadInt16();

    CleanupStack::PopAndDestroy(); // reader

    strings->iMirroredLayoutUsed = AknLayoutUtils::LayoutMirrored();

    HBufC *buffer = HBufC::NewL(200);

    switch(type)

        {

        case EDD:

            {

            TInt degrees;

            TInt decidegrees;

            TBool neg;

            TBool nan;

            SplitDD(aValue, aContext, degrees, decidegrees, neg, nan);

            if (nan) 

                {

                CleanupStack::PopAndDestroy(strings);

                return buffer;

                }

            if (strings->iMirroredLayoutUsed)

                {

                AppendString(buffer->Des(), TPtrC(KRLM));

                AppendString(buffer->Des(), TPtrC(KLRE));                

                }

            AppendNumFst(buffer->Des(), degrees, aContext==ELatitudeOnly?2:3);

            AppendString(buffer->Des(), DecimalSeparator());

            AppendNum(buffer->Des(), decidegrees, 5);

            AppendString(buffer->Des(), *strings->iDegree);

            if (strings->iMirroredLayoutUsed)

                {

                AppendString(buffer->Des(), TPtrC(KPDF));                

                }                            

            AppendString(buffer->Des(), neg?(aContext==ELatitudeOnly?*strings->iSouth:*strings->iWest) 

                                     :(aContext==ELatitudeOnly?*strings->iNorth:*strings->iEast));

            break;

            }

        case EDMM:

            {

            int degrees;

            int minutes;

            int deciminutes;

            TBool neg;

            TBool nan;

            SplitDMM(aValue, aContext, degrees, minutes, deciminutes, neg, nan);

            if (nan) 

                {

                CleanupStack::PopAndDestroy(strings);

                return buffer;

                }

            if (strings->iMirroredLayoutUsed)

                {

                AppendString(buffer->Des(), TPtrC(KRLM));

                AppendString(buffer->Des(), TPtrC(KLRE));                

                }                

            AppendNumFst(buffer->Des(), degrees, aContext==ELatitudeOnly?2:3);

            AppendString(buffer->Des(), *strings->iDegree);

            AppendNum(buffer->Des(), minutes, 2);

            AppendString(buffer->Des(), DecimalSeparator());

            AppendNum(buffer->Des(), deciminutes, 4);

            AppendString(buffer->Des(), *strings->iMinMark);

            if (strings->iMirroredLayoutUsed)

                {

                AppendString(buffer->Des(), TPtrC(KPDF));                

                }                

            AppendString(buffer->Des(), neg?(aContext==ELatitudeOnly?*strings->iSouth:*strings->iWest) 

                                     :(aContext==ELatitudeOnly?*strings->iNorth:*strings->iEast));

            break;

            }

        case EDMSD:

            {

            int degrees;

            int minutes;

            int secs;

            int deciseconds;

            TBool neg;

            TBool nan;

            SplitDMSD(aValue, aContext, degrees, minutes, secs, deciseconds, neg, nan);

            if (nan) 

                {

                CleanupStack::PopAndDestroy(strings);

                return buffer;

                }

            if (strings->iMirroredLayoutUsed)

                {

                AppendString(buffer->Des(), TPtrC(KRLM));

                AppendString(buffer->Des(), TPtrC(KLRE));                

                }                

            AppendNumFst(buffer->Des(), degrees, aContext==ELatitudeOnly?2:3);

            AppendString(buffer->Des(), *strings->iDegree);

            AppendNum(buffer->Des(), minutes, 2);

            AppendString(buffer->Des(), *strings->iMinMark);

            AppendNum(buffer->Des(), secs, 2);

            AppendString(buffer->Des(), DecimalSeparator());

            AppendNum(buffer->Des(), deciseconds, 2);

            AppendString(buffer->Des(), *strings->iSecMark);

            if (strings->iMirroredLayoutUsed)

                {

                AppendString(buffer->Des(), TPtrC(KPDF));                

                }                

            AppendString(buffer->Des(), neg?(aContext==ELatitudeOnly?*strings->iSouth:*strings->iWest) 

                                     :(aContext==ELatitudeOnly?*strings->iNorth:*strings->iEast));

            break;

            }

        };

    TPtr ptr = buffer->Des();

    AknTextUtils::LanguageSpecificNumberConversion(ptr);

    CleanupStack::PopAndDestroy(strings); // strings

    return buffer;

    }

EXPORT_C void CAknLocationEditor::ConstructFromResourceL(TResourceReader& aResourceReader)

    {

    TInt flags( aResourceReader.ReadInt32() );

    TInt res_id( aResourceReader.ReadInt32() );    

    TLocationContext context( ELongitudeOnly );

    if (flags & ELocationEdFlagLatitude)

        {

        context = ELatitudeOnly;

        }

    TCoordinate coord( 0.0, 0.0 );    

    TLocality loc(coord, 0.1 );

    TPosition p(loc, TTime(0) );

    LoadStringsL(res_id);

    ConstructL(p, context);

    }

EXPORT_C void CAknLocationEditor::Set(const TPosition &aValue)

    {

    TLocationType type = Type();

    switch(type)

        {

        case EDD:

            {

            TInt degrees;

            TInt decidegrees;

            TBool neg;

            TBool nan;

            SplitDD(aValue, iContext, degrees, decidegrees, neg, nan);

            CEikMfneNumber *field;

            field = (CEikMfneNumber*)Field(FieldMapping(0, type));

            field->SetValue(degrees, *Font());

            field = (CEikMfneNumber*)Field(FieldMapping(2, type));

            field->SetValue(decidegrees, *Font());

            CEikMfneSymbol *field2 = (CEikMfneSymbol*)Field(FieldMapping(4, type));

            field2->SetCurrentSymbolicItemToId(neg ? 1 : 0);

            SetUninitialised(nan);

            break;

            }

        case EDMM:

            {

            int degrees;

            int minutes;

            int deciminutes;

            TBool neg;

            TBool nan;

            SplitDMM(aValue, iContext, degrees, minutes, deciminutes, neg, nan);

            CEikMfneNumber *field = (CEikMfneNumber*)Field(FieldMapping(0, type));

            field->SetValue(degrees, *Font());

            field = (CEikMfneNumber*)Field(FieldMapping(2, type));

            field->SetValue(minutes, *Font());

            field = (CEikMfneNumber*)Field(FieldMapping(4, type));

            field->SetValue(deciminutes, *Font());

            CEikMfneSymbol *field2 = (CEikMfneSymbol*)Field(FieldMapping(6, type));

            field2->SetCurrentSymbolicItemToId(neg ? 1 : 0);

            SetUninitialised(nan);

            break;

            }

        case EDMSD:

            {

            int degrees;

            int minutes;

            int secs;

            int deciseconds;

            TBool neg;

            TBool nan;

            SplitDMSD(aValue, iContext, degrees, minutes, secs, deciseconds, neg, nan);

            CEikMfneNumber *field = (CEikMfneNumber*)Field(FieldMapping(0, type));

            field->SetValue(degrees, *Font());

            field = (CEikMfneNumber*)Field(FieldMapping(2, type));

            field->SetValue(minutes, *Font());

            field = (CEikMfneNumber*)Field(FieldMapping(4, type));

            field->SetValue(secs, *Font());

            field = (CEikMfneNumber*)Field(FieldMapping(6, type));

            field->SetValue(deciseconds, *Font());

            CEikMfneSymbol *field2 = (CEikMfneSymbol*)Field(FieldMapping(8, type));

            field2->SetCurrentSymbolicItemToId(neg ? 1 : 0);

            SetUninitialised(nan);

            break;

            }

        }

        if ( !IsFocused() )

            {

            TRAP_IGNORE( ReportEventL( MCoeControlObserver::EEventStateChanged ) );

            }

    }

EXPORT_C void CAknLocationEditor::Get(TPosition &aValue) const

    {

    TLocationType type = Type();

    switch(type)

        {

        case EDD:

            {

            TBool nan = ETrue;

            CEikMfneNumber *field = (CEikMfneNumber*)Field(FieldMapping(0, type));

            TInt degrees = field->Value();

            nan = nan && field->IsUninitialised();

            field = (CEikMfneNumber*)Field(FieldMapping(2, type));

            TInt decidegrees = field->Value();

            nan = nan && field->IsUninitialised();

            CEikMfneSymbol *field2 = (CEikMfneSymbol*)Field(FieldMapping(4, type));

            TBool neg = field2->IdOfCurrentSymbolicItem() != 0;

            CombineDD(aValue, iContext, degrees, decidegrees, neg, nan);

            break;

            }

        case EDMM:

            {

            TBool nan( ETrue );

            CEikMfneNumber *field = (CEikMfneNumber*)Field(FieldMapping(0, type));

            TInt degrees = field->Value();

            nan = nan && field->IsUninitialised();

            field = (CEikMfneNumber*)Field(FieldMapping(2, type));

            TInt minutes = field->Value();

            nan = nan && field->IsUninitialised();

            field = (CEikMfneNumber*)Field(FieldMapping(4, type));

            TInt deciminutes = field->Value();

            nan = nan && field->IsUninitialised();

            CEikMfneSymbol *field2 = (CEikMfneSymbol*)Field(FieldMapping(6, type));

            TBool neg = field2->IdOfCurrentSymbolicItem() != 0;

            CombineDMM(aValue, iContext, degrees, minutes, deciminutes, neg, nan);

            break;

            }

        case EDMSD:

            {

            TBool nan( ETrue );

            CEikMfneNumber *field = (CEikMfneNumber*)Field(FieldMapping(0, type));

            TInt degrees = field->Value();

            nan = nan && field->IsUninitialised();

            field = (CEikMfneNumber*)Field(FieldMapping(2, type));

            TInt minutes = field->Value();

            nan = nan && field->IsUninitialised();

            field = (CEikMfneNumber*)Field(FieldMapping(4, type));

            TInt secs = field->Value();

            nan = nan && field->IsUninitialised();

            field = (CEikMfneNumber*)Field(FieldMapping(6, type));

            TInt deciseconds = field->Value();

            nan = nan && field->IsUninitialised();

            CEikMfneSymbol *field2 = (CEikMfneSymbol*)Field(FieldMapping(8, type));

            TBool neg = field2->IdOfCurrentSymbolicItem() != 0;

            CombineDMSD(aValue, iContext, degrees, minutes, secs, deciseconds, neg, nan);

            break;

            }

        }

    }

void CAknLocationEditor::ConstructL(TPosition &aValue, TLocationContext aContext)

    {

    iContext = aContext;

    if (!iStrings)

        {       

        iStrings = new(ELeave)CLocationStrings;

        }

    iStrings->iParent = this;

    iStrings->iType = -1;

   // Start listening a CenRep key indicating whether hash key selection is active.

    TRAPD(err, iStrings->iCenRep = CRepository::NewL(KCRUidAvkon));

    if (err == KErrNone)

        {

        iStrings->iCenRepNotifyHandler = CCenRepNotifyHandler::NewL(*iStrings,

            *iStrings->iCenRep,

            CCenRepNotifyHandler::EIntKey,

            KAknLocationEditorCoordinateDataFormat);

        iStrings->iCenRepNotifyHandler->StartListeningL();

        }

    // This is for the lifetime of the editor.    

    iStrings->iMirroredLayoutUsed = AknLayoutUtils::LayoutMirrored();

    CreateMfneFieldsL(aValue);

    RefreshFromLocale();

    }

void CAknLocationEditor::CreateMfneFieldsL(const TPosition &aValue)

    {

    TInt flags = CEikMfneNumber::EFillWithLeadingZeros;

    TInt flags_fst = 0;

    TInt numberOfFields = 0;

    TLocationType type = Type();

    switch(type)

        {

        case EDD: numberOfFields = 5; break;

        case EDMM: numberOfFields = 7; break;

        case EDMSD: numberOfFields = 9; break;

        default: break;

        };

    CreateFieldArrayL(numberOfFields);

    switch(type)

        {

        case EDD:

            {

            TInt degrees;

            TInt decidegrees;

            TBool neg;

            TBool nan;

            SplitDD(aValue, iContext, degrees, decidegrees, neg, nan);

            // cardinal point

            CEikMfneSymbol *field3;

            field3 = CEikMfneSymbol::NewL(2);

            CEikMfneSymbol::CItem *item = CEikMfneSymbol::CItem::NewL(0, 

                                                                      iContext == ELatitudeOnly ? 'N' : 'E', 

                                                                      CopyDesL(iContext == ELatitudeOnly ? iStrings->iNorth : iStrings->iEast));

            CEikMfneSymbol::CItem *item2 = CEikMfneSymbol::CItem::NewL(1, 

                                                                      iContext == ELatitudeOnly ? 'S' : 'W', 

                                                                      CopyDesL(iContext == ELatitudeOnly ? iStrings->iSouth : iStrings->iWest));

            field3->AddSymbolicItem(item, !neg);

            field3->AddSymbolicItem(item2, neg);

            if ( iStrings->iMirroredLayoutUsed )

                {

                // Add cardinal point field to first field when reading direction is right-to-left.