sw/source/core/txtnode/atrfld.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: atrfld.cxx,v $
  10  * $Revision: 1.16.190.1 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_sw.hxx"
  33
  34 #include "fldbas.hxx"          // fuer FieldType
  35 #include <fmtfld.hxx>
  36 #include <txtfld.hxx>
  37 #include <docufld.hxx>
  38
  39 #include "reffld.hxx"
  40 #include "ddefld.hxx"
  41 #include "usrfld.hxx"
  42 #include "expfld.hxx"
  43 #include "swfont.hxx"       // fuer GetFldsColor
  44 #include "ndtxt.hxx"        // SwTxtNode
  45 #include "calc.hxx"         // Update fuer UserFields
  46 #include "hints.hxx"
  47 #include <IDocumentFieldsAccess.hxx>
  48
  49 #include <svtools/smplhint.hxx>
  50
  51 TYPEINIT3( SwFmtFld, SfxPoolItem, SwClient,SfxBroadcaster)
  52 TYPEINIT1(SwFmtFldHint, SfxHint);
  53
  54 /****************************************************************************
  55  *
  56  *  class SwFmtFld
  57  *
  58  ****************************************************************************/
  59
  60     // Konstruktor fuers Default vom Attribut-Pool
  61 SwFmtFld::SwFmtFld()
  62     : SfxPoolItem( RES_TXTATR_FIELD ),
  63     SwClient( 0 ),
  64     pField( 0 ),
  65     pTxtAttr( 0 )
  66 {
  67 }
  68
  69 SwFmtFld::SwFmtFld( const SwField &rFld )
  70     : SfxPoolItem( RES_TXTATR_FIELD ),
  71     SwClient( rFld.GetTyp() ),
  72     pTxtAttr( 0 )
  73 {
  74     pField = rFld.Copy();
  75 }
  76
  77 // #i24434#
  78 // Since Items are used in ItemPool and in default constructed ItemSets with
  79 // full pool range, all items need to be clonable. Thus, this one needed to be
  80 // corrected
  81 SwFmtFld::SwFmtFld( const SwFmtFld& rAttr )
  82     : SfxPoolItem( RES_TXTATR_FIELD ), SwClient(), SfxBroadcaster(),
  83     pField( 0 ),
  84     pTxtAttr( 0 )
  85 {
  86     if(rAttr.GetFld())
  87     {
  88         rAttr.GetFld()->GetTyp()->Add(this);
  89         pField = rAttr.GetFld()->Copy();
  90     }
  91 }
  92
  93 SwFmtFld::~SwFmtFld()
  94 {
  95     SwFieldType* pType = pField ? pField->GetTyp() : 0;
  96
  97     if (pType && pType->Which() == RES_DBFLD)
  98         pType = 0;      // DB-Feldtypen zerstoeren sich selbst
  99
 100     Broadcast( SwFmtFldHint( this, SWFMTFLD_REMOVED ) );
 101     delete pField;
 102
 103     // bei einige FeldTypen muessen wir den FeldTypen noch loeschen
 104     if( pType && pType->IsLastDepend() )
 105     {
 106         BOOL bDel = FALSE;
 107         switch( pType->Which() )
 108         {
 109         case RES_USERFLD:
 110             bDel = ((SwUserFieldType*)pType)->IsDeleted();
 111             break;
 112
 113         case RES_SETEXPFLD:
 114             bDel = ((SwSetExpFieldType*)pType)->IsDeleted();
 115             break;
 116
 117         case RES_DDEFLD:
 118             bDel = ((SwDDEFieldType*)pType)->IsDeleted();
 119             break;
 120         }
 121
 122         if( bDel )
 123         {
 124             // vorm loeschen erstmal austragen
 125             pType->Remove( this );
 126             delete pType;
 127         }
 128     }
 129 }
 130
 131 // #111840#
 132 void SwFmtFld::SetFld(SwField * _pField)
 133 {
 134     if (NULL != pField)
 135         delete pField;
 136
 137     pField = _pField;
 138     Broadcast( SwFmtFldHint( this, SWFMTFLD_CHANGED ) );
 139 }
 140
 141 int SwFmtFld::operator==( const SfxPoolItem& rAttr ) const
 142 {
 143     ASSERT( SfxPoolItem::operator==( rAttr ), "keine gleichen Attribute" );
 144     // OD 2004-05-14 #i29146# - correction: check, if <pField> and
 145     // <((SwFmtFld&)rAttr).GetFld()> are set.
 146     // OD 2004-05-14 #i29146# - items are equal, if both fields aren't set.
 147     return ( pField && ((SwFmtFld&)rAttr).GetFld() &&
 148              pField->GetTyp() == ((SwFmtFld&)rAttr).GetFld()->GetTyp() &&
 149              pField->GetFormat() == ((SwFmtFld&)rAttr).GetFld()->GetFormat() ) ||
 150            ( !pField && !((SwFmtFld&)rAttr).GetFld() );
 151 }
 152
 153 SfxPoolItem* SwFmtFld::Clone( SfxItemPool* ) const
 154 {
 155     return new SwFmtFld( *this );
 156 }
 157
 158 void SwFmtFld::Modify( SfxPoolItem* pOld, SfxPoolItem* pNew )
 159 {
 160     if( !pTxtAttr )
 161         return;
 162
 163     SwTxtNode* pTxtNd = (SwTxtNode*)&pTxtAttr->GetTxtNode();
 164     ASSERT( pTxtNd, "wo ist denn mein Node?" );
 165     if( pNew )
 166     {
 167         switch( pNew->Which() )
 168         {
 169         case RES_TXTATR_FLDCHG:
 170                 // "Farbe hat sich geaendert !"
 171                 // this, this fuer "nur Painten"
 172                 pTxtNd->Modify( this, this );
 173                 return;
 174         case RES_REFMARKFLD_UPDATE:
 175                 // GetReferenz-Felder aktualisieren
 176                 if( RES_GETREFFLD == GetFld()->GetTyp()->Which() )
 177                 {
 178                     // --> OD 2007-09-06 #i81002#
 179 //                    ((SwGetRefField*)GetFld())->UpdateField();
 180                     dynamic_cast<SwGetRefField*>(GetFld())->UpdateField( pTxtAttr );
 181                     // <--
 182                 }
 183                 break;
 184         case RES_DOCPOS_UPDATE:
 185                 // Je nach DocPos aktualisieren (SwTxtFrm::Modify())
 186                 pTxtNd->Modify( pNew, this );
 187                 return;
 188
 189         case RES_ATTRSET_CHG:
 190         case RES_FMT_CHG:
 191                 pTxtNd->Modify( pOld, pNew );
 192                 return;
 193         }
 194     }
 195
 196     switch (GetFld()->GetTyp()->Which())
 197     {
 198         case RES_HIDDENPARAFLD:
 199             if( !pOld || RES_HIDDENPARA_PRINT != pOld->Which() )
 200                 break;
 201         case RES_DBSETNUMBERFLD:
 202         case RES_DBNUMSETFLD:
 203         case RES_DBNEXTSETFLD:
 204         case RES_DBNAMEFLD:
 205             pTxtNd->Modify( 0, pNew);
 206             return;
 207     }
 208
 209     if( RES_USERFLD == GetFld()->GetTyp()->Which() )
 210     {
 211         SwUserFieldType* pType = (SwUserFieldType*)GetFld()->GetTyp();
 212         if(!pType->IsValid())
 213         {
 214             SwCalc aCalc( *pTxtNd->GetDoc() );
 215             pType->GetValue( aCalc );
 216         }
 217     }
 218     pTxtAttr->Expand();
 219 }
 220
 221 BOOL SwFmtFld::GetInfo( SfxPoolItem& rInfo ) const
 222 {
 223     const SwTxtNode* pTxtNd;
 224     if( RES_AUTOFMT_DOCNODE != rInfo.Which() ||
 225         !pTxtAttr || 0 == ( pTxtNd = pTxtAttr->GetpTxtNode() ) ||
 226         &pTxtNd->GetNodes() != ((SwAutoFmtGetDocNode&)rInfo).pNodes )
 227         return TRUE;
 228
 229     ((SwAutoFmtGetDocNode&)rInfo).pCntntNode = pTxtNd;
 230     return FALSE;
 231 }
 232
 233
 234 BOOL SwFmtFld::IsFldInDoc() const
 235 {
 236     const SwTxtNode* pTxtNd;
 237     return pTxtAttr && 0 != ( pTxtNd = pTxtAttr->GetpTxtNode() ) &&
 238             pTxtNd->GetNodes().IsDocNodes();
 239 }
 240
 241 BOOL SwFmtFld::IsProtect() const
 242 {
 243     const SwTxtNode* pTxtNd;
 244     return pTxtAttr && 0 != ( pTxtNd = pTxtAttr->GetpTxtNode() ) &&
 245             pTxtNd->IsProtect();
 246 }
 247
 248 /*************************************************************************
 249 |*
 250 |*                SwTxtFld::SwTxtFld()
 251 |*
 252 |*    Beschreibung      Attribut fuer automatischen Text, Ctor
 253 |*    Ersterstellung    BP 30.04.92
 254 |*    Letzte Aenderung  JP 15.08.94
 255 |*
 256 *************************************************************************/
 257
 258 SwTxtFld::SwTxtFld( SwFmtFld& rAttr, xub_StrLen nStartPos )
 259     : SwTxtAttr( rAttr, nStartPos )
 260     , m_aExpand( rAttr.GetFld()->Expand() )
 261     , m_pTxtNode( 0 )
 262 {
 263     rAttr.pTxtAttr = this;
 264 }
 265
 266 SwTxtFld::~SwTxtFld( )
 267 {
 268 }
 269
 270 /*************************************************************************
 271 |*
 272 |*                SwTxtFld::Expand()
 273 |*
 274 |*    Beschreibung      exandiert das Feld und tauscht den Text im Node
 275 |*    Ersterstellung    BP 30.04.92
 276 |*    Letzte Aenderung  JP 15.08.94
 277 |*
 278 *************************************************************************/
 279
 280 void SwTxtFld::Expand() const
 281 {
 282     // Wenn das expandierte Feld sich nicht veraendert hat, wird returnt
 283     ASSERT( m_pTxtNode, "SwTxtFld: where is my TxtNode?" );
 284
 285     const SwField* pFld = GetFld().GetFld();
 286     XubString aNewExpand( pFld->Expand() );
 287
 288     if( aNewExpand == m_aExpand )
 289     {
 290         // Bei Seitennummernfeldern
 291         const USHORT nWhich = pFld->GetTyp()->Which();
 292         if( RES_CHAPTERFLD != nWhich && RES_PAGENUMBERFLD != nWhich &&
 293             RES_REFPAGEGETFLD != nWhich &&
 294             // --> FME 2005-05-23 #122919# Page count fields to not use aExpand
 295             // during formatting, therefore an invalidation of the text frame
 296             // has to be triggered even if aNewExpand == aExpand:
 297             ( RES_DOCSTATFLD != nWhich || DS_PAGE != static_cast<const SwDocStatField*>(pFld)->GetSubType() ) &&
 298             // <--
 299             ( RES_GETEXPFLD != nWhich || ((SwGetExpField*)pFld)->IsInBodyTxt() ) )
 300         {
 301             // BP: das muesste man noch optimieren!
 302             //JP 12.06.97: stimmt, man sollte auf jedenfall eine Status-
 303             //                          aenderung an die Frames posten
 304             if( m_pTxtNode->CalcHiddenParaField() )
 305             {
 306                 m_pTxtNode->Modify( 0, 0 );
 307             }
 308             return;
 309         }
 310     }
 311
 312     m_aExpand = aNewExpand;
 313
 314     // 0, this for formatting
 315     m_pTxtNode->Modify( 0, const_cast<SwFmtFld*>( &GetFld() ) );
 316 }
 317
 318 /*************************************************************************
 319  *                      SwTxtFld::CopyFld()
 320  *************************************************************************/
 321
 322 void SwTxtFld::CopyFld( SwTxtFld *pDest ) const
 323 {
 324     ASSERT( m_pTxtNode, "SwTxtFld: where is my TxtNode?" );
 325     ASSERT( pDest->m_pTxtNode, "SwTxtFld: where is pDest's TxtNode?" );
 326
 327     IDocumentFieldsAccess* pIDFA = m_pTxtNode->getIDocumentFieldsAccess();
 328     IDocumentFieldsAccess* pDestIDFA = pDest->m_pTxtNode->getIDocumentFieldsAccess();
 329
 330     SwFmtFld& rFmtFld = (SwFmtFld&)pDest->GetFld();
 331     const USHORT nFldWhich = rFmtFld.GetFld()->GetTyp()->Which();
 332
 333     if( pIDFA != pDestIDFA )
 334     {
 335         // Die Hints stehen in unterschiedlichen Dokumenten,
 336         // der Feldtyp muss im neuen Dokument angemeldet werden.
 337         // Z.B: Kopieren ins ClipBoard.
 338         SwFieldType* pFldType;
 339         if( nFldWhich != RES_DBFLD && nFldWhich != RES_USERFLD &&
 340             nFldWhich != RES_SETEXPFLD && nFldWhich != RES_DDEFLD &&
 341             RES_AUTHORITY != nFldWhich )
 342             pFldType = pDestIDFA->GetSysFldType( nFldWhich );
 343         else
 344             pFldType = pDestIDFA->InsertFldType( *rFmtFld.GetFld()->GetTyp() );
 345
 346         // Sonderbehandlung fuer DDE-Felder
 347         if( RES_DDEFLD == nFldWhich )
 348         {
 349             if( rFmtFld.GetTxtFld() )
 350                 ((SwDDEFieldType*)rFmtFld.GetFld()->GetTyp())->DecRefCnt();
 351             ((SwDDEFieldType*)pFldType)->IncRefCnt();
 352         }
 353
 354         ASSERT( pFldType, "unbekannter FieldType" );
 355         pFldType->Add( &rFmtFld );          // ummelden
 356         rFmtFld.GetFld()->ChgTyp( pFldType );
 357     }
 358
 359     // Expressionfelder Updaten
 360     if( nFldWhich == RES_SETEXPFLD || nFldWhich == RES_GETEXPFLD ||
 361         nFldWhich == RES_HIDDENTXTFLD )
 362     {
 363         SwTxtFld* pFld = (SwTxtFld*)this;
 364         pDestIDFA->UpdateExpFlds( pFld, true );
 365     }
 366     // Tabellenfelder auf externe Darstellung
 367     else if( RES_TABLEFLD == nFldWhich &&
 368         ((SwTblField*)rFmtFld.GetFld())->IsIntrnlName() )
 369     {
 370         // erzeuge aus der internen (fuer CORE) die externe (fuer UI) Formel
 371         const SwTableNode* pTblNd = m_pTxtNode->FindTableNode();
 372         if( pTblNd )            // steht in einer Tabelle
 373             ((SwTblField*)rFmtFld.GetFld())->PtrToBoxNm( &pTblNd->GetTable() );
 374     }
 375 }
 376
 377 /* -----------------26.06.2003 13:54-----------------
 378
 379  --------------------------------------------------*/
 380 void SwTxtFld::NotifyContentChange(SwFmtFld& rFmtFld)
 381 {
 382     //if not in undo section notify the change
 383     if (m_pTxtNode && m_pTxtNode->GetNodes().IsDocNodes())
 384     {
 385         m_pTxtNode->Modify(0, &rFmtFld);
 386     }
 387 }
 388
 389