xref: /AOO41X/main/scripting/source/basprov/basmodnode.cxx (revision cdf0e10c4e3984b49a9502b011690b615761d4a3)
1*cdf0e10cSrcweir /*************************************************************************
2*cdf0e10cSrcweir  *
3*cdf0e10cSrcweir  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4*cdf0e10cSrcweir  *
5*cdf0e10cSrcweir  * Copyright 2000, 2010 Oracle and/or its affiliates.
6*cdf0e10cSrcweir  *
7*cdf0e10cSrcweir  * OpenOffice.org - a multi-platform office productivity suite
8*cdf0e10cSrcweir  *
9*cdf0e10cSrcweir  * This file is part of OpenOffice.org.
10*cdf0e10cSrcweir  *
11*cdf0e10cSrcweir  * OpenOffice.org is free software: you can redistribute it and/or modify
12*cdf0e10cSrcweir  * it under the terms of the GNU Lesser General Public License version 3
13*cdf0e10cSrcweir  * only, as published by the Free Software Foundation.
14*cdf0e10cSrcweir  *
15*cdf0e10cSrcweir  * OpenOffice.org is distributed in the hope that it will be useful,
16*cdf0e10cSrcweir  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17*cdf0e10cSrcweir  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18*cdf0e10cSrcweir  * GNU Lesser General Public License version 3 for more details
19*cdf0e10cSrcweir  * (a copy is included in the LICENSE file that accompanied this code).
20*cdf0e10cSrcweir  *
21*cdf0e10cSrcweir  * You should have received a copy of the GNU Lesser General Public License
22*cdf0e10cSrcweir  * version 3 along with OpenOffice.org.  If not, see
23*cdf0e10cSrcweir  * <http://www.openoffice.org/license.html>
24*cdf0e10cSrcweir  * for a copy of the LGPLv3 License.
25*cdf0e10cSrcweir  *
26*cdf0e10cSrcweir  ************************************************************************/
27*cdf0e10cSrcweir 
28*cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove
29*cdf0e10cSrcweir #include "precompiled_scripting.hxx"
30*cdf0e10cSrcweir #include "basmodnode.hxx"
31*cdf0e10cSrcweir #include "basmethnode.hxx"
32*cdf0e10cSrcweir #include <com/sun/star/script/browse/BrowseNodeTypes.hpp>
33*cdf0e10cSrcweir #include <vos/mutex.hxx>
34*cdf0e10cSrcweir #include <vcl/svapp.hxx>
35*cdf0e10cSrcweir #include <basic/sbx.hxx>
36*cdf0e10cSrcweir #include <basic/sbstar.hxx>
37*cdf0e10cSrcweir #include <basic/sbmod.hxx>
38*cdf0e10cSrcweir #include <basic/sbmeth.hxx>
39*cdf0e10cSrcweir 
40*cdf0e10cSrcweir 
41*cdf0e10cSrcweir using namespace ::com::sun::star;
42*cdf0e10cSrcweir using namespace ::com::sun::star::lang;
43*cdf0e10cSrcweir using namespace ::com::sun::star::uno;
44*cdf0e10cSrcweir using namespace ::com::sun::star::script;
45*cdf0e10cSrcweir 
46*cdf0e10cSrcweir 
47*cdf0e10cSrcweir //.........................................................................
48*cdf0e10cSrcweir namespace basprov
49*cdf0e10cSrcweir {
50*cdf0e10cSrcweir //.........................................................................
51*cdf0e10cSrcweir 
52*cdf0e10cSrcweir     // =============================================================================
53*cdf0e10cSrcweir     // BasicModuleNodeImpl
54*cdf0e10cSrcweir     // =============================================================================
55*cdf0e10cSrcweir 
56*cdf0e10cSrcweir     BasicModuleNodeImpl::BasicModuleNodeImpl( const Reference< XComponentContext >& rxContext,
57*cdf0e10cSrcweir         const ::rtl::OUString& sScriptingContext, SbModule* pModule, bool isAppScript )
58*cdf0e10cSrcweir         :m_xContext( rxContext )
59*cdf0e10cSrcweir         ,m_sScriptingContext( sScriptingContext )
60*cdf0e10cSrcweir         ,m_pModule( pModule )
61*cdf0e10cSrcweir         ,m_bIsAppScript( isAppScript )
62*cdf0e10cSrcweir     {
63*cdf0e10cSrcweir     }
64*cdf0e10cSrcweir 
65*cdf0e10cSrcweir     // -----------------------------------------------------------------------------
66*cdf0e10cSrcweir 
67*cdf0e10cSrcweir     BasicModuleNodeImpl::~BasicModuleNodeImpl()
68*cdf0e10cSrcweir     {
69*cdf0e10cSrcweir     }
70*cdf0e10cSrcweir 
71*cdf0e10cSrcweir     // -----------------------------------------------------------------------------
72*cdf0e10cSrcweir     // XBrowseNode
73*cdf0e10cSrcweir     // -----------------------------------------------------------------------------
74*cdf0e10cSrcweir 
75*cdf0e10cSrcweir     ::rtl::OUString BasicModuleNodeImpl::getName(  ) throw (RuntimeException)
76*cdf0e10cSrcweir     {
77*cdf0e10cSrcweir         ::vos::OGuard aGuard( Application::GetSolarMutex() );
78*cdf0e10cSrcweir 
79*cdf0e10cSrcweir         ::rtl::OUString sModuleName;
80*cdf0e10cSrcweir         if ( m_pModule )
81*cdf0e10cSrcweir             sModuleName = m_pModule->GetName();
82*cdf0e10cSrcweir 
83*cdf0e10cSrcweir         return sModuleName;
84*cdf0e10cSrcweir     }
85*cdf0e10cSrcweir 
86*cdf0e10cSrcweir     // -----------------------------------------------------------------------------
87*cdf0e10cSrcweir 
88*cdf0e10cSrcweir     Sequence< Reference< browse::XBrowseNode > > BasicModuleNodeImpl::getChildNodes(  ) throw (RuntimeException)
89*cdf0e10cSrcweir     {
90*cdf0e10cSrcweir         ::vos::OGuard aGuard( Application::GetSolarMutex() );
91*cdf0e10cSrcweir 
92*cdf0e10cSrcweir         Sequence< Reference< browse::XBrowseNode > > aChildNodes;
93*cdf0e10cSrcweir 
94*cdf0e10cSrcweir         if ( m_pModule )
95*cdf0e10cSrcweir         {
96*cdf0e10cSrcweir             SbxArray* pMethods = m_pModule->GetMethods();
97*cdf0e10cSrcweir             if ( pMethods )
98*cdf0e10cSrcweir             {
99*cdf0e10cSrcweir                 sal_Int32 nCount = pMethods->Count();
100*cdf0e10cSrcweir                 sal_Int32 nRealCount = 0;
101*cdf0e10cSrcweir                 for ( sal_Int32 i = 0; i < nCount; ++i )
102*cdf0e10cSrcweir                 {
103*cdf0e10cSrcweir 					SbMethod* pMethod = static_cast< SbMethod* >( pMethods->Get( static_cast< sal_uInt16 >( i ) ) );
104*cdf0e10cSrcweir                     if ( pMethod && !pMethod->IsHidden() )
105*cdf0e10cSrcweir 						++nRealCount;
106*cdf0e10cSrcweir 				}
107*cdf0e10cSrcweir                 aChildNodes.realloc( nRealCount );
108*cdf0e10cSrcweir                 Reference< browse::XBrowseNode >* pChildNodes = aChildNodes.getArray();
109*cdf0e10cSrcweir 
110*cdf0e10cSrcweir 				sal_Int32 iTarget = 0;
111*cdf0e10cSrcweir                 for ( sal_Int32 i = 0; i < nCount; ++i )
112*cdf0e10cSrcweir                 {
113*cdf0e10cSrcweir 					SbMethod* pMethod = static_cast< SbMethod* >( pMethods->Get( static_cast< sal_uInt16 >( i ) ) );
114*cdf0e10cSrcweir                     if ( pMethod && !pMethod->IsHidden() )
115*cdf0e10cSrcweir                         pChildNodes[iTarget++] = static_cast< browse::XBrowseNode* >( new BasicMethodNodeImpl( m_xContext, m_sScriptingContext, pMethod, m_bIsAppScript ) );
116*cdf0e10cSrcweir                 }
117*cdf0e10cSrcweir             }
118*cdf0e10cSrcweir         }
119*cdf0e10cSrcweir 
120*cdf0e10cSrcweir         return aChildNodes;
121*cdf0e10cSrcweir     }
122*cdf0e10cSrcweir 
123*cdf0e10cSrcweir     // -----------------------------------------------------------------------------
124*cdf0e10cSrcweir 
125*cdf0e10cSrcweir     sal_Bool BasicModuleNodeImpl::hasChildNodes(  ) throw (RuntimeException)
126*cdf0e10cSrcweir     {
127*cdf0e10cSrcweir         ::vos::OGuard aGuard( Application::GetSolarMutex() );
128*cdf0e10cSrcweir 
129*cdf0e10cSrcweir         sal_Bool bReturn = sal_False;
130*cdf0e10cSrcweir         if ( m_pModule )
131*cdf0e10cSrcweir         {
132*cdf0e10cSrcweir             SbxArray* pMethods = m_pModule->GetMethods();
133*cdf0e10cSrcweir             if ( pMethods && pMethods->Count() > 0 )
134*cdf0e10cSrcweir                 bReturn = sal_True;
135*cdf0e10cSrcweir         }
136*cdf0e10cSrcweir 
137*cdf0e10cSrcweir         return bReturn;
138*cdf0e10cSrcweir     }
139*cdf0e10cSrcweir 
140*cdf0e10cSrcweir     // -----------------------------------------------------------------------------
141*cdf0e10cSrcweir 
142*cdf0e10cSrcweir     sal_Int16 BasicModuleNodeImpl::getType(  ) throw (RuntimeException)
143*cdf0e10cSrcweir     {
144*cdf0e10cSrcweir         ::vos::OGuard aGuard( Application::GetSolarMutex() );
145*cdf0e10cSrcweir 
146*cdf0e10cSrcweir         return browse::BrowseNodeTypes::CONTAINER;
147*cdf0e10cSrcweir     }
148*cdf0e10cSrcweir 
149*cdf0e10cSrcweir     // -----------------------------------------------------------------------------
150*cdf0e10cSrcweir 
151*cdf0e10cSrcweir //.........................................................................
152*cdf0e10cSrcweir }	// namespace basprov
153*cdf0e10cSrcweir //.........................................................................
154