/* -*- 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 <com/sun/star/awt/FontDescriptor.hpp>

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

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

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

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

#include <com/sun/star/awt/XBitmap.hpp>

#include <com/sun/star/graphic/XGraphic.hpp>

#include <cppuhelper/supportsservice.hxx>

#include <utility>

#include <vcl/font.hxx>

#include <vcl/svapp.hxx>

#include <vcl/graph.hxx>

#include <vcl/GraphicObject.hxx>

#include <vcl/GraphicLoader.hxx>

#include <tools/debug.hxx>

#include <editeng/brushitem.hxx>

#include <editeng/unoprnms.hxx>

#include <editeng/numitem.hxx>

#include <editeng/unofdesc.hxx>

#include <editeng/unonrule.hxx>

#include <editeng/editids.hrc>

#include <o3tl/enumarray.hxx>

#include <o3tl/temporary.hxx>

#include <memory>

using ::com::sun::star::util::XCloneable;

using ::com::sun::star::ucb::XAnyCompare;

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

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

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

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

const SvxAdjust aUnoToSvxAdjust[] =

{

    SvxAdjust::Left,

    SvxAdjust::Right,

    SvxAdjust::Center,

    SvxAdjust::Left,

    SvxAdjust::Left,

    SvxAdjust::Left,

    SvxAdjust::Block

};

const o3tl::enumarray<SvxAdjust, sal_Int16> aSvxToUnoAdjust

{

    text::HoriOrientation::LEFT,

    text::HoriOrientation::RIGHT,

    text::HoriOrientation::FULL,

    text::HoriOrientation::CENTER,

    text::HoriOrientation::FULL,

    text::HoriOrientation::LEFT,

    text::HoriOrientation::RIGHT,

    text::HoriOrientation::LEFT

};

static SvxAdjust ConvertUnoAdjust( unsigned short nAdjust )

{

    DBG_ASSERT( nAdjust <= 7, "Enum has changed! [CL]" );

    return aUnoToSvxAdjust[nAdjust];

}

static unsigned short ConvertUnoAdjust( SvxAdjust eAdjust )

{

    DBG_ASSERT( static_cast<int>(eAdjust) <= 6, "Enum has changed! [CL]" );

    return aSvxToUnoAdjust[eAdjust];

}

SvxUnoNumberingRules::SvxUnoNumberingRules(SvxNumRule aRule)

: maRule(std::move( aRule ))

{

}

SvxUnoNumberingRules::~SvxUnoNumberingRules() noexcept

{

}

//XIndexReplace

void SAL_CALL SvxUnoNumberingRules::replaceByIndex( sal_Int32 Index, const uno::Any& Element )

{

    SolarMutexGuard aGuard;

    if( Index < 0 || Index >= maRule.GetLevelCount() )

        throw IndexOutOfBoundsException();

    Sequence< beans::PropertyValue > aSeq;

    if( !( Element >>= aSeq) )

        throw IllegalArgumentException();

    setNumberingRuleByIndex( aSeq, Index );

}

// XIndexAccess

sal_Int32 SAL_CALL SvxUnoNumberingRules::getCount()

{

    SolarMutexGuard aGuard;

    return maRule.GetLevelCount();

}

Any SAL_CALL SvxUnoNumberingRules::getByIndex( sal_Int32 Index )

{

    SolarMutexGuard aGuard;

    if( Index < 0 || Index >= maRule.GetLevelCount() )

        throw IndexOutOfBoundsException();

    return Any( getNumberingRuleByIndex(Index) );

}

//XElementAccess

Type SAL_CALL SvxUnoNumberingRules::getElementType()

{

    return cppu::UnoType<Sequence< beans::PropertyValue >>::get();

}

sal_Bool SAL_CALL SvxUnoNumberingRules::hasElements()

{

    return true;

}

// XAnyCompare

sal_Int16 SAL_CALL SvxUnoNumberingRules::compare( const Any& rAny1, const Any& rAny2 )

{

    return SvxUnoNumberingRules::Compare( rAny1, rAny2 );

}

// XCloneable

Reference< XCloneable > SAL_CALL SvxUnoNumberingRules::createClone(  )

{

    return new SvxUnoNumberingRules(maRule);

}

OUString SAL_CALL SvxUnoNumberingRules::getImplementationName(  )

{

    return u"SvxUnoNumberingRules"_ustr;

}

sal_Bool SAL_CALL SvxUnoNumberingRules::supportsService( const OUString& ServiceName )

{

    return cppu::supportsService(this, ServiceName);

}

Sequence< OUString > SAL_CALL SvxUnoNumberingRules::getSupportedServiceNames(  )

{

    return { u"com.sun.star.text.NumberingRules"_ustr };

}

Sequence<beans::PropertyValue> SvxUnoNumberingRules::getNumberingRuleByIndex(sal_Int32 nIndex) const

{

    //  NumberingRule aRule;

    const SvxNumberFormat& rFmt = maRule.GetLevel(static_cast<sal_uInt16>(nIndex));

    sal_uInt16 nIdx = 0;

    const int nProps = 15;

    std::unique_ptr<beans::PropertyValue[]> pArray(new beans::PropertyValue[nProps]);

    Any aVal;

    {

        aVal <<= static_cast<sal_uInt16>(rFmt.GetNumberingType());

        pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_NUMBERINGTYPE, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    }

    {

        SvxAdjust eAdj = rFmt.GetNumAdjust();

        aVal <<= ConvertUnoAdjust(eAdj);

        pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_ADJUST, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    }

    {

        aVal <<= rFmt.GetPrefix();

        pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_PREFIX, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    }

    {

        aVal <<= rFmt.GetSuffix();

        pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_SUFFIX, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    }

    if(SVX_NUM_CHAR_SPECIAL == rFmt.GetNumberingType())

    {

        sal_UCS4 nCode = rFmt.GetBulletChar();

        OUString aStr( &nCode, 1 );

        aVal <<= aStr;

        pArray[nIdx++] = beans::PropertyValue(u"BulletChar"_ustr, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    }

    if( rFmt.GetBulletFont() )

    {

        awt::FontDescriptor aDesc;

        SvxUnoFontDescriptor::ConvertFromFont( *rFmt.GetBulletFont(), aDesc );

        aVal <<= aDesc;

        pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_BULLET_FONT, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    }

    {

        const SvxBrushItem* pBrush = rFmt.GetBrush();

        const Graphic* pGraphic = nullptr;

        if (pBrush)

            pGraphic = pBrush->GetGraphic();

        if (pGraphic)

        {

            uno::Reference<awt::XBitmap> xBitmap(pGraphic->GetXGraphic(), uno::UNO_QUERY);

            aVal <<= xBitmap;

            pArray[nIdx++] = beans::PropertyValue(u"GraphicBitmap"_ustr, -1, aVal, beans::PropertyState_DIRECT_VALUE);

        }

    }

    {

        const Size aSize( rFmt.GetGraphicSize() );

        const awt::Size aUnoSize( aSize.Width(), aSize.Height() );

        aVal <<= aUnoSize;

        pArray[nIdx++] = beans::PropertyValue(u"GraphicSize"_ustr, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    }

    aVal <<= static_cast<sal_Int16>(rFmt.GetStart());

    pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_START_WITH, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    aVal <<= rFmt.GetAbsLSpace();

    pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_LEFT_MARGIN, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    aVal <<= rFmt.GetFirstLineOffset();

    pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_FIRST_LINE_OFFSET, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    pArray[nIdx++] = beans::PropertyValue(u"SymbolTextDistance"_ustr, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    aVal <<= rFmt.GetBulletColor();

    pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_BULLET_COLOR, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    aVal <<= static_cast<sal_Int16>(rFmt.GetBulletRelSize());

    pArray[nIdx++] = beans::PropertyValue(UNO_NAME_NRULE_BULLET_RELSIZE, -1, aVal, beans::PropertyState_DIRECT_VALUE);

    DBG_ASSERT( nIdx <= nProps, "FixMe: overflow in Array!!! [CL]" );

    Sequence< beans::PropertyValue> aSeq(pArray.get(), nIdx);

    return aSeq;

}

void SvxUnoNumberingRules::setNumberingRuleByIndex(const Sequence<beans::PropertyValue >& rProperties, sal_Int32 nIndex)

{

    SvxNumberFormat aFmt(maRule.GetLevel( static_cast<sal_uInt16>(nIndex) ));

    for(const beans::PropertyValue& rProp : rProperties)

    {

        const OUString& rPropName = rProp.Name;

        const Any& aVal = rProp.Value;

        if ( rPropName == UNO_NAME_NRULE_NUMBERINGTYPE )

        {

            sal_Int16 nSet = sal_Int16();

            aVal >>= nSet;

            // There is no reason to limit numbering types.

            if ( nSet>=0 )

            {

                aFmt.SetNumberingType(static_cast<SvxNumType>(nSet));

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_PREFIX )

        {

            OUString aPrefix;

            if( aVal >>= aPrefix )

            {

                aFmt.SetPrefix(aPrefix);

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_SUFFIX )

        {

            OUString aSuffix;

            if( aVal >>= aSuffix )

            {

                aFmt.SetSuffix(aSuffix);

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_BULLETID )

        {

            sal_Int16 nSet = sal_Int16();

            if( aVal >>= nSet )

            {

                if(nSet < 0x100)

                {

                    aFmt.SetBulletChar(nSet);

                    continue;

                }

            }

        }

        else if ( rPropName == "BulletChar" )

        {

            OUString aStr;

            if( aVal >>= aStr )

            {

                if(!aStr.isEmpty())

                {

                    aFmt.SetBulletChar(aStr.iterateCodePoints(&o3tl::temporary(sal_Int32(0))));

                }

                else

                {

                    aFmt.SetBulletChar(0);

                }

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_ADJUST )

        {

            sal_Int16 nAdjust = sal_Int16();

            if( aVal >>= nAdjust )

            {

                aFmt.SetNumAdjust(ConvertUnoAdjust( static_cast<unsigned short>(nAdjust) ));

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_BULLET_FONT )

        {

            awt::FontDescriptor aDesc;

            if( aVal >>= aDesc )

            {

                vcl::Font aFont;

                SvxUnoFontDescriptor::ConvertToFont( aDesc, aFont );

                aFmt.SetBulletFont(&aFont);

                continue;

            }

        }

        else if ( rPropName == "GraphicURL" )

        {

            OUString aURL;

            if (aVal >>= aURL)

            {

                Graphic aGraphic = vcl::graphic::loadFromURL(aURL);

                if (!aGraphic.IsNone())

                {

                    SvxBrushItem aBrushItem(aGraphic, GPOS_AREA, SID_ATTR_BRUSH);

                    aFmt.SetGraphicBrush(&aBrushItem);

                }

                continue;

            }

        }

        else if ( rPropName == "GraphicBitmap" )

        {

            uno::Reference<awt::XBitmap> xBitmap;

            if (aVal >>= xBitmap)

            {

                uno::Reference<graphic::XGraphic> xGraphic(xBitmap, uno::UNO_QUERY);

                Graphic aGraphic(xGraphic);

                SvxBrushItem aBrushItem(aGraphic, GPOS_AREA, SID_ATTR_BRUSH);

                aFmt.SetGraphicBrush( &aBrushItem );

                continue;

            }

        }

        else if ( rPropName == "GraphicSize" )

        {

            awt::Size aUnoSize;

            if( aVal >>= aUnoSize )

            {

                aFmt.SetGraphicSize( Size( aUnoSize.Width, aUnoSize.Height ) );

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_START_WITH )

        {

            sal_Int16 nStart = sal_Int16();

            if( aVal >>= nStart )

            {

                aFmt.SetStart( nStart );

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_LEFT_MARGIN )

        {

            sal_Int32 nMargin = 0;

            if( aVal >>= nMargin )

            {

                aFmt.SetAbsLSpace(nMargin);

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_FIRST_LINE_OFFSET )

        {

            sal_Int32 nMargin = 0;

            if( aVal >>= nMargin )

            {

                aFmt.SetFirstLineOffset(nMargin);

                continue;

            }

        }

        else if ( rPropName == "SymbolTextDistance" )

        {

            sal_Int32 nTextDistance = 0;

            if( aVal >>= nTextDistance )

            {

                aFmt.SetCharTextDistance(static_cast<sal_uInt16>(nTextDistance));

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_BULLET_COLOR )

        {

            Color aColor;

            if( aVal >>= aColor )

            {

                aFmt.SetBulletColor( aColor );

                continue;

            }

        }

        else if ( rPropName == UNO_NAME_NRULE_BULLET_RELSIZE )

        {

            sal_Int16 nSize = sal_Int16();

            if( aVal >>= nSize )

            {

                // [AOO Bug 120650] the slide content corrupt when open in Aoo

                // [TDF# 126234] when MS Office document being imported, the value of the relative size

                // of the bullet could be as high as 400%

                if ((nSize>400)||(nSize<=0))

                {

                    nSize = 100;

                }

                aFmt.SetBulletRelSize( static_cast<short>(nSize) );

                continue;

            }

        }

        else

        {

            continue;

        }

        throw IllegalArgumentException();

    }

    // check that we always have a brush item for bitmap numbering

    if( aFmt.GetNumberingType() == SVX_NUM_BITMAP )

    {

        if( nullptr == aFmt.GetBrush() )

        {

            GraphicObject aGrafObj;

            SvxBrushItem aBrushItem( aGrafObj, GPOS_AREA, SID_ATTR_BRUSH );

            aFmt.SetGraphicBrush( &aBrushItem );

        }

    }

    maRule.SetLevel( static_cast<sal_uInt16>(nIndex), aFmt );

}

const SvxNumRule& SvxGetNumRule( Reference< XIndexReplace > const & xRule )

{

    SvxUnoNumberingRules* pRule = dynamic_cast<SvxUnoNumberingRules*>( xRule.get() );

    if( pRule == nullptr )

        throw IllegalArgumentException();

    return pRule->getNumRule();

}

css::uno::Reference< css::container::XIndexReplace > SvxCreateNumRule(const SvxNumRule& rRule)

{

    return new SvxUnoNumberingRules( rRule );

}

namespace {

class SvxUnoNumberingRulesCompare : public ::cppu::WeakImplHelper< XAnyCompare >

{

public:

    virtual sal_Int16 SAL_CALL compare( const Any& Any1, const Any& Any2 ) override;

};

}

sal_Int16 SAL_CALL SvxUnoNumberingRulesCompare::compare( const Any& Any1, const Any& Any2 )

{

    return SvxUnoNumberingRules::Compare( Any1, Any2 );

}

sal_Int16 SvxUnoNumberingRules::Compare( const Any& Any1, const Any& Any2 )

{

    Reference< XIndexReplace > x1( Any1, UNO_QUERY ), x2( Any2, UNO_QUERY );

    if( !x1 || !x2 )

        return -1;

    if( x1.get() == x2.get() )

        return 0;

    SvxUnoNumberingRules* pRule1 = dynamic_cast<SvxUnoNumberingRules*>( x1.get() );

    if( !pRule1 )

        return -1;

    SvxUnoNumberingRules* pRule2 = dynamic_cast<SvxUnoNumberingRules*>( x2.get() );

    if( !pRule2 )

        return -1;

    const SvxNumRule& rRule1 = pRule1->getNumRule();

    const SvxNumRule& rRule2 = pRule2->getNumRule();

    const sal_uInt16 nLevelCount1 = rRule1.GetLevelCount();

    const sal_uInt16 nLevelCount2 = rRule2.GetLevelCount();

    if( nLevelCount1 == 0 || nLevelCount2 == 0 )

        return -1;

    for( sal_uInt16 i = 0; (i < nLevelCount1) && (i < nLevelCount2); i++ )

    {

        if( rRule1.GetLevel(i) != rRule2.GetLevel(i) )

            return -1;

    }

    return  0;

}

Reference< XAnyCompare > SvxCreateNumRuleCompare() noexcept

{

    return new SvxUnoNumberingRulesCompare;

}

css::uno::Reference< css::container::XIndexReplace > SvxCreateNumRule()

{

    SvxNumRule aTempRule( SvxNumRuleFlags::NONE, 10, false );

    return SvxCreateNumRule( aTempRule );

}

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