/* -*- 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 <vcl/svapp.hxx>

#include <vcl/weld/MessageDialog.hxx>

#include <vcl/weld/weld.hxx>

#include <svl/style.hxx>

#include <editeng/outliner.hxx>

#include <svx/svdotext.hxx>

#include <svl/poolitem.hxx>

#include <editeng/eeitem.hxx>

#include <svl/whiter.hxx>

#include <sal/log.hxx>

#include <tools/debug.hxx>

#include <officecfg/Office/Draw.hxx>

#include <svx/svdundo.hxx>

#include <svx/strings.hrc>

#include <svx/dialmgr.hxx>

#include <strings.hrc>

#include <View.hxx>

#include <drawview.hxx>

#include <drawdoc.hxx>

#include <DrawDocShell.hxx>

#include <sdpage.hxx>

#include <ViewShellBase.hxx>

#include <DrawViewShell.hxx>

#include <pres.hxx>

#include <sdresid.hxx>

#include <unchss.hxx>

#include <slideshow.hxx>

#include <undo/undomanager.hxx>

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

namespace sd {

/**

 * Shows the first page of document at position 0,0. In the case

 * that there is no page a page is created.

 */

DrawView::DrawView(

    DrawDocShell* pDocSh,

    OutputDevice* pOutDev,

    DrawViewShell* pShell)

:   ::sd::View(*pDocSh->GetDoc(), pOutDev, pShell)

    ,mpDrawViewShell(pShell)

    ,mnPOCHSmph(0)

{

    SetCurrentObj(SdrObjKind::Rectangle);

}

DrawView::~DrawView()

{

}

/**

 * Virtual method from SdrView, called at selection change.

 */

void DrawView::MarkListHasChanged()

{

    ::sd::View::MarkListHasChanged();

    if (mpDrawViewShell)

        mpDrawViewShell->SelectionHasChanged();

}

/**

 * Virtual method from SdrView, called at model change.

 */

void DrawView::ModelHasChanged()

{

    ::sd::View::ModelHasChanged();

    // force framer to rerender

    SfxStyleSheetBasePool* pSSPool = mrDoc.GetStyleSheetPool();

    pSSPool->Broadcast(SfxStyleSheetPoolHint());

    if( mpDrawViewShell )

        mpDrawViewShell->ModelHasChanged();

}

/**

 * Redirect attributes onto title and outline text and background

 * rectangle of a masterpage into templates, otherwise pass on baseclass.

 */

bool DrawView::SetAttributes(const SfxItemSet& rSet,

                             bool bReplaceAll, bool bSlide, bool bMaster)

{

    bool bOk = false;

    if (mpDrawViewShell && bMaster)

    {

        SfxStyleSheetBasePool* pStShPool = mrDoc.GetStyleSheetPool();

        SdPage& rPage = *mpDrawViewShell->getCurrentPage();

        SdrPage& rMasterPage = rPage.TRG_GetMasterPage();

        for (const rtl::Reference<SdrObject>& pObject : rMasterPage)

            SetMasterAttributes(pObject.get(), rPage, rSet, pStShPool, bOk, bMaster, bSlide);

        return bOk;

    }

    if (mpDrawViewShell && bSlide)

    {

        SfxStyleSheetBasePool* pStShPool = mrDoc.GetStyleSheetPool();

        SdPage& rPage = *mpDrawViewShell->getCurrentPage();

        for (const rtl::Reference<SdrObject>& pObject : rPage)

            SetMasterAttributes(pObject.get(), rPage, rSet, pStShPool, bOk, bMaster, bSlide);

        return bOk;

    }

    // is there a masterpage edit?

    if ( mpDrawViewShell && (mpDrawViewShell->GetEditMode() == EditMode::MasterPage) )

    {

        SfxStyleSheetBasePool* pStShPool = mrDoc.GetStyleSheetPool();

        SdPage& rPage = *mpDrawViewShell->getCurrentPage();

        SdrTextObj* pEditObject = GetTextEditObject();

        if (pEditObject)

        {

            // Textedit

            SdrInventor nInv = pEditObject->GetObjInventor();

            if (nInv == SdrInventor::Default)

            {

                SdrObjKind eObjKind = pEditObject->GetObjIdentifier();

                PresObjKind ePresObjKind = rPage.GetPresObjKind(pEditObject);

                if ( ePresObjKind == PresObjKind::Title ||

                     ePresObjKind == PresObjKind::Notes )

                {

                    // Presentation object (except outline)

                    SfxStyleSheet* pSheet = rPage.GetStyleSheetForPresObj( ePresObjKind );

                    DBG_ASSERT(pSheet, "StyleSheet not found");

                    SfxItemSet aTempSet( pSheet->GetItemSet() );

                    aTempSet.Put( rSet );

                    aTempSet.ClearInvalidItems();

                    // Undo-Action

                    mpDocSh->GetUndoManager()->AddUndoAction(

                        std::make_unique<StyleSheetUndoAction>(mrDoc, *pSheet, &aTempSet));

                    pSheet->GetItemSet().Put(aTempSet);

                    pSheet->Broadcast(SfxHint(SfxHintId::DataChanged));

                    bOk = true;

                }

                else if (eObjKind == SdrObjKind::OutlineText)

                {

                    // Presentation object outline

                    OutlinerView* pOV   = GetTextEditOutlinerView();

                    ::Outliner& rOutliner = pOV->GetOutliner();

                    rOutliner.SetUpdateLayout(false);

                    mpDocSh->SetWaitCursor( true );

                    // replace placeholder by template name

                    OUString aComment(SdResId(STR_UNDO_CHANGE_PRES_OBJECT));

                    aComment = aComment.replaceFirst("$", SdResId(STR_PSEUDOSHEET_OUTLINE));

                    mpDocSh->GetUndoManager()->EnterListAction( aComment, OUString(), 0, mpDrawViewShell->GetViewShellBase().GetViewShellId() );

                    std::vector<Paragraph*> aSelList;

                    pOV->CreateSelectionList(aSelList);

                    std::vector<Paragraph*>::reverse_iterator iter = aSelList.rbegin();

                    Paragraph* pPara = iter != aSelList.rend() ? *iter : nullptr;

                    while (pPara)

                    {

                        sal_Int32 nParaPos = rOutliner.GetAbsPos( pPara );

                        sal_Int16 nDepth = rOutliner.GetDepth( nParaPos );

                        OUString aName = rPage.GetLayoutName() + " " +

                            OUString::number((nDepth <= 0) ? 1 : nDepth + 1);

                        SfxStyleSheet* pSheet = static_cast<SfxStyleSheet*>(pStShPool->Find(aName, SfxStyleFamily::Page));

                        //We have no stylesheet if we access outline level 10

                        //in the master preview, there is no true style backing

                        //that entry

                        SAL_WARN_IF(!pSheet, "sd", "StyleSheet " << aName << " not found");

                        if (pSheet)

                        {

                            SfxItemSet aTempSet( pSheet->GetItemSet() );

                            aTempSet.Put( rSet );

                            aTempSet.ClearInvalidItems();

                            if( nDepth > 0 && aTempSet.GetItemState( EE_PARA_NUMBULLET ) == SfxItemState::SET )

                            {

                                // no SvxNumBulletItem in outline level 1 to 8!

                                aTempSet.ClearItem( EE_PARA_NUMBULLET );

                            }

                            // Undo-Action

                            mpDocSh->GetUndoManager()->AddUndoAction(

                                std::make_unique<StyleSheetUndoAction>(mrDoc, *pSheet, &aTempSet));

                            pSheet->GetItemSet().Put(aTempSet);

                            pSheet->Broadcast(SfxHint(SfxHintId::DataChanged));

                            // now also broadcast any child sheets

                            sal_Int16 nChild;

                            for( nChild = nDepth + 1; nChild < 9; nChild++ )

                            {

                                OUString aSheetName = rPage.GetLayoutName() + " " +

                                    OUString::number((nChild <= 0) ? 1 : nChild + 1);

                                SfxStyleSheet* pOutlSheet = static_cast< SfxStyleSheet* >(pStShPool->Find(aSheetName, SfxStyleFamily::Page));

                                if( pOutlSheet )

                                    pOutlSheet->Broadcast(SfxHint(SfxHintId::DataChanged));

                            }

                        }

                        ++iter;

                        pPara = iter != aSelList.rend() ? *iter : nullptr;

                        bool bJumpToLevel1 = false;

                        if( !pPara && nDepth > 0 && rSet.GetItemState( EE_PARA_NUMBULLET ) == SfxItemState::SET )

                            bJumpToLevel1 = true;

                        if (bJumpToLevel1)

                        {

                            iter = aSelList.rend();

                            --iter;

                            if (rOutliner.GetDepth(rOutliner.GetAbsPos(*iter)) > 0)

                                pPara = rOutliner.GetParagraph( 0 );  // Put NumBulletItem in outline level 1

                        }

                    }

                    mpDocSh->SetWaitCursor( false );

                    pOV->GetOutliner().SetUpdateLayout(true);

                    mpDocSh->GetUndoManager()->LeaveListAction();

                    bOk = true;

                }

                else

                {

                    bOk = ::sd::View::SetAttributes(rSet, bReplaceAll);

                }

            }

        }

        else

        {

            // Selection

            const SdrMarkList& rList = GetMarkedObjectList();

            const size_t nMarkCount = rList.GetMarkCount();

            for (size_t nMark = 0; nMark < nMarkCount; ++nMark)

            {

                SdrObject*  pObject = rList.GetMark(nMark)->GetMarkedSdrObj();

                SetMasterAttributes(pObject, rPage, rSet, pStShPool, bOk, bMaster, bSlide);

            }

            if(!bOk)

                bOk = ::sd::View::SetAttributes(rSet, bReplaceAll);

        }

    }

    else    // not at masterpage

    {

        bOk = ::sd::View::SetAttributes(rSet, bReplaceAll);

    }

    return bOk;

}

void DrawView::SetMasterAttributes( SdrObject* pObject, const SdPage& rPage, const SfxItemSet& rSet, SfxStyleSheetBasePool* pStShPool, bool& bOk, bool bMaster, bool bSlide )

{

    SdrInventor nInv    = pObject->GetObjInventor();

    if (nInv != SdrInventor::Default)

        return;

    SdrObjKind eObjKind = pObject->GetObjIdentifier();

    PresObjKind ePresObjKind = rPage.GetPresObjKind(pObject);

    if (bSlide && eObjKind == SdrObjKind::Text)

    {

        // Presentation object (except outline)

        SfxStyleSheet* pSheet = rPage.GetTextStyleSheetForObject(pObject);

        assert(pSheet && "StyleSheet not found");

        SfxItemSet aTempSet( pSheet->GetItemSet() );

        aTempSet.Put( rSet );

        aTempSet.ClearInvalidItems();

        // Undo-Action

        mpDocSh->GetUndoManager()->AddUndoAction(

            std::make_unique<StyleSheetUndoAction>(mrDoc, *pSheet, &aTempSet));

        pSheet->GetItemSet().Put(aTempSet,false);

        pSheet->Broadcast(SfxHint(SfxHintId::DataChanged));

        bOk = true;

    }

    if (!bSlide &&

        (ePresObjKind == PresObjKind::Title ||

         ePresObjKind == PresObjKind::Notes))

    {

        // Presentation object (except outline)

        SfxStyleSheet* pSheet = rPage.GetStyleSheetForPresObj( ePresObjKind );

        assert(pSheet && "StyleSheet not found");

        SfxItemSet aTempSet( pSheet->GetItemSet() );

        aTempSet.Put( rSet );

        aTempSet.ClearInvalidItems();

        // Undo-Action

        mpDocSh->GetUndoManager()->AddUndoAction(

            std::make_unique<StyleSheetUndoAction>(mrDoc, *pSheet, &aTempSet));

        pSheet->GetItemSet().Put(aTempSet,false);

        pSheet->Broadcast(SfxHint(SfxHintId::DataChanged));

        bOk = true;

    }

    else if (eObjKind == SdrObjKind::OutlineText)

    {

        // tdf#127900: do not forget to apply master style to placeholders

        if (!rSet.HasItem(EE_PARA_NUMBULLET) || bMaster)

        {

            // Presentation object outline

            for (sal_uInt16 nLevel = 9; nLevel > 0; nLevel--)

            {

                OUString aName = rPage.GetLayoutName() + " " +

                    OUString::number(nLevel);

                SfxStyleSheet* pSheet = static_cast<SfxStyleSheet*>(pStShPool->

                                    Find(aName, SfxStyleFamily::Page));

                assert(pSheet && "StyleSheet not found");

                SfxItemSet aTempSet( pSheet->GetItemSet() );

                if( nLevel > 1 )

                {

                    // for all levels over 1, clear all items that will be

                    // hard set to level 1

                    SfxWhichIter aWhichIter(rSet);

                    sal_uInt16 nWhich(aWhichIter.FirstWhich());

                    while( nWhich )

                    {

                        if( SfxItemState::SET == aWhichIter.GetItemState() )

                            aTempSet.ClearItem( nWhich );

                        nWhich = aWhichIter.NextWhich();

                    }

                }

                else

                {

                    // put the items hard into level one

                    aTempSet.Put( rSet );

                }

                aTempSet.ClearInvalidItems();

                // Undo-Action

                mpDocSh->GetUndoManager()->AddUndoAction(

                    std::make_unique<StyleSheetUndoAction>(mrDoc, *pSheet, &aTempSet));

                pSheet->GetItemSet().Set(aTempSet,false);

                pSheet->Broadcast(SfxHint(SfxHintId::DataChanged));

            }

            // remove all hard set items from shape that are now set in style

            SfxWhichIter aWhichIter(rSet);

            sal_uInt16 nWhich(aWhichIter.FirstWhich());

            while( nWhich )

            {

                if( SfxItemState::SET == aWhichIter.GetItemState() )

                    pObject->ClearMergedItem( nWhich );

                nWhich = aWhichIter.NextWhich();

            }

        }

        else

            pObject->SetMergedItemSet(rSet);

        bOk = true;

    }

}

/**

 * Notify for change of site arrangement

 */

void DrawView::Notify(SfxBroadcaster& rBC, const SfxHint& rHint)

{

    if ( mpDrawViewShell && rHint.GetId() == SfxHintId::ThisIsAnSdrHint )

    {

        SdrHintKind eHintKind = static_cast<const SdrHint&>(rHint).GetKind();

        if ( mnPOCHSmph == 0 && eHintKind == SdrHintKind::PageOrderChange )

        {

            mpDrawViewShell->ResetActualPage();

            mpDrawViewShell->UpdateScrollBars();

        }

        else if ( eHintKind == SdrHintKind::LayerChange || eHintKind == SdrHintKind::LayerOrderChange )

        {

            mpDrawViewShell->ResetActualLayer();

        }

        // switch to that page when it's not a master page

        if(SdrHintKind::SwitchToPage == eHintKind)

        {

            // We switch page only in the current view, which triggered this event

            // and keep other views untouched.

            SfxViewShell* pViewShell = SfxViewShell::Current();

            if(pViewShell && pViewShell != &mpDrawViewShell->GetViewShellBase())

                return;

            const SdrPage* pPage = static_cast<const SdrHint&>(rHint).GetPage();

            if(pPage && !pPage->IsMasterPage())

            {

                if(mpDrawViewShell->GetActualPage() != pPage)

                {

                    sal_uInt16 nPageNum = (pPage->GetPageNum() - 1) / 2; // Sdr --> Sd

                    mpDrawViewShell->SwitchPage(nPageNum);

                }

            }

        }

    }

    ::sd::View::Notify(rBC, rHint);

}

/**

 * Lock/Unlock PageOrderChangedHint

 */

void DrawView::BlockPageOrderChangedHint(bool bBlock)

{

    if (bBlock)

        mnPOCHSmph++;

    else

    {

        DBG_ASSERT(mnPOCHSmph, "counter overflow");

        mnPOCHSmph--;

    }

}

/**

 * If presentation objects are selected, intercept stylesheet-positioning at

 * masterpage.

 */

bool DrawView::SetStyleSheet(SfxStyleSheet* pStyleSheet, bool bDontRemoveHardAttr)

{

    bool bResult = true;

    // is there a masterpage edit?

    if (mpDrawViewShell && mpDrawViewShell->GetEditMode() == EditMode::MasterPage)

    {

        if (IsPresObjSelected(false))

        {

            std::unique_ptr<weld::MessageDialog> xInfoBox(Application::CreateMessageDialog(mpDrawViewShell->GetFrameWeld(),

                                                          VclMessageType::Info, VclButtonsType::Ok,

                                                          SdResId(STR_ACTION_NOTPOSSIBLE)));

            xInfoBox->run();

            bResult = false;

        }

        else

        {

            bResult = ::sd::View::SetStyleSheet(pStyleSheet, bDontRemoveHardAttr);

        }

    }

    else

    {

        bResult = ::sd::View::SetStyleSheet(pStyleSheet, bDontRemoveHardAttr);

    }

    return bResult;

}

/**

 * Paint-method: Redirect event to the view

 */

void DrawView::CompleteRedraw(OutputDevice* pOutDev, const vcl::Region& rReg, sdr::contact::ViewObjectContactRedirector* pRedirector /*=0*/)

{

    SdDrawDocument* pDoc = GetDocSh()->GetDoc();

    if( pDoc && pDoc->GetDocumentType() == DocumentType::Impress)

    {

        rtl::Reference< sd::SlideShow > xSlideshow( SlideShow::GetSlideShow( pDoc ) );

        if(xSlideshow.is() && xSlideshow->isRunning())

        {

            OutputDevice* pShowWindow = xSlideshow->getShowWindow();

            if( (pShowWindow == pOutDev) || (xSlideshow->getAnimationMode() == ANIMATIONMODE_PREVIEW) )

            {

                if( pShowWindow == pOutDev && mpViewSh )

                    xSlideshow->paint();

                if (!xSlideshow->IsInteractiveSlideshow()) // IASS

                    return;

            }

        }

    }

    else if( pDoc && pDoc->GetDocumentType() == DocumentType::Draw)

    {

        // tdf#164605 & tdf#89420

        bool bShowMargin(officecfg::Office::Draw::Misc::TextObject::ShowBoundary::get());

        pDoc->SetShowMargin(bShowMargin);

    }

    ::sd::View::CompleteRedraw(pOutDev, rReg, pRedirector);

}

/**

 * Make passed region visible (scrolling if necessary)

 */

void DrawView::MakeVisible(const ::tools::Rectangle& rRect, vcl::Window& rWin)

{

    if (!rRect.IsEmpty() && mpDrawViewShell)

    {

        mpDrawViewShell->MakeVisible(rRect, rWin);

    }

}

/**

 * Hide page.

 */

void DrawView::HideSdrPage()

{

    if (mpDrawViewShell)

    {

        mpDrawViewShell->HidePage();

    }

    ::sd::View::HideSdrPage();

}

void DrawView::DeleteMarked()

{

    sd::UndoManager* pUndoManager = mrDoc.GetUndoManager();

    DBG_ASSERT( pUndoManager, "sd::DrawView::DeleteMarked(), ui action without undo manager!?" );

    const SdrMarkList& rMarkList = GetMarkedObjectList();

    if( pUndoManager )

    {

        OUString aUndo(SvxResId(STR_EditDelete));

        aUndo = aUndo.replaceFirst("%1", rMarkList.GetMarkDescription());

        ViewShellId nViewShellId = mpDrawViewShell ? mpDrawViewShell->GetViewShellBase().GetViewShellId() : ViewShellId(-1);

        pUndoManager->EnterListAction(aUndo, aUndo, 0, nViewShellId);

    }

    SdPage* pPage = nullptr;

    bool bResetLayout = false;

    const size_t nMarkCount = rMarkList.GetMarkCount();

    if( nMarkCount )

    {

        SdrMarkList aList( GetMarkedObjectList() );

        for (size_t nMark = 0; nMark < nMarkCount; ++nMark)

        {

            SdrObject* pObj = aList.GetMark(nMark)->GetMarkedSdrObj();

            if( pObj && !pObj->IsEmptyPresObj() && pObj->GetUserCall() )

            {

                pPage = static_cast< SdPage* >( pObj->getSdrPageFromSdrObject() );

                if (pPage)

                {

                    PresObjKind ePresObjKind(pPage->GetPresObjKind(pObj));

                    switch( ePresObjKind )

                    {

                    case PresObjKind::NONE:

                        continue; // ignore it

                    case PresObjKind::Graphic:

                    case PresObjKind::Object:

                    case PresObjKind::Chart:

                    case PresObjKind::OrgChart:

                    case PresObjKind::Table:

                    case PresObjKind::Calc:

                    case PresObjKind::Media:

                        ePresObjKind = PresObjKind::Outline;

                        break;

                    default:

                        break;

                    }

                    SdrTextObj* pTextObj = DynCastSdrTextObj( pObj );

                    bool bVertical = pTextObj && pTextObj->IsVerticalWriting();

                    ::tools::Rectangle aRect( pObj->GetLogicRect() );

                    SdrObject* pNewObj = pPage->InsertAutoLayoutShape(nullptr, ePresObjKind, bVertical, aRect, OUString(), true);

                    // pUndoManager should not be NULL (see assert above)

                    // but since we have defensive code

                    // for it earlier and later in the function

                    // we might as well be consistent

                    if(pUndoManager)

                    {

                        // Move the new PresObj to the position before the

                        // object it will replace.

                        pUndoManager->AddUndoAction(

                            mrDoc.GetSdrUndoFactory().CreateUndoObjectOrdNum(

                                *pNewObj,

                                pNewObj->GetOrdNum(),

                                pObj->GetOrdNum()));

                    }

                    pPage->SetObjectOrdNum( pNewObj->GetOrdNum(), pObj->GetOrdNum() );

                    bResetLayout = true;

                }

            }

        }

    }

    ::sd::View::DeleteMarked();

    if( pPage && bResetLayout )

        pPage->SetAutoLayout( pPage->GetAutoLayout() );

    if( pUndoManager )

        pUndoManager->LeaveListAction();

}

} // end of namespace sd

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