Fixes #fdo30794 Based on bin/add-modelines script (originally posted in mail 1286706307.1871.1399280959@webmail.messagingengine.com) Signed-off-by: Sebastian Spaeth <Sebastian@SSpaeth.de>
543 lines
17 KiB
C++
543 lines
17 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2000, 2010 Oracle and/or its affiliates.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org 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 version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
// MARKER(update_precomp.py): autogen include statement, do not remove
|
|
#include "precompiled_sc.hxx"
|
|
|
|
// System - Includes -----------------------------------------------------
|
|
|
|
|
|
|
|
#ifndef PCH
|
|
#include "scitems.hxx"
|
|
|
|
#include <svx/pageitem.hxx>
|
|
#include <vcl/virdev.hxx>
|
|
#include <sfx2/linkmgr.hxx>
|
|
#endif
|
|
|
|
// INCLUDE ---------------------------------------------------------------
|
|
|
|
#include "docsh.hxx"
|
|
|
|
#include "stlsheet.hxx"
|
|
#include "stlpool.hxx"
|
|
#include "global.hxx"
|
|
#include "viewdata.hxx"
|
|
#include "tabvwsh.hxx"
|
|
#include "tablink.hxx"
|
|
#include "collect.hxx"
|
|
#include "docoptio.hxx"
|
|
#include "globstr.hrc"
|
|
#include "scmod.hxx"
|
|
|
|
#include "formula/FormulaCompiler.hxx"
|
|
#include "comphelper/processfactory.hxx"
|
|
#include "vcl/msgbox.hxx"
|
|
|
|
#include <com/sun/star/beans/XPropertySet.hpp>
|
|
#include <com/sun/star/container/XNameAccess.hpp>
|
|
#include <com/sun/star/lang/XMultiServiceFactory.hpp>
|
|
#include <com/sun/star/util/XChangesBatch.hpp>
|
|
|
|
using ::com::sun::star::beans::XPropertySet;
|
|
using ::com::sun::star::lang::XMultiServiceFactory;
|
|
using ::com::sun::star::container::XNameAccess;
|
|
using ::com::sun::star::util::XChangesBatch;
|
|
using ::com::sun::star::uno::Any;
|
|
using ::com::sun::star::uno::Exception;
|
|
using ::com::sun::star::uno::Reference;
|
|
using ::com::sun::star::uno::Sequence;
|
|
using ::com::sun::star::uno::UNO_QUERY_THROW;
|
|
using ::rtl::OUString;
|
|
|
|
namespace {
|
|
|
|
struct ScStylePair
|
|
{
|
|
SfxStyleSheetBase *pSource;
|
|
SfxStyleSheetBase *pDest;
|
|
};
|
|
|
|
inline OUString C2U(const char* s)
|
|
{
|
|
return OUString::createFromAscii(s);
|
|
}
|
|
|
|
}
|
|
|
|
// STATIC DATA -----------------------------------------------------------
|
|
|
|
//----------------------------------------------------------------------
|
|
|
|
//
|
|
// Ole
|
|
//
|
|
|
|
void __EXPORT ScDocShell::SetVisArea( const Rectangle & rVisArea )
|
|
{
|
|
// with the SnapVisArea call in SetVisAreaOrSize, it's safe to always
|
|
// use both the size and position of the VisArea
|
|
SetVisAreaOrSize( rVisArea, TRUE );
|
|
}
|
|
|
|
void lcl_SetTopRight( Rectangle& rRect, const Point& rPos )
|
|
{
|
|
Size aSize = rRect.GetSize();
|
|
rRect.Right() = rPos.X();
|
|
rRect.Left() = rPos.X() - aSize.Width() + 1;
|
|
rRect.Top() = rPos.Y();
|
|
rRect.Bottom() = rPos.Y() + aSize.Height() - 1;
|
|
}
|
|
|
|
void ScDocShell::SetVisAreaOrSize( const Rectangle& rVisArea, BOOL bModifyStart )
|
|
{
|
|
BOOL bNegativePage = aDocument.IsNegativePage( aDocument.GetVisibleTab() );
|
|
|
|
Rectangle aArea = rVisArea;
|
|
if (bModifyStart)
|
|
{
|
|
// when loading, don't check for negative values, because the sheet orientation
|
|
// might be set later
|
|
if ( !aDocument.IsImportingXML() )
|
|
{
|
|
if ( ( bNegativePage ? (aArea.Right() > 0) : (aArea.Left() < 0) ) || aArea.Top() < 0 )
|
|
{
|
|
// VisArea start position can't be negative.
|
|
// Move the VisArea, otherwise only the upper left position would
|
|
// be changed in SnapVisArea, and the size would be wrong.
|
|
|
|
Point aNewPos( 0, Max( aArea.Top(), (long) 0 ) );
|
|
if ( bNegativePage )
|
|
{
|
|
aNewPos.X() = Min( aArea.Right(), (long) 0 );
|
|
lcl_SetTopRight( aArea, aNewPos );
|
|
}
|
|
else
|
|
{
|
|
aNewPos.X() = Max( aArea.Left(), (long) 0 );
|
|
aArea.SetPos( aNewPos );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
Rectangle aOldVisArea = SfxObjectShell::GetVisArea();
|
|
if ( bNegativePage )
|
|
lcl_SetTopRight( aArea, aOldVisArea.TopRight() );
|
|
else
|
|
aArea.SetPos( aOldVisArea.TopLeft() );
|
|
}
|
|
|
|
// hier Position anpassen!
|
|
|
|
// #92248# when loading an ole object, the VisArea is set from the document's
|
|
// view settings and must be used as-is (document content may not be complete yet).
|
|
if ( !aDocument.IsImportingXML() )
|
|
aDocument.SnapVisArea( aArea );
|
|
|
|
//TODO/LATER: it's unclear which IPEnv is used here
|
|
/*
|
|
SvInPlaceEnvironment* pEnv = GetIPEnv();
|
|
if (pEnv)
|
|
{
|
|
Window* pWin = pEnv->GetEditWin();
|
|
pEnv->MakeScale( aArea.GetSize(), MAP_100TH_MM,
|
|
pWin->LogicToPixel( aArea.GetSize() ) );
|
|
} */
|
|
|
|
//TODO/LATER: formerly in SvInplaceObject
|
|
SfxObjectShell::SetVisArea( aArea );
|
|
|
|
if (bIsInplace) // Zoom in der InPlace View einstellen
|
|
{
|
|
ScTabViewShell* pViewSh = ScTabViewShell::GetActiveViewShell();
|
|
if (pViewSh)
|
|
{
|
|
if (pViewSh->GetViewData()->GetDocShell() == this)
|
|
pViewSh->UpdateOleZoom();
|
|
}
|
|
}
|
|
|
|
if (aDocument.IsEmbedded())
|
|
{
|
|
ScRange aOld;
|
|
aDocument.GetEmbedded( aOld);
|
|
aDocument.SetEmbedded( aArea );
|
|
ScRange aNew;
|
|
aDocument.GetEmbedded( aNew);
|
|
if (aOld != aNew)
|
|
PostPaint(0,0,0,MAXCOL,MAXROW,MAXTAB,PAINT_GRID);
|
|
|
|
//TODO/LATER: currently not implemented
|
|
//ViewChanged( ASPECT_CONTENT ); // auch im Container anzeigen
|
|
}
|
|
}
|
|
|
|
BOOL ScDocShell::IsOle()
|
|
{
|
|
return (GetCreateMode() == SFX_CREATE_MODE_EMBEDDED);
|
|
}
|
|
|
|
void ScDocShell::UpdateOle( const ScViewData* pViewData, BOOL bSnapSize )
|
|
{
|
|
// wenn's gar nicht Ole ist, kann man sich die Berechnungen sparen
|
|
// (VisArea wird dann beim Save wieder zurueckgesetzt)
|
|
|
|
if (GetCreateMode() == SFX_CREATE_MODE_STANDARD)
|
|
return;
|
|
|
|
DBG_ASSERT(pViewData,"pViewData==0 bei ScDocShell::UpdateOle");
|
|
|
|
Rectangle aOldArea = SfxObjectShell::GetVisArea();
|
|
Rectangle aNewArea = aOldArea;
|
|
|
|
BOOL bChange = FALSE;
|
|
BOOL bEmbedded = aDocument.IsEmbedded();
|
|
if (bEmbedded)
|
|
aNewArea = aDocument.GetEmbeddedRect();
|
|
else
|
|
{
|
|
SCTAB nTab = pViewData->GetTabNo();
|
|
if ( nTab != aDocument.GetVisibleTab() )
|
|
{
|
|
aDocument.SetVisibleTab( nTab );
|
|
bChange = TRUE;
|
|
}
|
|
|
|
BOOL bNegativePage = aDocument.IsNegativePage( nTab );
|
|
SCCOL nX = pViewData->GetPosX(SC_SPLIT_LEFT);
|
|
SCROW nY = pViewData->GetPosY(SC_SPLIT_BOTTOM);
|
|
Rectangle aMMRect = aDocument.GetMMRect( nX,nY, nX,nY, nTab );
|
|
if (bNegativePage)
|
|
lcl_SetTopRight( aNewArea, aMMRect.TopRight() );
|
|
else
|
|
aNewArea.SetPos( aMMRect.TopLeft() );
|
|
if (bSnapSize)
|
|
aDocument.SnapVisArea(aNewArea); // uses the new VisibleTab
|
|
}
|
|
|
|
if (aNewArea != aOldArea)
|
|
{
|
|
SetVisAreaOrSize( aNewArea, TRUE ); // hier muss auch der Start angepasst werden
|
|
bChange = TRUE;
|
|
}
|
|
}
|
|
|
|
//
|
|
// Style-Krempel fuer Organizer etc.
|
|
//
|
|
|
|
SfxStyleSheetBasePool* __EXPORT ScDocShell::GetStyleSheetPool()
|
|
{
|
|
return (SfxStyleSheetBasePool*)aDocument.GetStyleSheetPool();
|
|
}
|
|
|
|
|
|
// nach dem Laden von Vorlagen aus einem anderen Dokment (LoadStyles, Insert)
|
|
// muessen die SetItems (ATTR_PAGE_HEADERSET, ATTR_PAGE_FOOTERSET) auf den richtigen
|
|
// Pool umgesetzt werden, bevor der Quell-Pool geloescht wird.
|
|
|
|
void lcl_AdjustPool( SfxStyleSheetBasePool* pStylePool )
|
|
{
|
|
pStylePool->SetSearchMask(SFX_STYLE_FAMILY_PAGE, 0xffff);
|
|
SfxStyleSheetBase *pStyle = pStylePool->First();
|
|
while ( pStyle )
|
|
{
|
|
SfxItemSet& rStyleSet = pStyle->GetItemSet();
|
|
|
|
const SfxPoolItem* pItem;
|
|
if (rStyleSet.GetItemState(ATTR_PAGE_HEADERSET,FALSE,&pItem) == SFX_ITEM_SET)
|
|
{
|
|
SfxItemSet& rSrcSet = ((SvxSetItem*)pItem)->GetItemSet();
|
|
SfxItemSet* pDestSet = new SfxItemSet(*rStyleSet.GetPool(),rSrcSet.GetRanges());
|
|
pDestSet->Put(rSrcSet);
|
|
rStyleSet.Put(SvxSetItem(ATTR_PAGE_HEADERSET,pDestSet));
|
|
}
|
|
if (rStyleSet.GetItemState(ATTR_PAGE_FOOTERSET,FALSE,&pItem) == SFX_ITEM_SET)
|
|
{
|
|
SfxItemSet& rSrcSet = ((SvxSetItem*)pItem)->GetItemSet();
|
|
SfxItemSet* pDestSet = new SfxItemSet(*rStyleSet.GetPool(),rSrcSet.GetRanges());
|
|
pDestSet->Put(rSrcSet);
|
|
rStyleSet.Put(SvxSetItem(ATTR_PAGE_FOOTERSET,pDestSet));
|
|
}
|
|
|
|
pStyle = pStylePool->Next();
|
|
}
|
|
}
|
|
|
|
void __EXPORT ScDocShell::LoadStyles( SfxObjectShell &rSource )
|
|
{
|
|
aDocument.StylesToNames();
|
|
|
|
SfxObjectShell::LoadStyles(rSource);
|
|
lcl_AdjustPool( GetStyleSheetPool() ); // SetItems anpassen
|
|
|
|
aDocument.UpdStlShtPtrsFrmNms();
|
|
|
|
UpdateAllRowHeights();
|
|
|
|
// Paint
|
|
|
|
PostPaint( 0,0,0, MAXCOL,MAXROW,MAXTAB, PAINT_GRID | PAINT_LEFT );
|
|
}
|
|
|
|
void ScDocShell::LoadStylesArgs( ScDocShell& rSource, BOOL bReplace, BOOL bCellStyles, BOOL bPageStyles )
|
|
{
|
|
// similar to LoadStyles, but with selectable behavior for XStyleLoader::loadStylesFromURL call
|
|
|
|
if ( !bCellStyles && !bPageStyles ) // nothing to do
|
|
return;
|
|
|
|
ScStyleSheetPool* pSourcePool = rSource.GetDocument()->GetStyleSheetPool();
|
|
ScStyleSheetPool* pDestPool = aDocument.GetStyleSheetPool();
|
|
|
|
SfxStyleFamily eFamily = bCellStyles ?
|
|
( bPageStyles ? SFX_STYLE_FAMILY_ALL : SFX_STYLE_FAMILY_PARA ) :
|
|
SFX_STYLE_FAMILY_PAGE;
|
|
SfxStyleSheetIterator aIter( pSourcePool, eFamily );
|
|
USHORT nSourceCount = aIter.Count();
|
|
if ( nSourceCount == 0 )
|
|
return; // no source styles
|
|
|
|
ScStylePair* pStyles = new ScStylePair[ nSourceCount ];
|
|
USHORT nFound = 0;
|
|
|
|
// first create all new styles
|
|
|
|
SfxStyleSheetBase* pSourceStyle = aIter.First();
|
|
while (pSourceStyle)
|
|
{
|
|
String aName = pSourceStyle->GetName();
|
|
SfxStyleSheetBase* pDestStyle = pDestPool->Find( pSourceStyle->GetName(), pSourceStyle->GetFamily() );
|
|
if ( pDestStyle )
|
|
{
|
|
// touch existing styles only if replace flag is set
|
|
if ( bReplace )
|
|
{
|
|
pStyles[nFound].pSource = pSourceStyle;
|
|
pStyles[nFound].pDest = pDestStyle;
|
|
++nFound;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
pStyles[nFound].pSource = pSourceStyle;
|
|
pStyles[nFound].pDest = &pDestPool->Make( aName, pSourceStyle->GetFamily(), pSourceStyle->GetMask() );
|
|
++nFound;
|
|
}
|
|
|
|
pSourceStyle = aIter.Next();
|
|
}
|
|
|
|
// then copy contents (after inserting all styles, for parent etc.)
|
|
|
|
for ( USHORT i = 0; i < nFound; ++i )
|
|
{
|
|
pStyles[i].pDest->GetItemSet().PutExtended(
|
|
pStyles[i].pSource->GetItemSet(), SFX_ITEM_DONTCARE, SFX_ITEM_DEFAULT);
|
|
if(pStyles[i].pSource->HasParentSupport())
|
|
pStyles[i].pDest->SetParent(pStyles[i].pSource->GetParent());
|
|
// follow is never used
|
|
}
|
|
|
|
lcl_AdjustPool( GetStyleSheetPool() ); // adjust SetItems
|
|
UpdateAllRowHeights();
|
|
PostPaint( 0,0,0, MAXCOL,MAXROW,MAXTAB, PAINT_GRID | PAINT_LEFT ); // Paint
|
|
|
|
delete[] pStyles;
|
|
}
|
|
|
|
|
|
BOOL __EXPORT ScDocShell::Insert( SfxObjectShell &rSource,
|
|
USHORT nSourceIdx1, USHORT nSourceIdx2, USHORT nSourceIdx3,
|
|
USHORT &nIdx1, USHORT &nIdx2, USHORT &nIdx3, USHORT &rIdxDeleted )
|
|
{
|
|
BOOL bRet = SfxObjectShell::Insert( rSource, nSourceIdx1, nSourceIdx2, nSourceIdx3,
|
|
nIdx1, nIdx2, nIdx3, rIdxDeleted );
|
|
if (bRet)
|
|
lcl_AdjustPool( GetStyleSheetPool() ); // SetItems anpassen
|
|
|
|
return bRet;
|
|
}
|
|
|
|
void ScDocShell::ReconnectDdeLink(SfxObjectShell& rServer)
|
|
{
|
|
::sfx2::LinkManager* pLinkManager = aDocument.GetLinkManager();
|
|
if (!pLinkManager)
|
|
return;
|
|
|
|
pLinkManager->ReconnectDdeLink(rServer);
|
|
}
|
|
|
|
void ScDocShell::UpdateLinks()
|
|
{
|
|
sfx2::LinkManager* pLinkManager = aDocument.GetLinkManager();
|
|
ScStrCollection aNames;
|
|
|
|
// nicht mehr benutzte Links raus
|
|
|
|
USHORT nCount = pLinkManager->GetLinks().Count();
|
|
for (USHORT k=nCount; k>0; )
|
|
{
|
|
--k;
|
|
::sfx2::SvBaseLink* pBase = *pLinkManager->GetLinks()[k];
|
|
if (pBase->ISA(ScTableLink))
|
|
{
|
|
ScTableLink* pTabLink = (ScTableLink*)pBase;
|
|
if (pTabLink->IsUsed())
|
|
{
|
|
StrData* pData = new StrData(pTabLink->GetFileName());
|
|
if (!aNames.Insert(pData))
|
|
delete pData;
|
|
}
|
|
else // nicht mehr benutzt -> loeschen
|
|
{
|
|
pTabLink->SetAddUndo(TRUE);
|
|
pLinkManager->Remove(k);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
// neue Links eintragen
|
|
|
|
SCTAB nTabCount = aDocument.GetTableCount();
|
|
for (SCTAB i=0; i<nTabCount; i++)
|
|
if (aDocument.IsLinked(i))
|
|
{
|
|
String aDocName = aDocument.GetLinkDoc(i);
|
|
String aFltName = aDocument.GetLinkFlt(i);
|
|
String aOptions = aDocument.GetLinkOpt(i);
|
|
ULONG nRefresh = aDocument.GetLinkRefreshDelay(i);
|
|
BOOL bThere = FALSE;
|
|
for (SCTAB j=0; j<i && !bThere; j++) // im Dokument mehrfach?
|
|
if (aDocument.IsLinked(j)
|
|
&& aDocument.GetLinkDoc(j) == aDocName
|
|
&& aDocument.GetLinkFlt(j) == aFltName
|
|
&& aDocument.GetLinkOpt(j) == aOptions)
|
|
// Ignore refresh delay in compare, it should be the
|
|
// same for identical links and we don't want dupes
|
|
// if it ain't.
|
|
bThere = TRUE;
|
|
|
|
if (!bThere) // schon als Filter eingetragen?
|
|
{
|
|
StrData* pData = new StrData(aDocName);
|
|
if (!aNames.Insert(pData))
|
|
{
|
|
delete pData;
|
|
bThere = TRUE;
|
|
}
|
|
}
|
|
if (!bThere)
|
|
{
|
|
ScTableLink* pLink = new ScTableLink( this, aDocName, aFltName, aOptions, nRefresh );
|
|
pLink->SetInCreate( TRUE );
|
|
pLinkManager->InsertFileLink( *pLink, OBJECT_CLIENT_FILE, aDocName, &aFltName );
|
|
pLink->Update();
|
|
pLink->SetInCreate( FALSE );
|
|
}
|
|
}
|
|
}
|
|
|
|
BOOL ScDocShell::ReloadTabLinks()
|
|
{
|
|
sfx2::LinkManager* pLinkManager = aDocument.GetLinkManager();
|
|
|
|
BOOL bAny = FALSE;
|
|
USHORT nCount = pLinkManager->GetLinks().Count();
|
|
for (USHORT i=0; i<nCount; i++ )
|
|
{
|
|
::sfx2::SvBaseLink* pBase = *pLinkManager->GetLinks()[i];
|
|
if (pBase->ISA(ScTableLink))
|
|
{
|
|
ScTableLink* pTabLink = (ScTableLink*)pBase;
|
|
pTabLink->SetPaint(FALSE); // Paint nur einmal am Ende
|
|
pTabLink->Update();
|
|
pTabLink->SetPaint(TRUE);
|
|
bAny = TRUE;
|
|
}
|
|
}
|
|
|
|
if ( bAny )
|
|
{
|
|
// Paint nur einmal
|
|
PostPaint( ScRange(0,0,0,MAXCOL,MAXROW,MAXTAB),
|
|
PAINT_GRID | PAINT_TOP | PAINT_LEFT );
|
|
|
|
SetDocumentModified();
|
|
}
|
|
|
|
return TRUE; //! Fehler erkennen
|
|
}
|
|
|
|
void ScDocShell::CheckConfigOptions()
|
|
{
|
|
if (IsConfigOptionsChecked())
|
|
// no need to check repeatedly.
|
|
return;
|
|
|
|
OUString aDecSep = ScGlobal::GetpLocaleData()->getNumDecimalSep();
|
|
|
|
ScModule* pScMod = SC_MOD();
|
|
const ScDocOptions& rOpt = pScMod->GetDocOptions();
|
|
OUString aSepArg = rOpt.GetFormulaSepArg();
|
|
OUString aSepArrRow = rOpt.GetFormulaSepArrayRow();
|
|
OUString aSepArrCol = rOpt.GetFormulaSepArrayCol();
|
|
|
|
if (aDecSep == aSepArg || aDecSep == aSepArrRow || aDecSep == aSepArrCol)
|
|
{
|
|
// One of arg separators conflicts with the current decimal
|
|
// separator. Reset them to default.
|
|
ScDocOptions aNew = rOpt;
|
|
aNew.ResetFormulaSeparators();
|
|
aDocument.SetDocOptions(aNew);
|
|
pScMod->SetDocOptions(aNew);
|
|
|
|
// Launch a nice warning dialog to let the users know of this change.
|
|
ScTabViewShell* pViewShell = GetBestViewShell();
|
|
if (pViewShell)
|
|
{
|
|
Window* pParent = pViewShell->GetFrameWin();
|
|
InfoBox aBox(pParent, ScGlobal::GetRscString(STR_OPTIONS_WARN_SEPARATORS));
|
|
aBox.Execute();
|
|
}
|
|
|
|
// For now, this is the only option setting that could launch info
|
|
// dialog. But in the future we may want to implement a nicer
|
|
// dialog to display a list of warnings in case we have several
|
|
// pieces of information to display.
|
|
}
|
|
|
|
SetConfigOptionsChecked(true);
|
|
}
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|