libreoffice/sw/source/core/view/vdraw.cxx

/*************************************************************************
 *
 *  $RCSfile: vdraw.cxx,v $
 *
 *  $Revision: 1.6 $
 *
 *  last change: $Author: od $ $Date: 2002-10-11 11:26:56 $
 *
 *  The Contents of this file are made available subject to the terms of
 *  either of the following licenses
 *
 *         - GNU Lesser General Public License Version 2.1
 *         - Sun Industry Standards Source License Version 1.1
 *
 *  Sun Microsystems Inc., October, 2000
 *
 *  GNU Lesser General Public License Version 2.1
 *  =============================================
 *  Copyright 2000 by Sun Microsystems, Inc.
 *  901 San Antonio Road, Palo Alto, CA 94303, USA
 *
 *  This library is free software; you can redistribute it and/or
 *  modify it under the terms of the GNU Lesser General Public
 *  License version 2.1, as published by the Free Software Foundation.
 *
 *  This library is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 *  Lesser General Public License for more details.
 *
 *  You should have received a copy of the GNU Lesser General Public
 *  License along with this library; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
 *  MA  02111-1307  USA
 *
 *
 *  Sun Industry Standards Source License Version 1.1
 *  =================================================
 *  The contents of this file are subject to the Sun Industry Standards
 *  Source License Version 1.1 (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.openoffice.org/license.html.
 *
 *  Software provided under this License is provided on an "AS IS" basis,
 *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
 *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
 *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
 *  See the License for the specific provisions governing your rights and
 *  obligations concerning the Software.
 *
 *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
 *
 *  Copyright: 2000 by Sun Microsystems, Inc.
 *
 *  All Rights Reserved.
 *
 *  Contributor(s): _______________________________________
 *
 *
 ************************************************************************/

#ifdef PRECOMPILED
#include "core_pch.hxx"
#endif

#pragma hdrstop

#ifndef _SVDMODEL_HXX //autogen
#include <svx/svdmodel.hxx>
#endif
#ifndef _SVDPAGE_HXX //autogen
#include <svx/svdpage.hxx>
#endif
#ifndef _XOUTX_HXX //autogen
#include <svx/xoutx.hxx>
#endif
#ifndef _SHL_HXX
#include <tools/shl.hxx>
#endif
#ifndef _SWMODULE_HXX
#include <swmodule.hxx>
#endif
#ifndef INCLUDED_SVTOOLS_ACCESSIBILITYOPTIONS_HXX
#include <svtools/accessibilityoptions.hxx>
#endif

#ifndef _SVDPAGV_HXX //autogen
#include <svx/svdpagv.hxx>
#endif

#ifndef _FMTANCHR_HXX //autogen
#include <fmtanchr.hxx>
#endif
#ifndef _FRMFMT_HXX //autogen
#include <frmfmt.hxx>
#endif

/// OD 29.08.2002 #102450#
/// include <svx/svdoutl.hxx>
#ifndef _SVDOUTL_HXX
#include <svx/svdoutl.hxx>
#endif

#ifndef PRODUCT
#ifndef _SVX_FMGLOB_HXX
#include <svx/fmglob.hxx>
#endif
#endif

#include "fesh.hxx"
#include "doc.hxx"
#include "pagefrm.hxx"
#include "rootfrm.hxx"
#include "viewimp.hxx"
#include "dflyobj.hxx"
#include "viewopt.hxx"
#include "dcontact.hxx"
#include "dview.hxx"
#include "flyfrm.hxx"


/*************************************************************************
|*
|*  SwSaveHdl
|*
|*  Ersterstellung      MA 14. Feb. 95
|*  Letzte Aenderung    MA 02. Jun. 98
|*
|*************************************************************************/
SwSaveHdl::SwSaveHdl( SwViewImp *pI ) :
    pImp( pI ),
    bXorVis( FALSE )
{
    if ( pImp->HasDrawView() )
    {
        bXorVis = pImp->GetDrawView()->IsShownXorVisible( pImp->GetShell()->GetOut());
        if ( bXorVis )
            pImp->GetDrawView()->HideShownXor( pImp->GetShell()->GetOut() );
    }
}


SwSaveHdl::~SwSaveHdl()
{
    if ( bXorVis )
        pImp->GetDrawView()->ShowShownXor( pImp->GetShell()->GetOut() );
}


/*************************************************************************
|*
|*  SwViewImp::StartAction(), EndAction()
|*
|*  Ersterstellung      MA 14. Feb. 95
|*  Letzte Aenderung    MA 14. Sep. 98
|*
|*************************************************************************/


void SwViewImp::StartAction()
{
    if ( HasDrawView() )
    {
        SET_CURR_SHELL( GetShell() );
        if ( pSh->ISA(SwFEShell) )
            ((SwFEShell*)pSh)->HideChainMarker();   //Kann sich geaendert haben
        bResetXorVisibility = GetDrawView()->IsShownXorVisible( GetShell()->GetOut());
        GetDrawView()->HideShownXor( GetShell()->GetOut() );
    }
}



void SwViewImp::EndAction()
{
    if ( HasDrawView() )
    {
        SET_CURR_SHELL( GetShell() );
        if ( bResetXorVisibility )
            GetDrawView()->ShowShownXor( GetShell()->GetOut() );
        if ( pSh->ISA(SwFEShell) )
            ((SwFEShell*)pSh)->SetChainMarker();    //Kann sich geaendert haben
    }
}

/*************************************************************************
|*
|*  SwViewImp::LockPaint(), UnlockPaint()
|*
|*  Ersterstellung      MA 11. Jun. 96
|*  Letzte Aenderung    MA 11. Jun. 96
|*
|*************************************************************************/


void SwViewImp::LockPaint()
{
    if ( HasDrawView() )
    {
        bShowHdlPaint = GetDrawView()->IsMarkHdlShown();
        if ( bShowHdlPaint )
            GetDrawView()->HideMarkHdl( GetShell()->GetOut() );
        bResetHdlHiddenPaint = !GetDrawView()->IsMarkHdlHidden();
        GetDrawView()->SetMarkHdlHidden( TRUE );
    }
    else
    {
        bShowHdlPaint = FALSE;
        bResetHdlHiddenPaint = FALSE;
    }
}



void SwViewImp::UnlockPaint()
{
    if ( bResetHdlHiddenPaint )
        GetDrawView()->SetMarkHdlHidden( FALSE );
    if ( bShowHdlPaint )
        GetDrawView()->ShowMarkHdl( GetShell()->GetOut() );
}


/*************************************************************************
|*
|*  SwViewImp::PaintLayer(), PaintDispatcher()
|*
|*  Ersterstellung      MA 20. Dec. 94
|*  Letzte Aenderung    AMA 04. Jun. 98
|*
|*************************************************************************/
/// OD 29.08.2002 #102450#
/// add 3rd paramter <const Color* pPageBackgrdColor> for setting this
/// color as the background color at the outliner of the draw view.
void SwViewImp::PaintLayer( const BYTE nLayerID, const SwRect &rRect,
                            const Color* pPageBackgrdColor ) const
{
    if ( HasDrawView() )
    {
        //change the draw mode in high contrast mode
        OutputDevice* pOutDev = GetShell()->GetOut();
        ULONG nOldDrawMode = pOutDev->GetDrawMode();
        /// OD 29.08.2002 - comment unnecessary method call
        //SW_MOD()->GetAccessibilityOptions().GetIsForPagePreviews();
        if( GetShell()->GetWin() &&
            Application::GetSettings().GetStyleSettings().GetHighContrastMode() &&
            (!GetShell()->IsPreView()||SW_MOD()->GetAccessibilityOptions().GetIsForPagePreviews()))
        {
            pOutDev->SetDrawMode( nOldDrawMode | DRAWMODE_SETTINGSLINE | DRAWMODE_SETTINGSFILL |
                                DRAWMODE_SETTINGSTEXT | DRAWMODE_SETTINGSGRADIENT );
        }

        /// OD 29.08.2002 #102450#
        /// For correct handling of accessibily, high contrast, the page background
        /// color is set as the background color at the outliner of the draw view.
        /// Only necessary for the layers hell and heaven
        Color aOldOutlinerBackgrdColor;
        if ( (nLayerID == GetShell()->GetDoc()->GetHellId()) ||
             (nLayerID == GetShell()->GetDoc()->GetHeavenId()) )
        {
            ASSERT( pPageBackgrdColor,
                    "incorrect usage of SwViewImp::PaintLayer: pPageBackgrdColor have to be set for painting layer <hell> or <heaven>");
            if ( pPageBackgrdColor )
            {
                aOldOutlinerBackgrdColor =
                        GetDrawView()->GetModel()->GetDrawOutliner().GetBackgroundColor();
                //const_cast<class SdrOutliner*>(GetDrawView()->GetModell()->GetDrawOutliner())->SetBackgroundColor( *pPageBackgrdColor );
                GetDrawView()->GetModel()->GetDrawOutliner().SetBackgroundColor( *pPageBackgrdColor );
            }
        }

        Link aLnk( LINK( this, SwViewImp, PaintDispatcher ) );
        GetPageView()->RedrawOneLayer( nLayerID, rRect.SVRect(),
                        pOutDev,
                        GetShell()->IsPreView() ? SDRPAINTMODE_ANILIKEPRN : 0,
                        &aLnk );

        /// OD 29.08.2002 #102450#
        /// reset background color of the outliner
        if ( (nLayerID == GetShell()->GetDoc()->GetHellId()) ||
             (nLayerID == GetShell()->GetDoc()->GetHeavenId()) )
        {
                GetDrawView()->GetModel()->GetDrawOutliner().SetBackgroundColor( aOldOutlinerBackgrdColor );
        }

        pOutDev->SetDrawMode( nOldDrawMode );
    }
}


IMPL_LINK( SwViewImp, PaintDispatcher, SdrPaintProcRec *, pRec )
{
    SdrObject *pObj = pRec->pObj;

    //Controls muessen im Control-Layer liegen. Dort duerfen aber auch
    //Gruppenobjekte oder mit Controls gruppierte Objekte liegen.
    ASSERT( FmFormInventor != pObj->GetObjInventor() ||
            GetShell()->GetDoc()->GetControlsId() == pObj->GetLayer(),
            "PaintDispatcher: Wrong Layer" );

    if ( !SwFlyFrm::IsPaint( pObj, GetShell() ) )
        return 0;

    const BYTE nHellId = GetShell()->GetDoc()->GetHellId();
    if ( pObj->IsWriterFlyFrame() )
    {
        if( pObj->GetLayer() == nHellId )
        {
            //Fuer Rahmen in der Hoelle gelten andere Regeln:
            //1. Rahmen mit einem Parent werden nie direkt, sondern von ihren
            //   Parents gepaintet.
            //1a.Es sei denn, der Parent steht nicht in der Hoelle.
            //2. Rahmen mit Childs painten zuerst die Childs in
            //   umgekehrter Z-Order.
            SwFlyFrm *pFly = ((SwVirtFlyDrawObj*)pObj)->GetFlyFrm();
            const FASTBOOL bInFly = pFly->GetAnchor()->IsInFly();
            if ( !bInFly ||
                 (bInFly && pFly->GetAnchor()->FindFlyFrm()->
                                   GetVirtDrawObj()->GetLayer() != nHellId))
                PaintFlyChilds( pFly, pRec->rOut, pRec->rInfoRec );
        }
        else
            pObj->Paint( pRec->rOut, pRec->rInfoRec );
    }
    else
    {
        SwRect aTmp( pRec->rInfoRec.aDirtyRect );

        OutputDevice *pOut = pRec->rOut.GetOutDev();
        pOut->Push( PUSH_CLIPREGION );
        pOut->IntersectClipRegion( aTmp.SVRect() );

        //Um zu verhindern, dass der Dispatcher f<>r jedes Gruppenobjekt
        //gerufen wird, muessen wir die Struktur manipulieren
        //(Absprache mit JOE).
        const Link *pSave = 0;
        if ( pObj->IsGroupObject() )
        {
            pSave = pRec->rInfoRec.pPaintProc;
            ((SdrPaintInfoRec&)pRec->rInfoRec).pPaintProc = 0;
        }

        pObj->Paint( pRec->rOut, pRec->rInfoRec );

        if ( pSave )
            ((SdrPaintInfoRec&)pRec->rInfoRec).pPaintProc = pSave;

        pOut->Pop();
    }
    return 0;
}

/*************************************************************************
|*
|*  SwViewImp::PaintFlyChilds()
|*
|*  Ersterstellung      MA ??
|*  Letzte Aenderung    MA 02. Aug. 95
|*
|*************************************************************************/


void SwViewImp::PaintFlyChilds( SwFlyFrm *pFly, ExtOutputDevice& rOut,
                                 const SdrPaintInfoRec& rInfoRec )
{
    SdrObject *pFlyObj  = pFly->GetVirtDrawObj();
    SdrPage   *pPage = pFlyObj->GetPage();
    OutputDevice *pOut = rOut.GetOutDev();

    //Zuerst den am weitesten oben liegenden Child suchen.
    ULONG i;
    for ( i = pFlyObj->GetOrdNumDirect()+1; i < pPage->GetObjCount(); ++i )
    {
        SdrObject *pObj = pPage->GetObj( i );
        SwFlyFrm *pF;
        if ( pObj->IsWriterFlyFrame() )
            pF = ((SwVirtFlyDrawObj*)pObj)->GetFlyFrm();
        else
        {
            SwFrm *pFrm = ((SwDrawContact*)GetUserCall(pObj))->GetAnchor();
            pF = pFrm ? pFrm->FindFlyFrm() : 0;
        }
        if ( pF && pF != pFly && !pF->IsLowerOf( pFly ) )
            break;
    }
    --i;    //Ich bin auf immer einen zu weit gelaufen.
    if ( i != pFlyObj->GetOrdNumDirect() )
    {
        for ( UINT32 j = i; j > pFlyObj->GetOrdNumDirect(); --j )
        {
            SdrObject *pObj = pPage->GetObj( j );
            if ( pObj->IsWriterFlyFrame() )
            {
                SwFlyFrm *pF = ((SwVirtFlyDrawObj*)pObj)->GetFlyFrm();
                if ( pF->GetAnchor()->FindFlyFrm() == pFly )
                    PaintFlyChilds( pF, rOut, rInfoRec );
            }
            else
            {
                SwFrm *pFrm = ((SwDrawContact*)GetUserCall(pObj))->GetAnchor();
                if( pFrm && pFrm->FindFlyFrm() == pFly )
                {
                    pOut->Push( PUSH_LINECOLOR );
                    pObj->Paint( rOut, rInfoRec );
                    pOut->Pop();
                }
            }
        }
    }
    pFlyObj->Paint( rOut, rInfoRec );
}

/*************************************************************************
|*
|*  SwViewImp::IsDragPossible()
|*
|*  Ersterstellung      MA 19. Jan. 93
|*  Letzte Aenderung    MA 16. Jan. 95
|*
|*************************************************************************/



#define WIEDUWILLST 400

BOOL SwViewImp::IsDragPossible( const Point &rPoint )
{
    if ( !HasDrawView() )
        return FALSE;

    const SdrMarkList &rMrkList = GetDrawView()->GetMarkList();

    if( !rMrkList.GetMarkCount() )
        return FALSE;

    SdrObject *pO = rMrkList.GetMark(rMrkList.GetMarkCount()-1)->GetObj();

    SwRect aRect;
    if( ::CalcClipRect( pO, aRect, FALSE ) )
    {
        SwRect aTmp;
        ::CalcClipRect( pO, aTmp, TRUE );
        aRect.Union( aTmp );
    }
    else
        aRect = GetShell()->GetLayout()->Frm();

    aRect.Top(    aRect.Top()    - WIEDUWILLST );
    aRect.Bottom( aRect.Bottom() + WIEDUWILLST );
    aRect.Left(   aRect.Left()   - WIEDUWILLST );
    aRect.Right(  aRect.Right()  + WIEDUWILLST );
    return aRect.IsInside( rPoint );
}

/*************************************************************************
|*
|*  SwViewImp::NotifySizeChg()
|*
|*  Ersterstellung      MA 23. Jun. 93
|*  Letzte Aenderung    MA 05. Oct. 98
|*
|*************************************************************************/

void SwViewImp::NotifySizeChg( const Size &rNewSz )
{
    if ( !HasDrawView() )
        return;

    if ( GetPageView() )
        GetPageView()->GetPage()->SetSize( rNewSz );

    //Begrenzung des Arbeitsbereiches.
    Rectangle aRect( Point( DOCUMENTBORDER, DOCUMENTBORDER ), rNewSz );
    const Rectangle &rOldWork = GetDrawView()->GetWorkArea();
    BOOL bCheckDrawObjs = FALSE;
    if ( aRect != rOldWork )
    {
        if ( rOldWork.Bottom() > aRect.Bottom() || rOldWork.Right() > aRect.Right())
            bCheckDrawObjs = TRUE;
        GetDrawView()->SetWorkArea( aRect );
    }
    if ( !bCheckDrawObjs )
        return;

    ASSERT( pSh->GetDoc()->GetDrawModel(), "NotifySizeChg without DrawModel" );
    SdrPage* pPage = pSh->GetDoc()->GetDrawModel()->GetPage( 0 );
    const ULONG nObjs = pPage->GetObjCount();
    for( ULONG nObj = 0; nObj < nObjs; ++nObj )
    {
        SdrObject *pObj = pPage->GetObj( nObj );
        if( !pObj->IsWriterFlyFrame() )
        {
            //Teilfix(26793): Objekte, die in Rahmen verankert sind, brauchen
            //nicht angepasst werden.
            const SwContact *pCont = (SwContact*)GetUserCall(pObj);
            //JP - 16.3.00 Bug 73920: this function might be called by the
            //              InsertDocument, when a PageDesc-Attribute is
            //              set on a node. Then the SdrObject must not have
            //              an UserCall.
            if( !pCont || !pCont->ISA(SwDrawContact) )
                continue;

            const SwFrm *pAnchor = ((SwDrawContact*)pCont)->GetAnchor();
            if ( !pAnchor || pAnchor->IsInFly() || !pAnchor->IsValid() ||
                 !pAnchor->GetUpper() || !pAnchor->FindPageFrm() ||
                 FLY_IN_CNTNT == pCont->GetFmt()->GetAnchor().GetAnchorId() )
                continue;

            const Rectangle aBound( pObj->GetBoundRect() );
            if ( !aRect.IsInside( aBound ) )
            {
                Size aSz;
                if ( aBound.Left() > aRect.Right() )
                    aSz.Width() = (aRect.Right() - aBound.Left()) - MINFLY;
                if ( aBound.Top() > aRect.Bottom() )
                    aSz.Height() = (aRect.Bottom() - aBound.Top()) - MINFLY;
                if ( aSz.Width() || aSz.Height() )
                    pObj->Move( aSz );

                //Notanker: Grosse Objekte nicht nach oben verschwinden lassen.
                aSz.Width() = aSz.Height() = 0;
                if ( aBound.Bottom() < aRect.Top() )
                    aSz.Width() = (aBound.Bottom() - aRect.Top()) - MINFLY;
                if ( aBound.Right() < aRect.Left() )
                    aSz.Height() = (aBound.Right() - aRect.Left()) - MINFLY;
                if ( aSz.Width() || aSz.Height() )
                    pObj->Move( aSz );
            }
        }
    }
}