/* -*- 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 <com/sun/star/text/WritingMode2.hpp>

#include <drawingml/textparagraph.hxx>

#include <oox/drawingml/drawingmltypes.hxx>

#include <drawingml/textcharacterproperties.hxx>

#include <svtools/unitconv.hxx>

#include <rtl/ustring.hxx>

#include <sal/log.hxx>

#include <tools/fldunit.hxx>

#include <oox/mathml/importutils.hxx>

#include <oox/helper/propertyset.hxx>

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

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

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

#include <oox/token/properties.hxx>

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

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

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

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

namespace oox::drawingml {

TextParagraph::TextParagraph()

    : mbHasProperties( false )

{

}

TextParagraph::~TextParagraph()

{

}

TextCharacterProperties TextParagraph::getCharacterStyle (

    const TextCharacterProperties& rTextStyleProperties,

    const TextListStyle& rMasterTextListStyle,

    const TextListStyle& rTextListStyle) const

{

    const TextParagraphProperties* pMasterTextParagraphStyle = getParagraphStyle(rMasterTextListStyle);

    const TextParagraphProperties* pTextParagraphStyle = getParagraphStyle(rTextListStyle);

    TextCharacterProperties aTextCharacterStyle;

    if (pMasterTextParagraphStyle)

        aTextCharacterStyle.assignUsed(pMasterTextParagraphStyle->getTextCharacterProperties());

    aTextCharacterStyle.assignUsed(rTextStyleProperties);

    if (pTextParagraphStyle)

        aTextCharacterStyle.assignUsed(pTextParagraphStyle->getTextCharacterProperties());

    aTextCharacterStyle.assignUsed(maProperties.getTextCharacterProperties());

    return aTextCharacterStyle;

}

TextParagraphProperties* TextParagraph::getParagraphStyle(

    const TextListStyle& rTextListStyle) const

{

    sal_Int16 nLevel = maProperties.getLevel();

    SAL_INFO("oox", "TextParagraph::getParagraphStyle - level " << nLevel);

    const TextParagraphPropertiesArray& rListStyle = rTextListStyle.getListStyle();

    if (nLevel >= static_cast< sal_Int16 >(rListStyle.size()))

        nLevel = 0;

    const TextParagraphProperties* pTextParagraphStyle = nullptr;

    if (!rListStyle.empty())

        pTextParagraphStyle = &rListStyle[nLevel];

    return const_cast<TextParagraphProperties*>(pTextParagraphStyle);

}

void TextParagraph::insertAt(

        const ::oox::core::XmlFilterBase& rFilterBase,

        const Reference < XText > &xText,

        const Reference < XTextCursor > &xAt,

        const TextCharacterProperties& rTextStyleProperties,

        const TextListStyle& rMasterTextListStyle,

        const TextListStyle& rTextListStyle, bool bFirst,

        float nDefaultCharHeight) const

{

    try {

        sal_Int32 nParagraphSize = 0;

        TextCharacterProperties aTextCharacterStyle

            = getCharacterStyle(rTextStyleProperties, rMasterTextListStyle, rTextListStyle);

        if( !bFirst )

        {

            xText->insertControlCharacter( xAt, ControlCharacter::APPEND_PARAGRAPH, false );

            xAt->gotoEnd( true );

        }

        sal_Int32 nCharHeight = 0;

        sal_Int32 nCharHeightFirst = 0;

        if ( maRuns.empty() )

        {

            PropertySet aPropSet( xAt );

            TextCharacterProperties aTextCharacterProps( aTextCharacterStyle );

            aTextCharacterProps.assignUsed( maEndProperties );

            if ( aTextCharacterProps.moHeight.has_value() )

                nCharHeight = nCharHeightFirst = aTextCharacterProps.moHeight.value();

            aTextCharacterProps.pushToPropSet( aPropSet, rFilterBase );

        }

        else

        {

            for( TextRunVector::const_iterator aIt = maRuns.begin(), aEnd = maRuns.end(); aIt != aEnd; ++aIt )

            {

                sal_Int32 nLen = (*aIt)->getText().getLength();

                // n#759180: Force use, maEndProperties for the last segment

                // This is currently applied to only empty runs

                if( !nLen && ( ( aIt + 1 ) == aEnd ) )

                    (*aIt)->getTextCharacterProperties().assignUsed( maEndProperties );

                sal_Int32 nCharHeightCurrent = (*aIt)->insertAt( rFilterBase, xText, xAt, aTextCharacterStyle, nDefaultCharHeight );

                if(aIt == maRuns.begin())

                    nCharHeightFirst = nCharHeightCurrent;

                nCharHeight = std::max< sal_Int32 >( nCharHeight, nCharHeightCurrent);

                nParagraphSize += nLen;

            }

        }

        xAt->gotoEnd( true );

        PropertyMap aioBulletList;

        Reference< XPropertySet > xProps( xAt, UNO_QUERY);

        TextListStyle aCombinedTextStyle;

        aCombinedTextStyle.apply(rMasterTextListStyle);

        aCombinedTextStyle.apply(rTextListStyle);

        TextParagraphProperties* pTextParagraphStyle = getParagraphStyle(aCombinedTextStyle);

        if ( pTextParagraphStyle )

        {

            TextParagraphProperties aParaProp;

            aParaProp.apply( *pTextParagraphStyle );

            aParaProp.apply( maProperties );

            // bullets have same color as following texts by default

            if( !aioBulletList.hasProperty( PROP_BulletColor ) && !maRuns.empty()

                && (*maRuns.begin())->getTextCharacterProperties().maFillProperties.moFillType.has_value() )

                aioBulletList.setProperty( PROP_BulletColor, (*maRuns.begin())->getTextCharacterProperties().maFillProperties.getBestSolidColor().getColor( rFilterBase.getGraphicHelper() ));

            if( !aioBulletList.hasProperty( PROP_BulletColor ) && aTextCharacterStyle.maFillProperties.moFillType.has_value() )

                aioBulletList.setProperty( PROP_BulletColor, aTextCharacterStyle.maFillProperties.getBestSolidColor().getColor( rFilterBase.getGraphicHelper() ));

            if( !aioBulletList.hasProperty( PROP_GraphicSize ) && !maRuns.empty()

                && aParaProp.getBulletList().maGraphic.hasValue())

            {

                tools::Long nFirstCharHeightMm = TransformMetric(nCharHeightFirst > 0 ? nCharHeightFirst : 1200, FieldUnit::POINT, FieldUnit::MM);

                float fBulletSizeRel = 1.f;

                double fBulletAspectRatio = 1.0;

                if( aParaProp.getBulletList().mnSize.hasValue() )

                    fBulletSizeRel = aParaProp.getBulletList().mnSize.get<sal_Int16>() / 100.f;

                if( aParaProp.getBulletList().mnAspectRatio.hasValue() )

                    fBulletAspectRatio = aParaProp.getBulletList().mnAspectRatio.get<double>();

                css::awt::Size aBulletSize;

                if( fBulletAspectRatio != 1.0 )

                {

                    aBulletSize.Height = std::lround(fBulletSizeRel * nFirstCharHeightMm * OOX_BULLET_LIST_SCALE_FACTOR);

                    aBulletSize.Width = aBulletSize.Height * fBulletAspectRatio;

                }

                else

                    aBulletSize.Width = aBulletSize.Height = std::lround(fBulletSizeRel * nFirstCharHeightMm * OOX_BULLET_LIST_SCALE_FACTOR);

                aioBulletList.setProperty( PROP_GraphicSize, aBulletSize);

            }

            // If the shape is Stacked then set Stacked into the TextParagraphProperties

            Reference<XPropertySet> xProps2(xText, UNO_QUERY);

            sal_Int16 nWritingMode = xProps2->getPropertyValue(u"WritingMode"_ustr).get<sal_Int16>();

            if (nWritingMode == text::WritingMode2::STACKED)

            {

                aParaProp.getTextParagraphPropertyMap().setProperty(PROP_WritingMode, nWritingMode);

            }

            float fCharacterSize = nCharHeight > 0 ? GetFontHeight ( nCharHeight ) : pTextParagraphStyle->getCharHeightPoints( 12 );

            aParaProp.pushToPropSet( &rFilterBase, xProps, aioBulletList, &pTextParagraphStyle->getBulletList(), true, fCharacterSize, true, &aCombinedTextStyle );

        }

        // empty paragraphs do not have bullets in ppt

        if ( !nParagraphSize )

        {

            xProps->setPropertyValue( u"NumberingLevel"_ustr, Any( static_cast< sal_Int16 >( -1 ) ) );

        }

// FIXME this is causing a lot of disruption (ie does not work). I wonder what to do -- Hub

//          Reference< XTextRange > xEnd( xAt, UNO_QUERY );

//      Reference< XPropertySet > xProps2( xEnd, UNO_QUERY );

//          mpEndProperties->pushToPropSet( xProps2 );

    }

    catch( Exception & )

    {

        SAL_INFO("oox", "exception in TextParagraph::insertAt");

    }

}

formulaimport::XmlStreamBuilder & TextParagraph::GetMathXml()

{

    if (!m_pMathXml)

    {

        m_pMathXml.reset(new formulaimport::XmlStreamBuilder);

    }

    return *m_pMathXml;

}

bool TextParagraph::hasVisualRunProperties() const

{

   for ( auto& pTextRun : getRuns() )

   {

       if ( pTextRun->hasVisualRunProperties() )

           return true;

   }

   return false;

}

}

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