Files
libreoffice/sw/source/core/edit/edattr.cxx

695 lines
21 KiB
C++

/*************************************************************************
*
* $RCSfile: edattr.cxx,v $
*
* $Revision: 1.23 $
*
* last change: $Author: fme $ $Date: 2002-05-30 15:06:16 $
*
* 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 _HINTIDS_HXX
#include <hintids.hxx>
#endif
#ifndef _SVX_TSTPITEM_HXX //autogen
#include <svx/tstpitem.hxx>
#endif
#ifndef _SVX_LRSPITEM_HXX //autogen
#include <svx/lrspitem.hxx>
#endif
#ifndef _SVX_SCRIPTTYPEITEM_HXX
#include <svx/scripttypeitem.hxx>
#endif
#ifndef _COM_SUN_STAR_I18N_SCRIPTTYPE_HDL_
#include <com/sun/star/i18n/ScriptType.hdl>
#endif
#ifndef _TXATBASE_HXX //autogen
#include <txatbase.hxx>
#endif
#ifndef _TXTFTN_HXX //autogen
#include <txtftn.hxx>
#endif
#ifndef _FMTFTN_HXX //autogen
#include <fmtftn.hxx>
#endif
#ifndef _EDITSH_HXX
#include <editsh.hxx>
#endif
#ifndef _EDIMP_HXX
#include <edimp.hxx> // fuer MACROS
#endif
#ifndef _SWUNDO_HXX
#include <swundo.hxx> // fuer UNDO-Ids
#endif
#ifndef _NDTXT_HXX
#include <ndtxt.hxx>
#endif
#ifndef _FTNIDX_HXX
#include <ftnidx.hxx>
#endif
#ifndef _EXPFLD_HXX
#include <expfld.hxx>
#endif
#ifndef _DOC_HXX
#include <doc.hxx>
#endif
#ifndef _ROOTFRM_HXX
#include <rootfrm.hxx>
#endif
#ifndef _PAM_HXX
#include <pam.hxx>
#endif
#ifndef _CNTFRM_HXX
#include <cntfrm.hxx>
#endif
#ifndef _BREAKIT_HXX
#include <breakit.hxx>
#endif
#ifndef _TXTFLD_HXX
#include <txtfld.hxx>
#endif
#ifndef _FMTFLD_HXX
#include <fmtfld.hxx>
#endif
#ifndef _CRSSKIP_HXX
#include <crsskip.hxx>
#endif
#ifndef _TXTFRM_HXX
#include <txtfrm.hxx> // SwTxtFrm
#endif
#ifndef _DRAWFONT_HXX
#include <drawfont.hxx>
#endif
using namespace ::com::sun::star::i18n;
/*************************************
* harte Formatierung (Attribute)
*************************************/
// wenn Selektion groesser Max Nodes oder mehr als Max Selektionen
// => keine Attribute
static const USHORT nMaxLookup = 255;
BOOL SwEditShell::GetAttr( SfxItemSet& rSet ) const
{
if( GetCrsrCnt() > nMaxLookup )
{
rSet.InvalidateAllItems();
return FALSE;
}
SfxItemSet aSet( *rSet.GetPool(), rSet.GetRanges() );
SfxItemSet *pSet = &rSet;
FOREACHPAM_START(this)
ULONG nSttNd = PCURCRSR->GetMark()->nNode.GetIndex(),
nEndNd = PCURCRSR->GetPoint()->nNode.GetIndex();
xub_StrLen nSttCnt = PCURCRSR->GetMark()->nContent.GetIndex(),
nEndCnt = PCURCRSR->GetPoint()->nContent.GetIndex();
if( nSttNd > nEndNd || ( nSttNd == nEndNd && nSttCnt > nEndCnt ))
{
ULONG nTmp = nSttNd; nSttNd = nEndNd; nEndNd = nTmp;
nTmp = nSttCnt; nSttCnt = nEndCnt; nEndCnt = (xub_StrLen)nTmp;
}
if( nEndNd - nSttNd >= nMaxLookup )
{
rSet.ClearItem();
rSet.InvalidateAllItems();
return FALSE;
}
// beim 1.Node traegt der Node die Werte in den GetSet ein (Initial)
// alle weiteren Nodes werden zum GetSet zu gemergt
for( ULONG n = nSttNd; n <= nEndNd; ++n )
{
SwNode* pNd = GetDoc()->GetNodes()[ n ];
switch( pNd->GetNodeType() )
{
case ND_TEXTNODE:
{
xub_StrLen nStt = n == nSttNd ? nSttCnt : 0,
nEnd = n == nEndNd ? nEndCnt
: ((SwTxtNode*)pNd)->GetTxt().Len();
((SwTxtNode*)pNd)->GetAttr( *pSet, nStt, nEnd );
}
break;
case ND_GRFNODE:
case ND_OLENODE:
((SwCntntNode*)pNd)->GetAttr( *pSet );
break;
default:
pNd = 0;
}
if( pNd )
{
if( pSet != &rSet )
rSet.MergeValues( aSet );
if( aSet.Count() )
aSet.ClearItem();
#ifdef JP_NEWCORE
// vieleicht sollte man hier noch erfragen, ob schon alle Attribute
// "DontCare" sind. Dann kann man abbrechen!
#endif
}
pSet = &aSet;
}
FOREACHPAM_END()
return TRUE;
}
BOOL lcl_GetFmtColl( const SwNodePtr& rpNd, void* pArgs )
{
if( rpNd->IsTxtNode() )
{
SwFmtColl** ppColl = (SwFmtColl**)pArgs;
if( !*ppColl )
*ppColl = ((SwTxtNode*)rpNd)->GetTxtColl();
else if( *ppColl == ((SwTxtNode*)rpNd)->GetTxtColl() )
return FALSE;
}
return TRUE;
}
SwTxtFmtColl* SwEditShell::GetCurTxtFmtColl() const
{
SwTxtFmtColl *pFmt = 0;
if ( GetCrsrCnt() > nMaxLookup )
return 0;
FOREACHPAM_START(this)
ULONG nSttNd = PCURCRSR->GetMark()->nNode.GetIndex(),
nEndNd = PCURCRSR->GetPoint()->nNode.GetIndex();
xub_StrLen nSttCnt = PCURCRSR->GetMark()->nContent.GetIndex(),
nEndCnt = PCURCRSR->GetPoint()->nContent.GetIndex();
if( nSttNd > nEndNd || ( nSttNd == nEndNd && nSttCnt > nEndCnt ))
{
ULONG nTmp = nSttNd; nSttNd = nEndNd; nEndNd = nTmp;
nTmp = nSttCnt; nSttCnt = nEndCnt; nEndCnt = (xub_StrLen)nTmp;
}
if( nEndNd - nSttNd >= nMaxLookup )
{
pFmt = 0;
break;
}
for( ULONG n = nSttNd; n <= nEndNd; ++n )
{
SwNode* pNd = GetDoc()->GetNodes()[ n ];
if( pNd->IsTxtNode() )
{
if( !pFmt )
pFmt = ((SwTxtNode*)pNd)->GetTxtColl();
else if( pFmt == ((SwTxtNode*)pNd)->GetTxtColl() ) // ???
break;
}
}
FOREACHPAM_END()
return pFmt;
}
BOOL SwEditShell::GetCurFtn( SwFmtFtn* pFillFtn )
{
// der Cursor muss auf dem akt. Fussnoten-Anker stehen:
SwPaM* pCrsr = GetCrsr();
SwTxtNode* pTxtNd = pCrsr->GetNode()->GetTxtNode();
if( !pTxtNd )
return FALSE;
SwTxtAttr *pFtn = pTxtNd->GetTxtAttr( pCrsr->GetPoint()->nContent,
RES_TXTATR_FTN );
if( pFtn && pFillFtn )
{
// Daten vom Attribut uebertragen
const SwFmtFtn &rFtn = ((SwTxtFtn*)pFtn)->GetFtn();
pFillFtn->SetNumber( rFtn );
pFillFtn->SetEndNote( rFtn.IsEndNote() );
}
return 0 != pFtn;
}
BOOL SwEditShell::SetCurFtn( const SwFmtFtn& rFillFtn )
{
BOOL bChgd = FALSE;
StartAllAction();
SwPaM* pCrsr = GetCrsr(), *pFirst = pCrsr;
do {
bChgd |= pDoc->SetCurFtn( *pCrsr, rFillFtn.GetNumStr(),
rFillFtn.GetNumber(),
rFillFtn.IsEndNote() );
} while( pFirst != ( pCrsr = (SwPaM*)pCrsr->GetNext() ));
EndAllAction();
return bChgd;
}
/*USHORT SwEditShell::GetFtnCnt( BOOL bEndNotes = FALSE ) const
{
const SwFtnIdxs &rIdxs = pDoc->GetFtnIdxs();
USHORT nCnt = 0;
for ( USHORT i = 0; i < rIdxs.Count(); ++i )
{
const SwFmtFtn &rFtn = rIdxs[i]->GetFtn();
if ( bEndNotes == rFtn.IsEndNote() )
nCnt++;
}
return nCnt;
} */
BOOL SwEditShell::HasFtns( BOOL bEndNotes ) const
{
const SwFtnIdxs &rIdxs = pDoc->GetFtnIdxs();
for ( USHORT i = 0; i < rIdxs.Count(); ++i )
{
const SwFmtFtn &rFtn = rIdxs[i]->GetFtn();
if ( bEndNotes == rFtn.IsEndNote() )
return TRUE;
}
return FALSE;
}
// gebe Liste aller Fussnoten und deren Anfangstexte
USHORT SwEditShell::GetSeqFtnList( SwSeqFldList& rList, BOOL bEndNotes )
{
if( rList.Count() )
rList.Remove( 0, rList.Count() );
USHORT n, nFtnCnt = pDoc->GetFtnIdxs().Count();
SwTxtFtn* pTxtFtn;
for( n = 0; n < nFtnCnt; ++n )
{
pTxtFtn = pDoc->GetFtnIdxs()[ n ];
const SwFmtFtn& rFtn = pTxtFtn->GetFtn();
if ( rFtn.IsEndNote() != bEndNotes )
continue;
SwNodeIndex* pIdx = pTxtFtn->GetStartNode();
if( pIdx )
{
SwNodeIndex aIdx( *pIdx, 1 );
SwTxtNode* pTxtNd = aIdx.GetNode().GetTxtNode();
if( !pTxtNd )
pTxtNd = (SwTxtNode*)pDoc->GetNodes().GoNext( &aIdx );
if( pTxtNd )
{
String sTxt( rFtn.GetViewNumStr( *pDoc ));
if( sTxt.Len() )
sTxt += ' ';
sTxt += pTxtNd->GetExpandTxt( 0, USHRT_MAX, FALSE );
_SeqFldLstElem* pNew = new _SeqFldLstElem( sTxt,
pTxtFtn->GetSeqRefNo() );
while( rList.InsertSort( pNew ) )
pNew->sDlgEntry += ' ';
}
}
}
return rList.Count();
}
// linken Rand ueber Objectleiste einstellen (aenhlich dem Stufen von
// Numerierungen)
BOOL SwEditShell::IsMoveLeftMargin( BOOL bRight, BOOL bModulus ) const
{
BOOL bRet = TRUE;
const SvxTabStopItem& rTabItem = (SvxTabStopItem&)GetDoc()->
GetDefault( RES_PARATR_TABSTOP );
USHORT nDefDist = rTabItem.Count() ? rTabItem[0].GetTabPos() : 1134;
if( !nDefDist )
return FALSE;
FOREACHPAM_START(this)
ULONG nSttNd = PCURCRSR->GetMark()->nNode.GetIndex(),
nEndNd = PCURCRSR->GetPoint()->nNode.GetIndex();
if( nSttNd > nEndNd )
{
ULONG nTmp = nSttNd; nSttNd = nEndNd; nEndNd = nTmp;
}
SwCntntNode* pCNd;
for( ULONG n = nSttNd; bRet && n <= nEndNd; ++n )
if( 0 != ( pCNd = GetDoc()->GetNodes()[ n ]->GetTxtNode() ))
{
const SvxLRSpaceItem& rLS = (SvxLRSpaceItem&)
pCNd->GetAttr( RES_LR_SPACE );
if( bRight )
{
USHORT nNext = rLS.GetTxtLeft() + nDefDist;
if( bModulus )
nNext = ( nNext / nDefDist ) * nDefDist;
SwFrm* pFrm = pCNd->GetFrm();
bRet = pFrm && pFrm->Frm().Width() > ( nNext + MM50 );
}
else if( bModulus )
bRet = 0 != rLS.GetLeft();
else
bRet = nDefDist <= rLS.GetLeft();
}
if( !bRet )
break;
FOREACHPAM_END()
return bRet;
}
void SwEditShell::MoveLeftMargin( BOOL bRight, BOOL bModulus )
{
StartAllAction();
StartUndo( UNDO_START );
SwPaM* pCrsr = GetCrsr();
if( pCrsr->GetNext() != pCrsr ) // Mehrfachselektion ?
{
SwPamRanges aRangeArr( *pCrsr );
SwPaM aPam( *pCrsr->GetPoint() );
for( USHORT n = 0; n < aRangeArr.Count(); ++n )
GetDoc()->MoveLeftMargin( aRangeArr.SetPam( n, aPam ),
bRight, bModulus );
}
else
GetDoc()->MoveLeftMargin( *pCrsr, bRight, bModulus );
EndUndo( UNDO_END );
EndAllAction();
}
inline USHORT lcl_SetScriptFlags( USHORT nType )
{
USHORT nRet;
switch( nType )
{
case ScriptType::LATIN: nRet = SCRIPTTYPE_LATIN; break;
case ScriptType::ASIAN: nRet = SCRIPTTYPE_ASIAN; break;
case ScriptType::COMPLEX: nRet = SCRIPTTYPE_COMPLEX; break;
default: nRet = 0;
}
return nRet;
}
BOOL lcl_IsNoEndTxtAttrAtPos( const SwTxtNode& rTNd, xub_StrLen nPos,
USHORT &rScrpt, BOOL bInSelection )
{
BOOL bRet = FALSE;
const String& rTxt = rTNd.GetTxt();
const SwTxtAttr* pTFld;
if( CH_TXTATR_BREAKWORD == rTxt.GetChar( nPos ) &&
0 != ( pTFld = rTNd.GetTxtAttr( nPos ) ) )
{
bRet = TRUE; // all other then fields can be
// defined as weak-script ?
const SwField* pFld;
String sExp;
if( RES_TXTATR_FIELD == pTFld->Which() &&
0 != (pFld = pTFld->GetFld().GetFld() ) &&
(sExp = pFld->Expand()).Len() )
{
xub_StrLen n, nEnd = sExp.Len();
if( bInSelection )
{
USHORT nScript;
for( n = 0; n < nEnd; n = (xub_StrLen)
pBreakIt->xBreak->endOfScript( sExp, n, nScript ))
{
nScript = pBreakIt->xBreak->getScriptType( sExp, n );
rScrpt |= nScript;
}
}
else
rScrpt |= lcl_SetScriptFlags( pBreakIt->xBreak->
getScriptType( sExp, nEnd-1 ));
}
}
return bRet;
}
const SwScriptInfo* lcl_GetScriptInfo( const SwTxtNode& rTNd )
{
SwClientIter aClientIter( (SwTxtNode&)rTNd );
SwClient* pLast = aClientIter.GoStart();
const SwScriptInfo* pScriptInfo = 0;
while( pLast )
{
if ( pLast->ISA( SwTxtFrm ) )
{
pScriptInfo = ((SwTxtFrm*)pLast)->GetScriptInfo();
if ( pScriptInfo )
{
if ( STRING_LEN != pScriptInfo->GetInvalidity() )
pScriptInfo = 0;
else break;
}
}
pLast = ++aClientIter;
}
return pScriptInfo;
}
// returns the scripttpye of the selection
USHORT SwEditShell::GetScriptType( USHORT nFlags ) const
{
USHORT nRet = 0;
if( pBreakIt->xBreak.is() )
{
FOREACHPAM_START(this)
const SwPosition *pStt = PCURCRSR->Start(),
*pEnd = pStt == PCURCRSR->GetMark()
? PCURCRSR->GetPoint()
: PCURCRSR->GetMark();
if( pStt == pEnd || *pStt == *pEnd )
{
const SwTxtNode* pTNd = pStt->nNode.GetNode().GetTxtNode();
if( pTNd )
{
// try to get SwScriptInfo
const SwScriptInfo* pScriptInfo = lcl_GetScriptInfo( *pTNd );
xub_StrLen nPos = pStt->nContent.GetIndex();
//Task 90448: we need the scripttype of the previous
// position, if no selection exist!
if( nPos )
{
SwIndex aIdx( pStt->nContent );
if( pTNd->GoPrevious( &aIdx, CRSR_SKIP_CHARS ) )
nPos = aIdx.GetIndex();
}
const USHORT nScript = pScriptInfo ?
pScriptInfo->ScriptType( nPos ) :
pBreakIt->xBreak->
getScriptType( pTNd->GetTxt(), nPos );
if( !lcl_IsNoEndTxtAttrAtPos( *pTNd, nPos, nRet, FALSE ))
nRet |= lcl_SetScriptFlags( nScript );
}
}
else
{
ULONG nEndIdx = pEnd->nNode.GetIndex();
SwNodeIndex aIdx( pStt->nNode );
for( ; aIdx.GetIndex() <= nEndIdx; aIdx++ )
if( aIdx.GetNode().IsTxtNode() )
{
const SwTxtNode* pTNd = aIdx.GetNode().GetTxtNode();
const String& rTxt = pTNd->GetTxt();
// try to get SwScriptInfo
const SwScriptInfo* pScriptInfo = lcl_GetScriptInfo( *pTNd );
xub_StrLen nChg = aIdx == pStt->nNode
? pStt->nContent.GetIndex()
: 0,
nEndPos = aIdx == nEndIdx
? pEnd->nContent.GetIndex()
: rTxt.Len(),
nSttPos = nChg;
ASSERT( nEndPos <= rTxt.Len(), "Index outside the range - endless loop!" );
if( nEndPos > rTxt.Len() )
nEndPos = rTxt.Len();
USHORT nScript;
while( nChg < nEndPos )
{
nScript = pScriptInfo ?
pScriptInfo->ScriptType( nChg ) :
pBreakIt->xBreak->getScriptType(
rTxt, nChg );
if( !lcl_IsNoEndTxtAttrAtPos( *pTNd, nChg, nRet, TRUE ) )
nRet |= lcl_SetScriptFlags( nScript );
if( (SCRIPTTYPE_LATIN | SCRIPTTYPE_ASIAN |
SCRIPTTYPE_COMPLEX) == nRet )
break;
xub_StrLen nFldPos = nChg+1;
nChg = pScriptInfo ?
pScriptInfo->NextScriptChg( nChg ) :
(xub_StrLen)pBreakIt->xBreak->endOfScript(
rTxt, nChg, nScript );
nFldPos = rTxt.Search(
CH_TXTATR_BREAKWORD, nFldPos );
if( nFldPos < nChg )
nChg = nFldPos;
}
if( (SCRIPTTYPE_LATIN | SCRIPTTYPE_ASIAN |
SCRIPTTYPE_COMPLEX) == nRet )
break;
}
}
if( (SCRIPTTYPE_LATIN | SCRIPTTYPE_ASIAN |
SCRIPTTYPE_COMPLEX) == nRet )
break;
FOREACHPAM_END()
}
if( !nRet )
nRet = GetScriptTypeOfLanguage( LANGUAGE_SYSTEM );
return nRet;
}
USHORT SwEditShell::GetCurLang() const
{
const SwPaM* pCrsr = GetCrsr();
const SwPosition& rPos = *pCrsr->GetPoint();
const SwTxtNode* pTNd = rPos.nNode.GetNode().GetTxtNode();
USHORT nLang;
if( pTNd )
{
//JP 24.9.2001: if exist no selection, then get the language before
// the current character!
xub_StrLen nPos = rPos.nContent.GetIndex();
if( nPos && !pCrsr->HasMark() )
--nPos;
nLang = pTNd->GetLang( nPos );
}
else
nLang = LANGUAGE_DONTKNOW;
return nLang;
}
USHORT SwEditShell::GetScalingOfSelectedText() const
{
const SwPaM* pCrsr = GetCrsr();
const SwPosition* pStt = pCrsr->Start();
const SwTxtNode* pTNd = pStt->nNode.GetNode().GetTxtNode();
ASSERT( pTNd, "no textnode available" );
USHORT nScaleWidth;
if( pTNd )
{
xub_StrLen nStt = pStt->nContent.GetIndex(), nEnd;
const SwPosition* pEnd = pStt == pCrsr->GetPoint()
? pCrsr->GetMark()
: pCrsr->GetPoint();
if( pStt->nNode == pEnd->nNode )
nEnd = pEnd->nContent.GetIndex();
else
nEnd = pTNd->GetTxt().Len();
nScaleWidth = pTNd->GetScalingOfSelectedText( nStt, nEnd );
}
else
nScaleWidth = 100; // default are no scaling -> 100%
return nScaleWidth;
}