sb118: merged in backout
This commit is contained in:
sb
1042
scripting/source/vbaevents/eventhelper.cxx
Normal file
1042
scripting/source/vbaevents/eventhelper.cxx
Normal file
File diff suppressed because it is too large
Load Diff
93
scripting/source/vbaevents/makefile.mk
Normal file
93
scripting/source/vbaevents/makefile.mk
Normal file
@@ -0,0 +1,93 @@
|
||||
#*************************************************************************
|
||||
#
|
||||
# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
||||
#
|
||||
# Copyright 2008 by Sun Microsystems, Inc.
|
||||
#
|
||||
# OpenOffice.org - a multi-platform office productivity suite
|
||||
#
|
||||
# $RCSfile: makefile.mk,v $
|
||||
#
|
||||
# $Revision: 1.0 $
|
||||
#
|
||||
# This file is part of OpenOffice.org.
|
||||
#
|
||||
# OpenOffice.org is free software: you can redistribute it and/or modify
|
||||
# it under the terms of the GNU Lesser General Public License version 3
|
||||
# only, as published by the Free Software Foundation.
|
||||
#
|
||||
# OpenOffice.org 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 version 3 for more details
|
||||
# (a copy is included in the LICENSE file that accompanied this code).
|
||||
#
|
||||
# You should have received a copy of the GNU Lesser General Public License
|
||||
# version 3 along with OpenOffice.org. If not, see
|
||||
# <http://www.openoffice.org/license.html>
|
||||
# for a copy of the LGPLv3 License.
|
||||
#
|
||||
#*************************************************************************
|
||||
|
||||
PRJ=..$/..
|
||||
|
||||
PRJNAME=scripting
|
||||
TARGET=vbaevents
|
||||
.IF "$(ENABLE_VBA)"!="YES"
|
||||
dummy:
|
||||
@echo "not building vbaevents..."
|
||||
.ENDIF
|
||||
|
||||
VISIBILITY_HIDDEN=TRUE
|
||||
NO_BSYMBOLIC= TRUE
|
||||
ENABLE_EXCEPTIONS=TRUE
|
||||
COMP1TYPELIST=$(TARGET)
|
||||
COMPRDB=$(SOLARBINDIR)$/types.rdb
|
||||
|
||||
# --- Settings -----------------------------------------------------
|
||||
|
||||
.INCLUDE : settings.mk
|
||||
DLLPRE =
|
||||
|
||||
# ------------------------------------------------------------------
|
||||
|
||||
#.INCLUDE : ..$/cppumaker.mk
|
||||
|
||||
SLOFILES= \
|
||||
$(SLO)$/service.obj \
|
||||
$(SLO)$/eventhelper.obj
|
||||
|
||||
SHL1TARGET= $(TARGET)$(DLLPOSTFIX).uno
|
||||
SHL1IMPLIB= i$(TARGET)
|
||||
|
||||
SHL1VERSIONMAP=$(SOLARENV)/src/component.map
|
||||
SHL1DEF=$(MISC)$/$(SHL1TARGET).def
|
||||
DEF1NAME=$(SHL1TARGET)
|
||||
|
||||
SHL1STDLIBS= \
|
||||
$(CPPUHELPERLIB) \
|
||||
$(BASICLIB) \
|
||||
$(COMPHELPERLIB) \
|
||||
$(SFXLIB) \
|
||||
$(CPPULIB) \
|
||||
$(TOOLSLIB) \
|
||||
$(SALLIB)
|
||||
|
||||
SHL1DEPN=
|
||||
SHL1LIBS=$(SLB)$/$(TARGET).lib
|
||||
|
||||
# --- Targets ------------------------------------------------------
|
||||
|
||||
.INCLUDE : target.mk
|
||||
|
||||
# ------------------------------------------------------------------
|
||||
|
||||
ALLTAR : \
|
||||
$(MISC)$/$(TARGET).don \
|
||||
|
||||
$(SLOFILES) : $(MISC)$/$(TARGET).don
|
||||
|
||||
$(MISC)$/$(TARGET).don : $(SOLARBINDIR)$/oovbaapi.rdb
|
||||
+$(CPPUMAKER) -O$(INCCOM)$/$(TARGET) -BUCR $(SOLARBINDIR)$/oovbaapi.rdb -X$(SOLARBINDIR)$/types.rdb && echo > $@
|
||||
echo $@
|
||||
|
||||
131
scripting/source/vbaevents/service.cxx
Normal file
131
scripting/source/vbaevents/service.cxx
Normal file
@@ -0,0 +1,131 @@
|
||||
/*************************************************************************
|
||||
*
|
||||
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
||||
*
|
||||
* Copyright 2008 by Sun Microsystems, Inc.
|
||||
*
|
||||
* OpenOffice.org - a multi-platform office productivity suite
|
||||
*
|
||||
* $RCSfile: service.cxx,v $
|
||||
* $Revision: 1.0 $
|
||||
*
|
||||
* This file is part of OpenOffice.org.
|
||||
*
|
||||
* OpenOffice.org is free software: you can redistribute it and/or modify
|
||||
* it under the terms of the GNU Lesser General Public License version 3
|
||||
* only, as published by the Free Software Foundation.
|
||||
*
|
||||
* OpenOffice.org 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 version 3 for more details
|
||||
* (a copy is included in the LICENSE file that accompanied this code).
|
||||
*
|
||||
* You should have received a copy of the GNU Lesser General Public License
|
||||
* version 3 along with OpenOffice.org. If not, see
|
||||
* <http://www.openoffice.org/license.html>
|
||||
* for a copy of the LGPLv3 License.
|
||||
*
|
||||
************************************************************************/
|
||||
|
||||
// MARKER(update_precomp.py): autogen include statement, do not remove
|
||||
#include "precompiled_scripting.hxx"
|
||||
#include "cppuhelper/implementationentry.hxx"
|
||||
#include "com/sun/star/lang/XMultiServiceFactory.hpp"
|
||||
#include "com/sun/star/registry/XRegistryKey.hpp"
|
||||
|
||||
// =============================================================================
|
||||
// component exports
|
||||
// =============================================================================
|
||||
using namespace ::com::sun::star;
|
||||
using namespace ::com::sun::star::uno;
|
||||
|
||||
namespace evtlstner
|
||||
{
|
||||
// =============================================================================
|
||||
// component operations
|
||||
// =============================================================================
|
||||
|
||||
uno::Reference< XInterface > SAL_CALL create(
|
||||
Reference< XComponentContext > const & xContext )
|
||||
SAL_THROW( () );
|
||||
|
||||
// -----------------------------------------------------------------------------
|
||||
|
||||
::rtl::OUString SAL_CALL getImplementationName();
|
||||
|
||||
Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames();
|
||||
|
||||
Reference<XInterface> SAL_CALL create(
|
||||
Sequence<Any> const &, Reference<XComponentContext> const & );
|
||||
} // end evtlstner
|
||||
|
||||
namespace ooevtdescgen
|
||||
{
|
||||
// =============================================================================
|
||||
// component operations
|
||||
// =============================================================================
|
||||
|
||||
uno::Reference< XInterface > SAL_CALL create(
|
||||
Reference< XComponentContext > const & xContext )
|
||||
SAL_THROW( () );
|
||||
|
||||
// -----------------------------------------------------------------------------
|
||||
|
||||
::rtl::OUString SAL_CALL getImplementationName();
|
||||
|
||||
Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames();
|
||||
|
||||
Reference<XInterface> SAL_CALL create(
|
||||
Sequence<Any> const &, Reference<XComponentContext> const & );
|
||||
} // end ooevtdescgen
|
||||
|
||||
|
||||
|
||||
// =============================================================================
|
||||
|
||||
const ::cppu::ImplementationEntry s_component_entries [] =
|
||||
{
|
||||
{
|
||||
::evtlstner::create, ::evtlstner::getImplementationName,
|
||||
::evtlstner::getSupportedServiceNames,
|
||||
::cppu::createSingleComponentFactory,
|
||||
0, 0
|
||||
},
|
||||
{
|
||||
::ooevtdescgen::create, ::ooevtdescgen::getImplementationName,
|
||||
::ooevtdescgen::getSupportedServiceNames,
|
||||
::cppu::createSingleComponentFactory,
|
||||
0, 0
|
||||
},
|
||||
{ 0, 0, 0, 0, 0, 0 }
|
||||
};
|
||||
|
||||
extern "C"
|
||||
{
|
||||
SAL_DLLPUBLIC_EXPORT void SAL_CALL component_getImplementationEnvironment(
|
||||
const sal_Char ** ppEnvTypeName, uno_Environment ** )
|
||||
{
|
||||
OSL_TRACE("In component_getImplementationEnv");
|
||||
*ppEnvTypeName = CPPU_CURRENT_LANGUAGE_BINDING_NAME;
|
||||
}
|
||||
|
||||
SAL_DLLPUBLIC_EXPORT sal_Bool SAL_CALL component_writeInfo(
|
||||
lang::XMultiServiceFactory * pServiceManager, registry::XRegistryKey * pRegistryKey )
|
||||
{
|
||||
OSL_TRACE("In component_writeInfo");
|
||||
if ( ::cppu::component_writeInfoHelper(
|
||||
pServiceManager, pRegistryKey, s_component_entries ) )
|
||||
return sal_True;
|
||||
return sal_False;
|
||||
}
|
||||
|
||||
SAL_DLLPUBLIC_EXPORT void * SAL_CALL component_getFactory(
|
||||
const sal_Char * pImplName, lang::XMultiServiceFactory * pServiceManager,
|
||||
registry::XRegistryKey * pRegistryKey )
|
||||
{
|
||||
OSL_TRACE("In component_getFactory");
|
||||
return ::cppu::component_getFactoryHelper(
|
||||
pImplName, pServiceManager, pRegistryKey, s_component_entries );
|
||||
}
|
||||
}
|
||||
26
scripting/source/vbaevents/vbaevents.xml
Normal file
26
scripting/source/vbaevents/vbaevents.xml
Normal file
@@ -0,0 +1,26 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<!DOCTYPE module-description PUBLIC "-//StarOffice//DTD ComponentDescription 1.0//EN" "module-description.dtd">
|
||||
<module-description xmlns:xlink="http://www.w3.org/1999/xlink">
|
||||
|
||||
<module-name>vbaevents</module-name>
|
||||
|
||||
<component-description>
|
||||
<author>Noel Power </author>
|
||||
<name>ooo.vba.EventListener</name>
|
||||
<description>Event listener to handle ooo events and to translate them to calls to basic macros ala Button_Click etc.</description>
|
||||
<loader-name>com.sun.star.loader.SharedLibrary</loader-name>
|
||||
<language>c++</language>
|
||||
<status value="drafts"/>
|
||||
<supported-service>ooo.vba.EventListener</supported-service>
|
||||
<type>com.sun.star.uno.XComponentContext</type>
|
||||
</component-description>
|
||||
|
||||
<project-build-dependency>cppuhelper</project-build-dependency>
|
||||
<project-build-dependency>cppu</project-build-dependency>
|
||||
<project-build-dependency>sal</project-build-dependency>
|
||||
|
||||
<runtime-module-dependency>cppuhelper3$(COM)</runtime-module-dependency>
|
||||
<runtime-module-dependency>cppu3</runtime-module-dependency>
|
||||
<runtime-module-dependency>sal3</runtime-module-dependency>
|
||||
|
||||
</module-description>
|
||||
Reference in New Issue
Block a user