xref: /aoo42x/main/sc/source/ui/vba/service.cxx (revision cdf0e10c)
1 /*************************************************************************
2  *
3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4  *
5  * Copyright 2000, 2010 Oracle and/or its affiliates.
6  *
7  * OpenOffice.org - a multi-platform office productivity suite
8  *
9  * This file is part of OpenOffice.org.
10  *
11  * OpenOffice.org is free software: you can redistribute it and/or modify
12  * it under the terms of the GNU Lesser General Public License version 3
13  * only, as published by the Free Software Foundation.
14  *
15  * OpenOffice.org is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU Lesser General Public License version 3 for more details
19  * (a copy is included in the LICENSE file that accompanied this code).
20  *
21  * You should have received a copy of the GNU Lesser General Public License
22  * version 3 along with OpenOffice.org.  If not, see
23  * <http://www.openoffice.org/license.html>
24  * for a copy of the LGPLv3 License.
25  *
26  ************************************************************************/
27 #include "cppuhelper/implementationentry.hxx"
28 #include "com/sun/star/lang/XMultiServiceFactory.hpp"
29 #include "com/sun/star/registry/XRegistryKey.hpp"
30 #include "comphelper/servicedecl.hxx"
31 
32 // =============================================================================
33 // component exports
34 // =============================================================================
35 using namespace ::com::sun::star;
36 using namespace ::com::sun::star::uno;
37 
38 namespace sdecl = comphelper::service_decl;
39 
40 // reference service helper(s)
41 namespace  range
42 {
43 extern sdecl::ServiceDecl const serviceDecl;
44 }
45 namespace  workbook
46 {
47 extern sdecl::ServiceDecl const serviceDecl;
48 }
49 namespace  worksheet
50 {
51 extern sdecl::ServiceDecl const serviceDecl;
52 }
53 namespace window
54 {
55 extern sdecl::ServiceDecl const serviceDecl;
56 }
57 namespace globals
58 {
59 extern sdecl::ServiceDecl const serviceDecl;
60 }
61 namespace hyperlink
62 {
63 extern sdecl::ServiceDecl const serviceDecl;
64 }
65 namespace application
66 {
67 extern sdecl::ServiceDecl const serviceDecl;
68 }
69 namespace vbaeventshelper
70 {
71 extern sdecl::ServiceDecl const serviceDecl;
72 }
73 namespace textframe
74 {
75 extern sdecl::ServiceDecl const serviceDecl;
76 }
77 
78 extern "C"
79 {
80     SAL_DLLPUBLIC_EXPORT void SAL_CALL component_getImplementationEnvironment(
81         const sal_Char ** ppEnvTypeName, uno_Environment ** /*ppEnv*/ )
82     {
83 		OSL_TRACE("In component_getImplementationEnv");
84         *ppEnvTypeName = CPPU_CURRENT_LANGUAGE_BINDING_NAME;
85     }
86 
87     SAL_DLLPUBLIC_EXPORT void * SAL_CALL component_getFactory(
88         const sal_Char * pImplName, lang::XMultiServiceFactory * pServiceManager,
89         registry::XRegistryKey * pRegistryKey )
90     {
91 		OSL_TRACE("In component_getFactory for %s", pImplName );
92 	void* pRet =  component_getFactoryHelper(
93         	pImplName, pServiceManager, pRegistryKey, range::serviceDecl, workbook::serviceDecl, worksheet::serviceDecl, globals::serviceDecl, window::serviceDecl, hyperlink::serviceDecl, application::serviceDecl );
94     if( !pRet )
95         pRet = component_getFactoryHelper( pImplName, pServiceManager, pRegistryKey, vbaeventshelper::serviceDecl, textframe::serviceDecl );
96 	OSL_TRACE("Ret is 0x%x", pRet);
97 	return pRet;
98     }
99 }
100