/* -*- 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/frame/XModel.hpp>

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

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

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

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

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

#include <o3tl/any.hxx>

#include <sal/log.hxx>

#include <osl/diagnose.h>

#include <xmloff/xmlnamespace.hxx>

#include <xmloff/prstylei.hxx>

#include <xmloff/xmltoken.hxx>

#include <xmloff/XMLTextMasterPageContext.hxx>

#include <XMLTextHeaderFooterContext.hxx>

#include <PageMasterImportContext.hxx>

#include <xmloff/xmlimp.hxx>

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

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

using namespace ::com::sun::star::xml::sax;

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

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

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

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

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

using namespace ::xmloff::token;

Reference < XStyle > XMLTextMasterPageContext::Create()

{

    Reference < XStyle > xNewStyle;

    Reference< XMultiServiceFactory > xFactory( GetImport().GetModel(),

                                                    UNO_QUERY );

    if( xFactory.is() )

    {

        Reference < XInterface > xIfc =

            xFactory->createInstance(u"com.sun.star.style.PageStyle"_ustr);

        if( xIfc.is() )

            xNewStyle.set( xIfc, UNO_QUERY );

    }

    return xNewStyle;

}

constexpr OUString gsFollowStyle( u"FollowStyle"_ustr );

constexpr OUString gsHeaderNoFirst( u"HeaderNoFirst"_ustr );

constexpr OUString gsFooterNoFirst( u"FooterNoFirst"_ustr );

constexpr OUString gsFirstShareContent(u"FirstIsShared"_ustr);

XMLTextMasterPageContext::XMLTextMasterPageContext( SvXMLImport& rImport,

        sal_Int32 /*nElement*/,

        const Reference< XFastAttributeList > & xAttrList,

        bool bOverwrite )

:   SvXMLStyleContext( rImport, XmlStyleFamily::MASTER_PAGE )

,   m_bInsertHeader( false )

,   m_bInsertFooter( false )

,   m_bInsertHeaderLeft( false )

,   m_bInsertFooterLeft( false )

,   m_bInsertHeaderFirst( false )

,   m_bInsertFooterFirst( false )

,   m_bHeaderInserted( false )

,   m_bFooterInserted( false )

{

    OUString sName, sDisplayName;

    for (auto &aIter : sax_fastparser::castToFastAttributeList( xAttrList ))

    {

        const OUString aValue = aIter.toString();

        switch (aIter.getToken())

        {

            case XML_ELEMENT(STYLE, XML_NAME):

                sName = aValue;

                break;

            case XML_ELEMENT(STYLE, XML_DISPLAY_NAME):

                sDisplayName = aValue;

                break;

            case XML_ELEMENT(STYLE, XML_NEXT_STYLE_NAME):

                m_sFollow = aValue;

                break;

            case XML_ELEMENT(STYLE, XML_PAGE_LAYOUT_NAME):

                m_sPageMasterName = aValue;

                break;

            case XML_ELEMENT(STYLE, XML_IS_FIRST_PAGE_FOOTER_ENABLED):

            case XML_ELEMENT(LO_EXT, XML_IS_FIRST_PAGE_FOOTER_ENABLED):

            case XML_ELEMENT(COL_EXT, XML_IS_FIRST_PAGE_FOOTER_ENABLED):

                m_sIsFirstPageFooterEnabled = aValue;

                break;

            case XML_ELEMENT(STYLE, XML_IS_FIRST_PAGE_HEADER_ENABLED):

            case XML_ELEMENT(LO_EXT, XML_IS_FIRST_PAGE_HEADER_ENABLED):

            case XML_ELEMENT(COL_EXT, XML_IS_FIRST_PAGE_HEADER_ENABLED):

                m_sIsFirstPageHeaderEnabled = aValue;

                break;

            case XML_ELEMENT(DRAW, XML_STYLE_NAME):

                m_sDrawingPageStyle = aValue;

                break;

            default:

                XMLOFF_WARN_UNKNOWN("xmloff", aIter);

        }

    }

    if( !sDisplayName.isEmpty() )

    {

        rImport.AddStyleDisplayName( XmlStyleFamily::MASTER_PAGE, sName,

                                     sDisplayName );

    }

    else

    {

        sDisplayName = sName;

    }

    if( sDisplayName.isEmpty() )

        return;

    Reference < XNameContainer > xPageStyles =

            GetImport().GetTextImport()->GetPageStyles();

    if( !xPageStyles.is() )

        return;

    Any aAny;

    bool bNew = false;

    if( xPageStyles->hasByName( sDisplayName ) )

    {

        aAny = xPageStyles->getByName( sDisplayName );

        aAny >>= m_xStyle;

    }

    else

    {

        m_xStyle = Create();

        if( !m_xStyle.is() )

            return;

        xPageStyles->insertByName( sDisplayName, Any(m_xStyle) );

        bNew = true;

    }

    Reference < XPropertySet > xPropSet( m_xStyle, UNO_QUERY );

    Reference< XPropertySetInfo > xPropSetInfo =

                xPropSet->getPropertySetInfo();

    OUString sIsPhysical( u"IsPhysical"_ustr );

    if( !bNew && xPropSetInfo->hasPropertyByName( sIsPhysical ) )

    {

        aAny = xPropSet->getPropertyValue( sIsPhysical );

        bNew = !*o3tl::doAccess<bool>(aAny);

    }

    SetNew( bNew );

    if( !(bOverwrite || bNew) )

        return;

    Reference < XMultiPropertyStates > xMultiStates( xPropSet,

                                                     UNO_QUERY );

    OSL_ENSURE( xMultiStates.is(),

                "text page style does not support multi property set" );

    if( xMultiStates.is() )

        xMultiStates->setAllPropertiesToDefault();

    if ( xPropSetInfo->hasPropertyByName( u"GridDisplay"_ustr ) )

        xPropSet->setPropertyValue( u"GridDisplay"_ustr, Any(false) );

    if ( xPropSetInfo->hasPropertyByName( u"GridPrint"_ustr ) )

        xPropSet->setPropertyValue( u"GridPrint"_ustr, Any(false) );

    m_bInsertHeader = m_bInsertFooter = true;

    m_bInsertHeaderLeft = m_bInsertFooterLeft = true;

    m_bInsertHeaderFirst = m_bInsertFooterFirst = true;

}

XMLTextMasterPageContext::~XMLTextMasterPageContext()

{

}

css::uno::Reference< css::xml::sax::XFastContextHandler > XMLTextMasterPageContext::createFastChildContext(

    sal_Int32 nElement,

    const css::uno::Reference< css::xml::sax::XFastAttributeList >& xAttrList )

{

    SvXMLImportContextRef xContext;

    bool bInsert = false, bFooter = false, bLeft = false, bFirst = false;

    switch( nElement )

    {

    case XML_ELEMENT(STYLE, XML_HEADER):

        if( m_bInsertHeader && !m_bHeaderInserted )

        {

            bInsert = true;

            m_bHeaderInserted = true;

        }

        break;

    case XML_ELEMENT(STYLE, XML_FOOTER):

        if( m_bInsertFooter && !m_bFooterInserted )

        {

            bInsert = bFooter = true;

            m_bFooterInserted = true;

        }

        break;

    case XML_ELEMENT(STYLE, XML_HEADER_LEFT):

        if( m_bInsertHeaderLeft && m_bHeaderInserted )

            bInsert = bLeft = true;

        break;

    case XML_ELEMENT(STYLE, XML_FOOTER_LEFT):

        if( m_bInsertFooterLeft && m_bFooterInserted )

            bInsert = bFooter = bLeft = true;

        break;

    case XML_ELEMENT(LO_EXT, XML_HEADER_FIRST):

    case XML_ELEMENT(STYLE, XML_HEADER_FIRST):

        if( m_bInsertHeaderFirst && m_bHeaderInserted )

            bInsert = bFirst = true;

        break;

    case XML_ELEMENT(LO_EXT, XML_FOOTER_FIRST):

    case XML_ELEMENT(STYLE, XML_FOOTER_FIRST):

        if( m_bInsertFooterFirst && m_bFooterInserted )

            bInsert = bFooter = bFirst = true;

        break;

    }

    if( bInsert && m_xStyle.is() )

    {

        xContext = CreateHeaderFooterContext( nElement, xAttrList,

                                              bFooter, bLeft, bFirst );

    }

    return xContext;

}

SvXMLImportContext *XMLTextMasterPageContext::CreateHeaderFooterContext(

            sal_Int32 /*nElement*/,

            const css::uno::Reference< css::xml::sax::XFastAttributeList > & /*xAttrList*/,

            const bool bFooter,

            const bool bLeft,

            const bool bFirst )

{

    Reference < XPropertySet > xPropSet( m_xStyle, UNO_QUERY );

    return new XMLTextHeaderFooterContext( GetImport(), xPropSet, bFooter, bLeft, bFirst );

}

void XMLTextMasterPageContext::Finish( bool bOverwrite )

{

    if( !(m_xStyle.is() && (IsNew() || bOverwrite)) )

        return;

    Reference < XPropertySet > xPropSet( m_xStyle, UNO_QUERY );

    XMLPropStyleContext * pDrawingPageStyle(nullptr);

    if (!m_sDrawingPageStyle.isEmpty())

    {

        pDrawingPageStyle = GetImport().GetTextImport()->FindDrawingPage(m_sDrawingPageStyle);

    }

    PageStyleContext * pPageLayout(nullptr);

    if( !m_sPageMasterName.isEmpty() )

    {

        pPageLayout = static_cast<PageStyleContext *>(GetImport().GetTextImport()->FindPageMaster(m_sPageMasterName));

    }

    if (pPageLayout)

    {

        pPageLayout->FillPropertySet_PageStyle(xPropSet, pDrawingPageStyle);

    }

    else if (pDrawingPageStyle)

    {

        // don't need to care about old background attributes in this case

        pDrawingPageStyle->FillPropertySet(xPropSet);

    }

    Reference < XNameContainer > xPageStyles =

        GetImport().GetTextImport()->GetPageStyles();

    if( !xPageStyles.is() )

        return;

    Reference< XPropertySetInfo > xPropSetInfo =

        xPropSet->getPropertySetInfo();

    if( xPropSetInfo->hasPropertyByName( gsFollowStyle ) )

    {

        OUString sDisplayFollow(

            GetImport().GetStyleDisplayName(

                    XmlStyleFamily::MASTER_PAGE, m_sFollow ) );

        if( sDisplayFollow.isEmpty() ||

            !xPageStyles->hasByName( sDisplayFollow ) )

            sDisplayFollow = m_xStyle->getName();

        Any aAny = xPropSet->getPropertyValue( gsFollowStyle );

        OUString sCurrFollow;

        aAny >>= sCurrFollow;

        if( sCurrFollow != sDisplayFollow )

        {

            xPropSet->setPropertyValue( gsFollowStyle, Any(sDisplayFollow) );

        }

    }

    if ( xPropSetInfo->hasPropertyByName( u"Hidden"_ustr ) )

    {

        xPropSet->setPropertyValue( u"Hidden"_ustr, uno::Any( IsHidden( ) ) );

    }

    if (xPropSetInfo->hasPropertyByName(gsHeaderNoFirst))

    {

        if (IsXMLToken(m_sIsFirstPageHeaderEnabled, XML_FALSE))

        {

            xPropSet->setPropertyValue( gsFirstShareContent, Any(false) );

            xPropSet->setPropertyValue( gsHeaderNoFirst, Any(true) );

        }

        if (IsXMLToken(m_sIsFirstPageFooterEnabled, XML_FALSE))

        {

            xPropSet->setPropertyValue( gsFirstShareContent, Any(false) );

            xPropSet->setPropertyValue( gsFooterNoFirst, Any(true) );

        }

    }

}

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