/*******************************************************************************

 * Copyright (c) 2005, 2010 Nokia Corporation and/or its subsidiary(-ies).

 * All rights reserved. This program and the accompanying materials

 * are made available under the terms of the Eclipse Public License v1.0

 * which accompanies this distribution, and is available at

 * http://www.eclipse.org/legal/epl-v10.html

 *

 * Contributors:

 *     Nokia Corporation - S60 implementation

 *******************************************************************************/

#include <biditext.h>

#include <aknappui.h>

#include <aknnavi.h>

#include <aknnavide.h>

#include <akntabgrp.h>

#include <coecntrl.h>

#include <eikon.hrh>

#include <AknsDrawUtils.h>

#include <swtlaffacade.h>

#include <coreuiavkoneswt.h>

#include "eswtmobileextensions.h"

#include "swtcontrolbase.h"

#include "swtuiutils.h"

#include "swtjavabufferdrawer.h"

// ======== MEMBER FUNCTIONS ========

EXPORT_C ASwtControlBase::ASwtControlBase(MSwtDisplay& aDisplay, TSwtPeer aPeer,

        MSwtComposite* aParent, TInt aStyle)

        : iDisplay(aDisplay)

        , iPeer(aPeer)

        , iParent(aParent)

        , iCtrlFlags(0)

        , iStyle(aStyle)

        , iFont(NULL)

        , iPopupMenu(NULL)

        , iIsOnControlStack(EFalse)

        , iStackedSetRedrawFalseNb(0)

        , iBackgrdDefaultUsed(ETrue)

        , iFocusFrame(NULL)

        , iFocusChanged(EFalse)

{

    ASSERT(iPeer!=NULL);

    // Orientation not specified, find default

    TInt orientation = iStyle & KSwtOrientationMask;

    if (orientation!=KSwtStyleLeftToRight && orientation!=KSwtStyleRightToLeft)

    {

        if (iParent != NULL) // Inherit from parent

            orientation = iParent->Control()->Style() & KSwtOrientationMask;

        else                 // Based on user's locale

            orientation = (TBidiText::ScriptDirectionality(User::Language())==TBidiText::ELeftToRight) ?

                          KSwtStyleLeftToRight : KSwtStyleRightToLeft;

        iStyle &= ~KSwtOrientationMask;

        iStyle |= orientation;

    }

}

void ASwtControlBase::CreateFocusBackgroundL()

{

    ASSERT(!iFocusFrame);

    TRect rect(CoeControl().Rect());

    TRect innerRect;

    innerRect.iTl = CSwtLafFacade::GetLayoutRect(

                        CSwtLafFacade::EInputFieldSkinPlacingGeneralLine2, rect, 0).Rect().iBr;

    innerRect.iBr = CSwtLafFacade::GetLayoutRect(

                        CSwtLafFacade::EInputFieldSkinPlacingGeneralLine5, rect, 0).Rect().iTl;

    iFocusFrame = CAknsFrameBackgroundControlContext::NewL(

                      KAknsIIDQsnFrInput, rect, innerRect, EFalse /*parent absolute*/);

    if (iBackgrdDefaultUsed)

    {

        iFocusFrame->SetParentContext(SwtMopSupplyCtrlContext(EFalse));

    }

}

CAknsBasicBackgroundControlContext* ASwtControlBase::FocusBackgroundNow() const

{

#ifdef RD_JAVA_S60_RELEASE_9_2

    if (!iDisplay.UiUtils().NaviKeyInput() && !iPressed)

    {

        return NULL;

    }

#endif // RD_JAVA_S60_RELEASE_9_2

    // Pressed down state shows the highlight no matter what.

    if (!iPressed)

    {

        TInt policy = FocusBackgroundPolicy();

        // CaptionedControls that have a custom back color set provide a highlight with

        // no parent context and that can be a problem for semi transparent highligts.

        // The remedy for this is to let the child control draw its own highlight for

        // as long as the parent CaptionedControl has the custom background color set.

        if ((policy == ENoFocusBackground)

                || (policy == EEmbeddedFocusBackground)

                || (iParent && iParent->Control()->CaptionedControlInterface() && iParent->Control()->IsDefaultBackgroundUse())

                || (policy == ECaptionedCtrlFocusBackground && !IsFocusedOrChildIsFocused())

                || (policy == EDefaultFocusBackground && GetShell().FocusControl() != this)

                || (GetShell().Composite()->CountFocusableChildren(1, this) == 0))

        {

            return NULL;

        }

    }

    // If we got here, it means we have to draw a focus background.

    if (!iFocusFrame)

    {

        TRAP_IGNORE(const_cast<ASwtControlBase*>(this)->CreateFocusBackgroundL());

    }

    return iFocusFrame;

}

void ASwtControlBase::RedrawFocusBackground()

{

    MSwtCaptionedControl* captCtrl = GetTopCaptionedControl();

    if (captCtrl)

    {

        captCtrl->Composite()->Control()->Redraw();

    }

    else

    {

        Redraw();

    }

}

void ASwtControlBase::InitControlBaseL()

{

    RegisterWithParentL();

}

EXPORT_C ASwtControlBase::~ASwtControlBase()

{

    delete iFocusFrame;

    // RemoveRef here in case it goes through destruction before being

    // registered (and Dispose() is not called)

    if (iFont != NULL)

        iFont->RemoveRef();

#ifdef _lint

    //lint -esym(1740, ASwtControlBase::iPeer)

    //lint -esym(1740, ASwtControlBase::iParent)

    iFont      = NULL;

    iPopupMenu = NULL;

#endif

}

// From class MCoeControlBackground.

// Draw the Background. This method was called by the eSWT and Symbian drawing framework.

// If the control is a Composite then make sure not to draw the background to

// the areas that will be painted by the children. This is to avoid painting

// over them as this would cause flickering.

//

EXPORT_C void ASwtControlBase::Draw(CWindowGc& aGc, const CCoeControl& aControl,

                                    const TRect& aRect) const

{

    RRegion* clippingRegion = NULL;

    const MSwtComposite* composite = CompositeInterface();

    if (composite)

    {

        clippingRegion = SetupChildClippingRegion(composite, aGc, aRect);

    }

    // Draw the background.

    if (!IsDefaultBackgroundUse()

#ifdef RD_JAVA_S60_RELEASE_9_2

        // Fill the round corners

        || (IsShell() && iParent)

#endif // RD_JAVA_S60_RELEASE_9_2

        )

    {

        aGc.SetBrushColor(GetBackground());

        aGc.Clear(aRect);

    }

    // Hopefully the highlight back is always semi transparent,

    // otherwise the back color is lost.

    MAknsControlContext* cc = SwtMopSupplyCtrlContext();

    AknsDrawUtils::Background(AknsUtils::SkinInstance(), cc, &aControl, aGc, aRect);

    // Cancel & destroy the clipping region

    CancelChildClippingRegion(clippingRegion, aGc);

}

EXPORT_C void ASwtControlBase::DrawBorder(const TRect& /*aRect*/) const

{

    TInt borderWidth = GetBorderWidth();

    if (borderWidth > 0)

    {

        CWindowGc& gc = CoeControl().SystemGc();

        gc.SetBrushStyle(CGraphicsContext::ENullBrush);

        gc.SetPenColor(UiUtils().GetSystemColor(ESwtColorWidgetBorder));

        gc.SetPenStyle(CGraphicsContext::ESolidPen);

        gc.SetPenSize(TSize(borderWidth, borderWidth));

        gc.DrawRect(CoeControl().Rect());

    }

}

// In eSWT all border should have the same width/height.

EXPORT_C TInt ASwtControlBase::GetBorderWidth() const

{

    if (HasBorderStyle())

    {

        return 1;

    }

    else

    {

        return 0;

    }

}

// Window coords

EXPORT_C TRect ASwtControlBase::ClientRect() const

{

    return BorderInnerRect();

}

TBool ASwtControlBase::HasBorderStyle() const

{

    TBool res = (iStyle & KSwtStyleBorder);

    if (IsShell())

    {

        res = res && (!(iStyle & KSwtStyleNoTrim) && iParent);

    }

    return res;

}

TSize ASwtControlBase::BorderSizeDelta() const

{

    return TSize(GetBorderWidth()*2, GetBorderWidth()*2) ;

}

// Window coords

EXPORT_C TRect ASwtControlBase::BorderInnerRect() const

{

    TRect borderInnerRect = CoeControl().Rect();

    if (borderInnerRect.Height() != 0 && borderInnerRect.Width() != 0)

    {

        TInt w(GetBorderWidth());

        borderInnerRect.Shrink(w, w);

    }

    return borderInnerRect;

}

EXPORT_C TRect ASwtControlBase::BorderOuterRect(const TRect& aRect) const

{

    TRect borderOuterRect(aRect);

    borderOuterRect.Grow(GetBorderWidth(), GetBorderWidth());

    return borderOuterRect;

}

TKeyResponse ASwtControlBase::HandleDiagonalKeysL(const TKeyEvent& aKeyEvent, TEventCode aType,

        TBool aTraversalDoIt, const TUint key1, const TStdScanCode scanCode1,

        const TUint key2, const TStdScanCode scanCode2)

{

    TKeyEvent keyTemp;

    // send first event

    keyTemp.iRepeats = 0;

    keyTemp.iScanCode = scanCode1;

    keyTemp.iModifiers = 32768;

    keyTemp.iCode = 0;

    HandleKeyL(keyTemp, EEventKeyDown, aTraversalDoIt);     //DOWN

    keyTemp = aKeyEvent;

    keyTemp.iCode = key1;

    keyTemp.iScanCode = scanCode1;

    TKeyResponse firstResponse = HandleKeyL(keyTemp, aType, aTraversalDoIt);     // KEYCODE

    keyTemp.iRepeats = 0;

    keyTemp.iScanCode = scanCode1;

    keyTemp.iModifiers = 32768;

    keyTemp.iCode = 0;

    HandleKeyL(keyTemp, EEventKeyUp, aTraversalDoIt);      // UP

    // send second event

    keyTemp.iRepeats = 0;

    keyTemp.iScanCode = scanCode2;

    keyTemp.iModifiers = 32768;

    keyTemp.iCode = 0;

    HandleKeyL(keyTemp, EEventKeyDown, aTraversalDoIt);     // DOWN

    keyTemp = aKeyEvent;

    keyTemp.iCode = key2;

    keyTemp.iScanCode = scanCode2;

    TKeyResponse secondResponse = HandleKeyL(keyTemp, aType, aTraversalDoIt);     // KEYCODE

    keyTemp.iRepeats = 0;

    keyTemp.iScanCode = scanCode2;

    keyTemp.iModifiers = 32768;

    keyTemp.iCode = 0;

    HandleKeyL(keyTemp, EEventKeyUp, aTraversalDoIt);       // UP

    TKeyResponse response = EKeyWasNotConsumed;

    if (EKeyWasConsumed == firstResponse && EKeyWasConsumed == secondResponse)

    {

        response = EKeyWasConsumed;

    }

    return response;

}

void ASwtControlBase::DrawComponentControls(const CCoeControl& aControl,

        const TRect& aRect, CWindowGc& aGc, TBool aCanDrawOutsideRect)

{

    const TInt count = aControl.CountComponentControls();

    for (TInt i=0; i<count; ++i)

    {

        CCoeControl& compCtrl = *aControl.ComponentControl(i);

        if (compCtrl.IsVisible())

        {

            if (compCtrl.OwnsWindow())

            {

            }

            else

            {

                TRect drawRect(compCtrl.Rect());

                drawRect.Intersection(aRect);

                if (!drawRect.IsEmpty())

                {

                    aGc.Reset();

                    aGc.SetClippingRect(drawRect);

                    compCtrl.DrawBackground(drawRect);

                    compCtrl.DrawForeground(drawRect);

                }

                if (aCanDrawOutsideRect)

                {

                    DrawComponentControls(compCtrl, aRect, aGc, aCanDrawOutsideRect);

                }

                else if (!drawRect.IsEmpty())

                {

                    DrawComponentControls(compCtrl, drawRect, aGc, aCanDrawOutsideRect);

                }

            }

        }

    }

}

TBool ASwtControlBase::RectContainsRect(const TRect& aContainer, const TRect& aContainee)

{

    return (aContainer.iTl.iX <= aContainee.iTl.iX

            && aContainer.iTl.iY <= aContainee.iTl.iY

            && aContainer.iBr.iX >= aContainee.iBr.iX

            && aContainer.iBr.iY >= aContainee.iBr.iY);

}

void ASwtControlBase::FlushJavaBuffer(MSwtGc* aGc, TInt* aIntParams, TInt aIntCount, HBufC* aStrParams, RWindow* aWindow, const TRect& aDrawRect) const

{

    iDisplay.JavaBufferDrawer().Draw(aGc, aIntParams, aIntCount, aStrParams, aWindow, aDrawRect);

}

EXPORT_C void ASwtControlBase::PostMouseEventL(const TPointerEvent& aPointerEvent)

{

    TPoint eventPosition(aPointerEvent.iPosition);

    // Is is essential that the coordinates posted to the queue are in screen

    // coordinates to ensure the case where late mouse events are handled

    // after the control has moved away from the current position.

    TPoint pos(WindowToScreen(eventPosition));

    // Compute the state mask

    TInt stateMask = UiUtils().GetPointerEventStateMask(aPointerEvent.iModifiers);

    // Handle double click (must be issued between Down and Up)

    if (aPointerEvent.iModifiers & EModifierDoubleClick)

        iDisplay.PostMouseEventL(iPeer, ESwtEventMouseDoubleClick, 0, pos, stateMask);

    // Compute the event type and button number

    TSwtEventType type;

    TInt          button = 0;

    switch (aPointerEvent.iType)

    {

    case TPointerEvent::EButton1Down:

        type   = ESwtEventMouseDown;

        button = KSwtMouseButton1;

        break;

    case TPointerEvent::EButton1Up:

        type   = ESwtEventMouseUp;

        button = KSwtMouseButton1;

        break;

    case TPointerEvent::EButton2Down:

        type   = ESwtEventMouseDown;

        button = KSwtMouseButton2;

        break;

    case TPointerEvent::EButton2Up:

        type   = ESwtEventMouseUp;

        button = KSwtMouseButton2;

        break;

    case TPointerEvent::EButton3Down:

        type   = ESwtEventMouseDown;

        button = KSwtMouseButton3;

        break;

    case TPointerEvent::EButton3Up:

        type   = ESwtEventMouseUp;

        button = KSwtMouseButton3;

        break;

    case TPointerEvent::EDrag:

    case TPointerEvent::EMove:

        type = ESwtEventMouseMove;

        break;

    default:

        return;

    }

    iDisplay.PostMouseEventL(iPeer, type, button, pos, stateMask);

}

TPoint ASwtControlBase::ComputeLocationToSet(const TPoint& aLocation)

{

    ASSERT(!IsShell());

    return aLocation + iParent->Scrollable()->Control()->ClientRect().iTl; //lint !e613

}

EXPORT_C MSwtShell& ASwtControlBase::GetShell() const

{

    if (!iShell)

    {

        MSwtShell* selfAsShell = const_cast<MSwtShell*>(ShellInterface());

        if (selfAsShell)

            iShell = selfAsShell;

        else

            iShell = &iParent->Control()->GetShell();

    }

    ASSERT(iShell);

    return *iShell;

}

void ASwtControlBase::Invalidate(const TRect& aRect)

{

    if (!aRect.IsEmpty() && CoeControl().IsVisible() && !(iCtrlFlags & MSwtControl::EFlagDoNotDraw))

        ForceInvalidate(aRect);

}

void ASwtControlBase::ForceInvalidate(const TRect& aRect)

{

    if (aRect.IsEmpty())

    {

        return;

    }

    MSwtShell& shell = GetShell();

    MSwtControl* urgentPaintControl = shell.UrgentPaintControl();

    if (urgentPaintControl)

    {

        if (IsDescentOf(*urgentPaintControl))

        {

            urgentPaintControl->PaintUrgently(aRect);

        }

    }

    else

    {

        if (shell.AsyncPainting())

        {

            TRect dirtyRect(aRect);

            MSwtControl* controlShell = shell.Control();

            // Convert to Screen Coordinate

            dirtyRect.Move(controlShell->CoeControl().PositionRelativeToScreen());

            TBool mergeable = !(iStyle & KSwtStyleNoMergePaints);

            TRAP_IGNORE(iDisplay.PostPaintEventL(JavaPeer(), controlShell->JavaPeer(), dirtyRect, mergeable));

        }

        else

        {

            static_cast<RWindow*>(shell.Control()->CoeControl().DrawableWindow())->Invalidate(aRect);

        }

    }

}

EXPORT_C void ASwtControlBase::DoPaint(const TRect& aRect) const

{

    ASSERT(!IsShell());

    const CCoeControl& ctrl = CoeControl();

    ctrl.DrawBackground(aRect);

    ctrl.DrawForeground(aRect);

}

EXPORT_C void ASwtControlBase::SetColorL(TLogicalColor aLogicalColor, const MSwtColor* aColor)

{

    CCoeControl& coeCtrl = CoeControl();

    TRgb color((aColor!=NULL) ? aColor->RgbValue() : iDisplay.CoeEnv()->Color(aLogicalColor));

    coeCtrl.OverrideColorL(aLogicalColor, color);

}

EXPORT_C CSwtUiUtils& ASwtControlBase::UiUtils() const

{

    return static_cast<CSwtUiUtils&>(iDisplay.UiUtils());

}

EXPORT_C void ASwtControlBase::DoDelete()

{

    delete this;

}

TRect ASwtControlBase::VisibleRect(TBool aVisibleBounds) const

{

    // WINDOW COORDINATES!

    if (!CoeControl().IsVisible())

        return TRect(); // This is (0,0,0,0)

    TRect rect((aVisibleBounds)? CoeControl().Rect() : ClientRect());

    if (!IsShell())

    {

        rect = ClipToVisibleRect(rect);

    }

    return rect;

}

TRect ASwtControlBase::ClipToVisibleRect(const TRect& aRect) const

{

    // WINDOW COORDINATES!

    TRect rect = aRect;

    MSwtComposite* composite = iParent;

    while (composite != NULL)

    {

        MSwtControl* ctrl = composite->Control();

        rect.Intersection(ctrl->ClientRect());

        composite = (!ctrl->IsShell()) ? ctrl->GetParent() : NULL;