/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */

/*

 * This file is part of the LibreOffice project.

 *

 * This Source Code Form is subject to the terms of the Mozilla Public

 * License, v. 2.0. If a copy of the MPL was not distributed with this

 * file, You can obtain one at http://mozilla.org/MPL/2.0/.

 *

 * This file incorporates work covered by the following license notice:

 *

 *   Licensed to the Apache Software Foundation (ASF) under one or more

 *   contributor license agreements. See the NOTICE file distributed

 *   with this work for additional information regarding copyright

 *   ownership. The ASF licenses this file to you under the Apache

 *   License, Version 2.0 (the "License"); you may not use this file

 *   except in compliance with the License. You may obtain a copy of

 *   the License at http://www.apache.org/licenses/LICENSE-2.0 .

 */

#include <sal/config.h>

#include <string_view>

#include <comphelper/propertyvalue.hxx>

#include <vcl/event.hxx>

#include <vcl/status.hxx>

#include <vcl/svapp.hxx>

#include <vcl/weld/Builder.hxx>

#include <vcl/weld/Menu.hxx>

#include <vcl/weld/Window.hxx>

#include <vcl/weld/weldutils.hxx>

#include <svl/intitem.hxx>

#include <tools/debug.hxx>

#include <tools/urlobj.hxx>

#include <svx/selctrl.hxx>

#include <bitmaps.hlst>

#include <com/sun/star/beans/PropertyValue.hpp>

#include <com/sun/star/frame/XFrame.hpp>

#include <com/sun/star/lang/XServiceInfo.hpp>

#include <svx/strings.hrc>

#include <svx/dialmgr.hxx>

SFX_IMPL_STATUSBAR_CONTROL(SvxSelectionModeControl, SfxUInt16Item);

namespace {

/// Popup menu to select the selection type

class SelectionTypePopup

{

    weld::Window* m_pPopupParent;

    std::unique_ptr<weld::Builder> m_xBuilder;

    std::unique_ptr<weld::Menu> m_xMenu;

    static OUString state_to_id(sal_uInt16 nState);

public:

    SelectionTypePopup(weld::Window* pPopupParent, sal_uInt16 nCurrent);

    OUString GetItemTextForState(sal_uInt16 nState) { return m_xMenu->get_label(state_to_id(nState)); }

    OUString popup_at_rect(const tools::Rectangle& rRect)

    {

        return m_xMenu->popup_at_rect(m_pPopupParent, rRect);

    }

    void HideSelectionType(const OUString& rIdent)

    {

        m_xMenu->remove(rIdent);

    }

    static sal_uInt16 id_to_state(std::u16string_view ident);

};

}

sal_uInt16 SelectionTypePopup::id_to_state(std::u16string_view ident)

{

    if (ident == u"block")

        return 3;

    else if (ident == u"adding")

        return 2;

    else if (ident == u"extending")

        return 1;

    else // fall through

        return 0;

}

OUString SelectionTypePopup::state_to_id(sal_uInt16 nState)

{

    switch (nState)

    {

        default: // fall through

        case 0: return u"standard"_ustr;

        case 1: return u"extending"_ustr;

        case 2: return u"adding"_ustr;

        case 3: return u"block"_ustr;

    }

}

SelectionTypePopup::SelectionTypePopup(weld::Window* pPopupParent, sal_uInt16 nCurrent)

    : m_pPopupParent(pPopupParent)

    , m_xBuilder(Application::CreateBuilder(m_pPopupParent, u"svx/ui/selectionmenu.ui"_ustr))

    , m_xMenu(m_xBuilder->weld_menu(u"menu"_ustr))

{

    m_xMenu->set_active(state_to_id(nCurrent), true);

}

SvxSelectionModeControl::SvxSelectionModeControl( sal_uInt16 _nSlotId,

                                                  sal_uInt16 _nId,

                                                  StatusBar& rStb ) :

    SfxStatusBarControl( _nSlotId, _nId, rStb ),

    mnState( 0 ),

    maImages{Image(StockImage::Yes, RID_SVXBMP_STANDARD_SELECTION),

             Image(StockImage::Yes, RID_SVXBMP_EXTENDING_SELECTION),

             Image(StockImage::Yes, RID_SVXBMP_ADDING_SELECTION),

             Image(StockImage::Yes, RID_SVXBMP_BLOCK_SELECTION)},

    mbFeatureEnabled(false)

{

    GetStatusBar().SetQuickHelpText(GetId(), u""_ustr);

}

void SvxSelectionModeControl::StateChangedAtStatusBarControl( sal_uInt16, SfxItemState eState,

                                            const SfxPoolItem* pState )

{

    mbFeatureEnabled = SfxItemState::DEFAULT == eState;

    if (mbFeatureEnabled)

    {

        DBG_ASSERT( dynamic_cast< const SfxUInt16Item* >(pState) !=  nullptr, "invalid item type" );

        const SfxUInt16Item* pItem = static_cast<const SfxUInt16Item*>(pState);

        mnState = pItem->GetValue();

        SelectionTypePopup aPop(GetStatusBar().GetFrameWeld(), mnState);

        GetStatusBar().SetQuickHelpText(GetId(),

                                        SvxResId(RID_SVXSTR_SELECTIONMODE_HELPTEXT).

                                        replaceFirst("%1", aPop.GetItemTextForState(mnState)));

        GetStatusBar().Invalidate();

    }

}

bool SvxSelectionModeControl::MouseButtonDown( const MouseEvent& rEvt )

{

    if (!mbFeatureEnabled)

        return true;

    ::tools::Rectangle aRect(rEvt.GetPosPixel(), Size(1, 1));

    weld::Window* pPopupParent = weld::GetPopupParent(GetStatusBar(), aRect);

    SelectionTypePopup aPop(pPopupParent, mnState);

    // Check if Calc is opened; if true, hide block selection mode tdf#122280

    const css::uno::Reference < css::frame::XModel > xModel = m_xFrame->getController()->getModel();

    css::uno::Reference< css::lang::XServiceInfo > xServices( xModel, css::uno::UNO_QUERY );

    if ( xServices.is() )

    {

        bool bSpecModeCalc = xServices->supportsService(u"com.sun.star.sheet.SpreadsheetDocument"_ustr);

        if (bSpecModeCalc)

            aPop.HideSelectionType(u"block"_ustr);

    }

    OUString sIdent = aPop.popup_at_rect(aRect);

    if (!sIdent.isEmpty())

    {

        sal_uInt16 nNewState = SelectionTypePopup::id_to_state(sIdent);

        if ( nNewState != mnState )

        {

            mnState = nNewState;

            css::uno::Any a;

            SfxUInt16Item aState( GetSlotId(), mnState );

            aState.QueryValue( a );

            INetURLObject aObj( m_aCommandURL );

            css::uno::Sequence< css::beans::PropertyValue > aArgs{ comphelper::makePropertyValue(

                aObj.GetURLPath(), a) };

            execute( aArgs );

        }

    }

    return true;

}

void SvxSelectionModeControl::Click()

{

}

void SvxSelectionModeControl::Paint( const UserDrawEvent& rUsrEvt )

{

    const tools::Rectangle aControlRect = getControlRect();

    vcl::RenderContext* pDev = rUsrEvt.GetRenderContext();

    tools::Rectangle aRect = rUsrEvt.GetRect();

    Size aImgSize( maImages[mnState].GetSizePixel() );

    Point aPos( aRect.Left() + ( aControlRect.GetWidth() - aImgSize.Width() ) / 2,

            aRect.Top() + ( aControlRect.GetHeight() - aImgSize.Height() ) / 2 );

    if (mbFeatureEnabled)

        pDev->DrawImage(aPos, maImages[mnState]);

    else

        pDev->DrawImage(aPos, Image());

}

/* vim:set shiftwidth=4 softtabstop=4 expandtab: */