/* -*- 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 <svx/dialmgr.hxx>

#include <svx/strings.hrc>

#include <comphelper/diagnose_ex.hxx>

#include <i18nlangtag/mslangid.hxx>

#include <svtools/valueset.hxx>

#include <unotools/fontdefs.hxx>

#include <editeng/numitem.hxx>

#include <officecfg/Office/Common.hxx>

#include <svx/gallery.hxx>

#include <vcl/event.hxx>

#include <vcl/graph.hxx>

#include <vcl/rendercontext/GetDefaultFontFlags.hxx>

#include <vcl/virdev.hxx>

#include <vcl/weld/ScrolledWindow.hxx>

#include <svx/numvset.hxx>

#include <com/sun/star/style/NumberingType.hpp>

#include <com/sun/star/container/XIndexAccess.hpp>

#include <com/sun/star/text/XNumberingFormatter.hpp>

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

#include <algorithm>

#include <uiobject.hxx>

using namespace com::sun::star::uno;

using namespace com::sun::star::beans;

using namespace com::sun::star::lang;

using namespace com::sun::star::text;

using namespace com::sun::star::container;

using namespace com::sun::star::style;

static vcl::Font& lcl_GetDefaultBulletFont()

{

    static vcl::Font aDefBulletFont = []()

    {

        static vcl::Font tmp(u"OpenSymbol"_ustr, u""_ustr, Size(0, 14));

        tmp.SetCharSet( RTL_TEXTENCODING_SYMBOL );

        tmp.SetFamily( FAMILY_DONTKNOW );

        tmp.SetPitch( PITCH_DONTKNOW );

        tmp.SetWeight( WEIGHT_DONTKNOW );

        tmp.SetTransparent( true );

        return tmp;

    }();

    return aDefBulletFont;

}

static void lcl_PaintLevel(OutputDevice* pVDev, sal_Int16 nNumberingType,

                        const OUString& rBulletChar, const OUString& rText, const OUString& rFontName,

                        Point& rLeft, vcl::Font& rRuleFont, const vcl::Font& rTextFont)

{

    if(NumberingType::CHAR_SPECIAL == nNumberingType )

    {

        rRuleFont.SetStyleName(rFontName);

        pVDev->SetFont(rRuleFont);

        pVDev->DrawText(rLeft, rBulletChar);

        rLeft.AdjustX(pVDev->GetTextWidth(rBulletChar) );

    }

    else

    {

        pVDev->SetFont(rTextFont);

        pVDev->DrawText(rLeft, rText);

        rLeft.AdjustX(pVDev->GetTextWidth(rText) );

    }

}

const TranslateId RID_SVXSTR_SINGLENUM_DESCRIPTIONS[] =

{

    RID_SVXSTR_SINGLENUM_DESCRIPTION_0,

    RID_SVXSTR_SINGLENUM_DESCRIPTION_1,

    RID_SVXSTR_SINGLENUM_DESCRIPTION_2,

    RID_SVXSTR_SINGLENUM_DESCRIPTION_3,

    RID_SVXSTR_SINGLENUM_DESCRIPTION_4,

    RID_SVXSTR_SINGLENUM_DESCRIPTION_5,

    RID_SVXSTR_SINGLENUM_DESCRIPTION_6,

    RID_SVXSTR_SINGLENUM_DESCRIPTION_7

};

const TranslateId RID_SVXSTR_OUTLINENUM_DESCRIPTIONS[] =

{

    RID_SVXSTR_OUTLINENUM_DESCRIPTION_0,

    RID_SVXSTR_OUTLINENUM_DESCRIPTION_1,

    RID_SVXSTR_OUTLINENUM_DESCRIPTION_2,

    RID_SVXSTR_OUTLINENUM_DESCRIPTION_3,

    RID_SVXSTR_OUTLINENUM_DESCRIPTION_4,

    RID_SVXSTR_OUTLINENUM_DESCRIPTION_5,

    RID_SVXSTR_OUTLINENUM_DESCRIPTION_6,

    RID_SVXSTR_OUTLINENUM_DESCRIPTION_7

};

void SvxNumValueSet::UserDraw( const UserDrawEvent& rUDEvt )

{

    static const sal_uInt16 aLinesArr[] =

    {

        15, 10,

        20, 30,

        25, 50,

        30, 70,

        35, 90, // up to here line positions

         5, 10, // character positions

        10, 30,

        15, 50,

        20, 70,

        25, 90,

    };

    const Color aBackColor(COL_WHITE);

    const Color aTextColor(COL_BLACK);

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

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

    sal_uInt16 nIndex = rUDEvt.GetItemId() - 1;

    tools::Long nRectWidth = aRect.GetWidth();

    tools::Long nRectHeight = aRect.GetHeight();

    Size aRectSize(nRectWidth, aRect.GetHeight());

    Point aBLPos = aRect.TopLeft();

    vcl::Font aOldFont = pDev->GetFont();

    Color aOldColor = pDev->GetLineColor();

    pDev->SetLineColor(aTextColor);

    vcl::Font aFont(OutputDevice::GetDefaultFont(

                DefaultFontType::UI_SANS, MsLangId::getConfiguredSystemLanguage(), GetDefaultFontFlags::OnlyOne));

    Size aSize = aFont.GetFontSize();

    vcl::Font aRuleFont( lcl_GetDefaultBulletFont() );

    aSize.setHeight( nRectHeight/6 );

    aRuleFont.SetFontSize(aSize);

    aRuleFont.SetColor(aTextColor);

    aRuleFont.SetFillColor(aBackColor);

    css::uno::Sequence< OUString > aBulletSymbols;

    if(mePageType == NumberingPageType::BULLET || mePageType == NumberingPageType::DOCBULLET)

    {

        aBulletSymbols = officecfg::Office::Common::BulletsNumbering::DefaultBullets::get();

        css::uno::Sequence< OUString > aBulletFonts(officecfg::Office::Common::BulletsNumbering::DefaultBulletsFonts::get());

        aRuleFont.SetFamilyName(aBulletFonts[nIndex]);

        aFont = aRuleFont;

    }

    else if (mePageType == NumberingPageType::DOCBULLET)

    {

        aRuleFont.SetFamilyName(maCustomBullets[nIndex].second);

        aFont = aRuleFont;

    }

    else if(mePageType == NumberingPageType::OUTLINE)

    {

        aSize.setHeight( nRectHeight/8 );

    }

    aFont.SetColor(aTextColor);

    aFont.SetFillColor(aBackColor);

    aFont.SetFontSize( aSize );

    pDev->SetFont(aFont);

    if(!mpVDev)

    {

        // The lines are only one time in the virtual device, only the outline

        // page is currently done

        mpVDev = VclPtr<VirtualDevice>::Create(*pDev);

        mpVDev->SetMapMode(pDev->GetMapMode());

        mpVDev->EnableRTL( IsRTLEnabled() );

        mpVDev->SetOutputSize( aRectSize );

        maOrgRect = aRect;

        mpVDev->SetFillColor( aBackColor );

        mpVDev->SetLineColor(COL_LIGHTGRAY);

        // Draw line only once

        if(mePageType != NumberingPageType::OUTLINE)

        {

            Point aStart(aBLPos.X() + nRectWidth *25 / 100,0);

            Point aEnd(aBLPos.X() + nRectWidth * 9 / 10,0);

            for( sal_uInt16 i = 11; i < 100; i += 33)

            {

                aStart.setY( aBLPos.Y() + nRectHeight  * i / 100 );

                aEnd.setY( aStart.Y() );

                mpVDev->DrawLine(aStart, aEnd);

                aStart.setY( aBLPos.Y() + nRectHeight  * (i + 11) / 100 );

                aEnd.setY( aStart.Y() );

                mpVDev->DrawLine(aStart, aEnd);

            }

        }

    }

    pDev->DrawOutDev(   aRect.TopLeft(), aRectSize,

                        maOrgRect.TopLeft(), aRectSize,

                        *mpVDev );

    // Now comes the text

    static constexpr OUStringLiteral sValue(u"Value");

    if( NumberingPageType::SINGLENUM == mePageType ||

           NumberingPageType::BULLET == mePageType ||

           NumberingPageType::DOCBULLET == mePageType)

    {

        Point aStart(aBLPos.X() + nRectWidth / 9,0);

        for( sal_uInt16 i = 0; i < 3; i++ )

        {

            sal_uInt16 nY = 11 + i * 33;

            aStart.setY( aBLPos.Y() + nRectHeight  * nY / 100 );

            OUString sText;

            if(mePageType == NumberingPageType::BULLET)

            {

                sText = aBulletSymbols[nIndex];

                aStart.AdjustY( -(pDev->GetTextHeight()/2) );

                aStart.setX( aBLPos.X() + 5 );

            }

            else if (mePageType == NumberingPageType::DOCBULLET)

            {

                sText = maCustomBullets[nIndex].first;

                aStart.AdjustY( -(pDev->GetTextHeight()/2) );

                aStart.setX( aBLPos.X() + 5 );

            }

            else

            {

                if(mxFormatter.is() && maNumSettings.getLength() > nIndex)

                {

                    Sequence<PropertyValue> aLevel = maNumSettings.getConstArray()[nIndex];

                    try

                    {

                        aLevel.realloc(aLevel.getLength() + 1);

                        PropertyValue& rValue = aLevel.getArray()[aLevel.getLength() - 1];

                        rValue.Name = sValue;

                        rValue.Value <<= static_cast<sal_Int32>(i + 1);

                        sText = mxFormatter->makeNumberingString( aLevel, maLocale );

                    }

                    catch(Exception&)

                    {

                        TOOLS_WARN_EXCEPTION("svx.dialog", "");

                    }

                }

                // start just next to the left edge

                aStart.setX( aBLPos.X() + 2 );

                aStart.AdjustY( -(pDev->GetTextHeight()/2) );

            }

            pDev->DrawText(aStart, sText);

        }

    }

    else if(NumberingPageType::OUTLINE == mePageType )

    {

        // Outline numbering has to be painted into the virtual device

        // to get correct lines

        // has to be made again

        mpVDev->SetLineColor(aBackColor);

        mpVDev->DrawRect(maOrgRect);

        tools::Long nStartX = maOrgRect.Left();

        tools::Long nStartY = maOrgRect.Top();

        if(mxFormatter.is() && maOutlineSettings.getLength() > nIndex)

        {

            Reference<XIndexAccess> xLevel = maOutlineSettings.getArray()[nIndex];

            try

            {

                OUString sLevelTexts[5];

                OUString sFontNames[5];

                OUString sBulletChars[5];

                sal_Int16 aNumberingTypes[5];

                OUString sPrefixes[5];

                OUString sSuffixes[5];

                sal_Int16 aParentNumberings[5];

                sal_Int32 nLevelCount = xLevel->getCount();

                if(nLevelCount > 5)

                    nLevelCount = 5;

                for( sal_Int32 i = 0; i < nLevelCount; i++)

                {

                    tools::Long nTop = nStartY + nRectHeight * (aLinesArr[2 * i + 11])/100 ;

                    Point aLeft(nStartX + nRectWidth *  (aLinesArr[2 * i + 10])/ 100, nTop );

                    Any aLevelAny = xLevel->getByIndex(i);

                    Sequence<PropertyValue> aLevel;

                    aLevelAny >>= aLevel;

                    aNumberingTypes[i] = 0;

                    aParentNumberings[i] = 0;

                    for (const PropertyValue& rProp : aLevel)

                    {

                        if ( rProp.Name == "NumberingType" )

                            rProp.Value >>= aNumberingTypes[i];

                        else if ( rProp.Name == "BulletFontName" )

                            rProp.Value >>= sFontNames[i];

                        else if ( rProp.Name == "BulletChar" )

                            rProp.Value >>= sBulletChars[i];

                        else if ( rProp.Name == "Prefix" )

                            rProp.Value >>= sPrefixes[i];

                        else if ( rProp.Name == "Suffix" )

                            rProp.Value >>= sSuffixes[i];

                        else if ( rProp.Name == "ParentNumbering" )

                            rProp.Value >>= aParentNumberings[i];

                    }

                    Sequence< PropertyValue > aProperties(2);

                    PropertyValue* pProperties = aProperties.getArray();

                    pProperties[0].Name = "NumberingType";

                    pProperties[0].Value <<= aNumberingTypes[i];

                    pProperties[1].Name = "Value";

                    pProperties[1].Value <<= sal_Int32(1);

                    try

                    {

                        sLevelTexts[i] = mxFormatter->makeNumberingString( aProperties, maLocale );

                    }

                    catch(Exception&)

                    {

                        TOOLS_WARN_EXCEPTION("svx.dialog", "");

                    }

                    aLeft.AdjustY( -(pDev->GetTextHeight()/2) );

                    if(!sPrefixes[i].isEmpty() &&

                        sPrefixes[i] != " ")

                    {

                        mpVDev->SetFont(aFont);

                        mpVDev->DrawText(aLeft, sPrefixes[i]);

                        aLeft.AdjustX(pDev->GetTextWidth(sPrefixes[i]) );

                    }

                    if(aParentNumberings[i])

                    {

                        //insert old numberings here

                        sal_Int32 nStartLevel = std::min(static_cast<sal_Int32>(aParentNumberings[i]), i);

                        for(sal_Int32 nParentLevel = i - nStartLevel; nParentLevel < i; nParentLevel++)

                        {

                            OUString sTmp = sLevelTexts[nParentLevel] + ".";

                            lcl_PaintLevel(mpVDev,

                                    aNumberingTypes[nParentLevel],

                                    sBulletChars[nParentLevel],

                                    sTmp,

                                    sFontNames[nParentLevel],

                                    aLeft,

                                    aRuleFont,

                                    aFont);

                        }

                    }

                    lcl_PaintLevel(mpVDev,

                                    aNumberingTypes[i],

                                    sBulletChars[i],

                                    sLevelTexts[i],

                                    sFontNames[i],

                                    aLeft,

                                    aRuleFont,

                                    aFont);

                    if(!sSuffixes[i].isEmpty() &&

                       !sSuffixes[i].startsWith(" "))

                    {

                        mpVDev->SetFont(aFont);

                        mpVDev->DrawText(aLeft, sSuffixes[i]);

                        aLeft.AdjustX(pDev->GetTextWidth(sSuffixes[i]) );

                    }

                    tools::Long nLineTop = nStartY + nRectHeight * aLinesArr[2 * i + 1]/100 ;

                    Point aLineLeft(aLeft.X(), nLineTop );

                    Point aLineRight(nStartX + nRectWidth * 90 /100, nLineTop );

                    mpVDev->SetLineColor(COL_LIGHTGRAY);

                    mpVDev->DrawLine(aLineLeft,  aLineRight);

                }

            }

#ifdef DBG_UTIL

            catch(Exception&)

            {

                static bool bAssert = false;

                if(!bAssert)

                {

                    TOOLS_WARN_EXCEPTION("svx.dialog", "");

                    bAssert = true;

                }

            }

#else

            catch(Exception&)

            {

            }

#endif

        }

        pDev->DrawOutDev(   aRect.TopLeft(), aRectSize,

                            maOrgRect.TopLeft(), aRectSize,

                            *mpVDev );

    }

    pDev->SetFont(aOldFont);

    pDev->SetLineColor(aOldColor);

}

SvxNumValueSet::SvxNumValueSet(std::unique_ptr<weld::ScrolledWindow> pScrolledWindow)

    : ValueSet(std::move(pScrolledWindow))

    , mePageType(NumberingPageType::BULLET)

    , mpVDev(nullptr)

{

}

FactoryFunction SvxNumValueSet::GetUITestFactory() const

{

    return SvxNumValueSetUIObject::create;

}

void SvxNumValueSet::init(NumberingPageType eType)

{

    mePageType = eType;

    mpVDev.disposeAndClear();

    SetColCount( 4 );

    SetLineCount( 2 );

    SetStyle( GetStyle() | WB_ITEMBORDER | WB_DOUBLEBORDER );

    if(NumberingPageType::BULLET == eType)

    {

        for ( sal_uInt16 i = 0; i < 8; i++ )

        {

            InsertItem( i + 1, i );

        }

    }

}

SvxNumValueSet::~SvxNumValueSet()

{

}

void SvxNumValueSet::SetNumberingSettings(

    const Sequence<Sequence<PropertyValue> >& aNum,

    Reference<XNumberingFormatter> const & xFormat,

    const Locale& rLocale   )

{

    maNumSettings = aNum;

    mxFormatter = xFormat;

    maLocale = rLocale;

    if(aNum.getLength() > 8)

            SetStyle( GetStyle()|WB_VSCROLL);

    for ( sal_Int32 i = 0; i < aNum.getLength(); i++ )

    {

        InsertItem(i + 1, i);

        if (i < 8)

            SetItemText(i + 1, SvxResId(RID_SVXSTR_SINGLENUM_DESCRIPTIONS[i]));

    }

}

void SvxNumValueSet::SetOutlineNumberingSettings(

            Sequence<Reference<XIndexAccess> > const & rOutline,

            Reference<XNumberingFormatter> const & xFormat,

            const Locale& rLocale)

{

    maOutlineSettings = rOutline;

    mxFormatter = xFormat;

    maLocale = rLocale;

    if(maOutlineSettings.getLength() > 8)

        SetStyle( GetStyle() | WB_VSCROLL );

    for ( sal_Int32 i = 0; i < maOutlineSettings.getLength(); i++ )

    {

        InsertItem( i + 1, i );

        if( i < 8 )

            SetItemText(i + 1, SvxResId(RID_SVXSTR_OUTLINENUM_DESCRIPTIONS[i]));

    }

}

void SvxNumValueSet::SetCustomBullets(const std::vector<std::pair<OUString, OUString>>& rCustomBullets)

{

    Clear();

    maCustomBullets = rCustomBullets;

    for (size_t i = 0; i < rCustomBullets.size(); i++)

    {

        InsertItem(i + 1, i);

    }

}

SvxBmpNumValueSet::SvxBmpNumValueSet(std::unique_ptr<weld::ScrolledWindow> pScrolledWindow)

    : SvxNumValueSet(std::move(pScrolledWindow))

    , m_aFormatIdle("SvxBmpNumValueSet FormatIdle")

    , m_bGrfNotFound(false)

{

}

void SvxBmpNumValueSet::init()

{

    SvxNumValueSet::init(NumberingPageType::BITMAP);

    m_bGrfNotFound = false;

    GalleryExplorer::BeginLocking(GALLERY_THEME_BULLETS);

    SetStyle( GetStyle() | WB_VSCROLL );

    SetLineCount( 3 );

    m_aFormatIdle.SetPriority(TaskPriority::LOWEST);

    m_aFormatIdle.SetInvokeHandler(LINK(this, SvxBmpNumValueSet, FormatHdl_Impl));

}

SvxBmpNumValueSet::~SvxBmpNumValueSet()

{

    GalleryExplorer::EndLocking(GALLERY_THEME_BULLETS);

    m_aFormatIdle.Stop();

}

void SvxBmpNumValueSet::UserDraw(const UserDrawEvent& rUDEvt)

{

    SvxNumValueSet::UserDraw(rUDEvt);

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

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

    sal_uInt16  nItemId = rUDEvt.GetItemId();

    Point aBLPos = aRect.TopLeft();

    tools::Long nRectHeight = aRect.GetHeight();

    Size aSize(nRectHeight/8, nRectHeight/8);

    Graphic aGraphic;

    if(!GalleryExplorer::GetGraphicObj( GALLERY_THEME_BULLETS, nItemId - 1,

                        &aGraphic))

    {

        m_bGrfNotFound = true;

    }

    else

    {

        Point aPos(aBLPos.X() + 5, 0);

        for( sal_uInt16 i = 0; i < 3; i++ )

        {

            sal_uInt16 nY = 11 + i * 33;

            aPos.setY( aBLPos.Y() + nRectHeight  * nY / 100 );

            aGraphic.Draw(*pDev, aPos, aSize);

        }

    }

}

IMPL_LINK_NOARG(SvxBmpNumValueSet, FormatHdl_Impl, Timer *, void)

{

    // only when a graphics was not there, it needs to be formatted

    if (m_bGrfNotFound)

    {

        SetFormat();

        m_bGrfNotFound = false;

    }

    Invalidate();

}

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