sc/source/core/tool/addinlis.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: addinlis.cxx,v $
  10  * $Revision: 1.6 $
  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_sc.hxx"
  33
  34
  35
  36 #include <tools/debug.hxx>
  37 #include <sfx2/objsh.hxx>
  38
  39
  40 #include "addinlis.hxx"
  41 #include "miscuno.hxx"          // SC_IMPL_SERVICE_INFO
  42 #include "document.hxx"
  43 #include "brdcst.hxx"
  44 #include "unoguard.hxx"
  45 #include "sc.hrc"
  46
  47 using namespace com::sun::star;
  48
  49 //------------------------------------------------------------------------
  50
  51 //SMART_UNO_IMPLEMENTATION( ScAddInListener, UsrObject );
  52
  53 SC_SIMPLE_SERVICE_INFO( ScAddInListener, "ScAddInListener", "stardiv.one.sheet.AddInListener" )
  54
  55 //------------------------------------------------------------------------
  56
  57 List ScAddInListener::aAllListeners;
  58
  59 //------------------------------------------------------------------------
  60
  61 //      static
  62 ScAddInListener* ScAddInListener::CreateListener(
  63                         uno::Reference<sheet::XVolatileResult> xVR, ScDocument* pDoc )
  64 {
  65     ScAddInListener* pNew = new ScAddInListener( xVR, pDoc );
  66
  67     pNew->acquire();                                                            // for aAllListeners
  68     aAllListeners.Insert( pNew, LIST_APPEND );
  69
  70     if ( xVR.is() )
  71         xVR->addResultListener( pNew );                         // after at least 1 ref exists!
  72
  73     return pNew;
  74 }
  75
  76 ScAddInListener::ScAddInListener( uno::Reference<sheet::XVolatileResult> xVR, ScDocument* pDoc ) :
  77     xVolRes( xVR )
  78 {
  79     pDocs = new ScAddInDocs( 1, 1 );
  80     pDocs->Insert( pDoc );
  81 }
  82
  83 ScAddInListener::~ScAddInListener()
  84 {
  85     delete pDocs;
  86 }
  87
  88 // static
  89 ScAddInListener* ScAddInListener::Get( uno::Reference<sheet::XVolatileResult> xVR )
  90 {
  91     sheet::XVolatileResult* pComp = xVR.get();
  92
  93     ULONG nCount = aAllListeners.Count();
  94     for (ULONG nPos=0; nPos<nCount; nPos++)
  95     {
  96         ScAddInListener* pLst = (ScAddInListener*)aAllListeners.GetObject(nPos);
  97         if ( pComp == (sheet::XVolatileResult*)pLst->xVolRes.get() )
  98             return pLst;
  99     }
 100     return NULL;                // not found
 101 }
 102
 103 //!     move to some container object?
 104 // static
 105 void ScAddInListener::RemoveDocument( ScDocument* pDocumentP )
 106 {
 107     ULONG nPos = aAllListeners.Count();
 108     while (nPos)
 109     {
 110         //      loop backwards because elements are removed
 111         --nPos;
 112         ScAddInListener* pLst = (ScAddInListener*)aAllListeners.GetObject(nPos);
 113         ScAddInDocs* p = pLst->pDocs;
 114         USHORT nFoundPos;
 115         if ( p->Seek_Entry( pDocumentP, &nFoundPos ) )
 116         {
 117             p->Remove( nFoundPos );
 118             if ( p->Count() == 0 )
 119             {
 120                 // this AddIn is no longer used
 121                 //      dont delete, just remove the ref for the list
 122
 123                 aAllListeners.Remove( nPos );
 124
 125                 if ( pLst->xVolRes.is() )
 126                     pLst->xVolRes->removeResultListener( pLst );
 127
 128                 pLst->release();        // Ref for aAllListeners - pLst may be deleted here
 129             }
 130         }
 131     }
 132 }
 133
 134 //------------------------------------------------------------------------
 135
 136 // XResultListener
 137
 138 void SAL_CALL ScAddInListener::modified( const ::com::sun::star::sheet::ResultEvent& aEvent )
 139                                 throw(::com::sun::star::uno::RuntimeException)
 140 {
 141     ScUnoGuard aGuard;                  //! or generate a UserEvent
 142
 143     aResult = aEvent.Value;             // store result
 144
 145     if ( !HasListeners() )
 146     {
 147         //!     remove from list and removeListener, as in RemoveDocument ???
 148
 149 #if 0
 150         //!     this will crash if called before first StartListening !!!
 151         aAllListeners.Remove( this );
 152         if ( xVolRes.is() )
 153             xVolRes->removeResultListener( this );
 154         release();      // Ref for aAllListeners - this may be deleted here
 155         return;
 156 #endif
 157     }
 158
 159     //  notify document of changes
 160
 161     Broadcast( ScHint( SC_HINT_DATACHANGED, ScAddress(), NULL ) );
 162
 163     const ScDocument** ppDoc = (const ScDocument**) pDocs->GetData();
 164     USHORT nCount = pDocs->Count();
 165     for ( USHORT j=0; j<nCount; j++, ppDoc++ )
 166     {
 167         ScDocument* pDoc = (ScDocument*)*ppDoc;
 168         pDoc->TrackFormulas();
 169         pDoc->GetDocumentShell()->Broadcast( SfxSimpleHint( FID_DATACHANGED ) );
 170         pDoc->ResetChanged( ScRange(0,0,0,MAXCOL,MAXROW,MAXTAB) );
 171     }
 172 }
 173
 174 // XEventListener
 175
 176 void SAL_CALL ScAddInListener::disposing( const ::com::sun::star::lang::EventObject& /* Source */ )
 177                                 throw(::com::sun::star::uno::RuntimeException)
 178 {
 179     // hold a ref so this is not deleted at removeResultListener
 180     uno::Reference<sheet::XResultListener> xRef( this );
 181
 182     if ( xVolRes.is() )
 183     {
 184         xVolRes->removeResultListener( this );
 185         xVolRes = NULL;
 186     }
 187 }
 188
 189
 190 //------------------------------------------------------------------------
 191
 192
 193