1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
|
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
* This file is part of the LibreOffice project.
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
*
* This file incorporates work covered by the following license notice:
*
* Licensed to the Apache Software Foundation (ASF) under one or more
* contributor license agreements. See the NOTICE file distributed
* with this work for additional information regarding copyright
* ownership. The ASF licenses this file to you under the Apache
* License, Version 2.0 (the "License"); you may not use this file
* except in compliance with the License. You may obtain a copy of
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
*/
#ifndef INCLUDED_FILTER_MSFILTER_MSVBAHELPER_HXX
#define INCLUDED_FILTER_MSFILTER_MSVBAHELPER_HXX
#include <exception>
#include <com/sun/star/awt/KeyEvent.hpp>
#include <com/sun/star/lang/IllegalArgumentException.hpp>
#include <com/sun/star/lang/XInitialization.hpp>
#include <com/sun/star/lang/XServiceInfo.hpp>
#include <com/sun/star/script/vba/XVBAMacroResolver.hpp>
#include <com/sun/star/uno/Any.hxx>
#include <com/sun/star/uno/Exception.hpp>
#include <com/sun/star/uno/Reference.hxx>
#include <com/sun/star/uno/RuntimeException.hpp>
#include <com/sun/star/uno/Sequence.hxx>
#include <cppuhelper/implbase.hxx>
#include <filter/msfilter/msfilterdllapi.h>
#include <rtl/ustring.hxx>
#include <sal/types.h>
namespace com { namespace sun { namespace star {
namespace frame { class XModel; }
namespace uno { class XComponentContext; }
namespace uno { class XInterface; }
} } }
class SfxObjectShell;
namespace ooo {
namespace vba {
struct MSFILTER_DLLPUBLIC MacroResolvedInfo
{
SfxObjectShell* mpDocContext;
OUString msResolvedMacro;
bool mbFound;
inline explicit MacroResolvedInfo( SfxObjectShell* pDocContext = nullptr ) : mpDocContext( pDocContext ), mbFound( false ) {}
};
MSFILTER_DLLPUBLIC OUString makeMacroURL( const OUString& sMacroName );
MSFILTER_DLLPUBLIC OUString extractMacroName( const OUString& rMacroUrl );
MSFILTER_DLLPUBLIC OUString getDefaultProjectName( SfxObjectShell* pShell );
MSFILTER_DLLPUBLIC OUString resolveVBAMacro( SfxObjectShell* pShell, const OUString& rLibName, const OUString& rModuleName, const OUString& rMacroName );
MSFILTER_DLLPUBLIC MacroResolvedInfo resolveVBAMacro( SfxObjectShell* pShell, const OUString& rMacroName, bool bSearchGlobalTemplates = false );
MSFILTER_DLLPUBLIC bool executeMacro( SfxObjectShell* pShell, const OUString& sMacroName, css::uno::Sequence< css::uno::Any >& aArgs, css::uno::Any& aRet, const css::uno::Any& aCaller );
MSFILTER_DLLPUBLIC css::awt::KeyEvent parseKeyEvent( const OUString& sKey ) throw (css::uno::RuntimeException);
MSFILTER_DLLPUBLIC void applyShortCutKeyBinding ( const css::uno::Reference< css::frame::XModel >& rxDoc, const css::awt::KeyEvent& rKeyEvent, const OUString& sMacro ) throw (css::uno::RuntimeException, std::exception);
typedef ::cppu::WeakImplHelper<
css::lang::XServiceInfo,
css::lang::XInitialization,
css::script::vba::XVBAMacroResolver > VBAMacroResolverBase;
class VBAMacroResolver : public VBAMacroResolverBase
{
public:
explicit VBAMacroResolver();
virtual ~VBAMacroResolver();
// com.sun.star.lang.XServiceInfo interface -------------------------------
virtual OUString SAL_CALL
getImplementationName() throw (css::uno::RuntimeException, std::exception) override;
virtual sal_Bool SAL_CALL
supportsService( const OUString& rService )
throw (css::uno::RuntimeException, std::exception) override;
virtual css::uno::Sequence< OUString > SAL_CALL
getSupportedServiceNames() throw (css::uno::RuntimeException, std::exception) override;
// com.sun.star.lang.XInitialization interface ----------------------------
virtual void SAL_CALL initialize(
const css::uno::Sequence< css::uno::Any >& rArgs )
throw (css::uno::Exception, css::uno::RuntimeException, std::exception) override;
// com.sun.star.script.vba.XVBAMacroResolver interface --------------------
virtual OUString SAL_CALL
resolveVBAMacroToScriptURL( const OUString& rVBAMacroName )
throw (css::lang::IllegalArgumentException, css::uno::RuntimeException, std::exception) override;
virtual OUString SAL_CALL
resolveScriptURLtoVBAMacro( const OUString& rScriptURL )
throw (css::lang::IllegalArgumentException, css::uno::RuntimeException, std::exception) override;
private:
css::uno::Reference< css::frame::XModel > mxModel;
SfxObjectShell* mpObjShell;
OUString maProjectName;
};
OUString SAL_CALL VBAMacroResolver_getImplementationName();
css::uno::Sequence<OUString> SAL_CALL
VBAMacroResolver_getSupportedServiceNames();
css::uno::Reference<css::uno::XInterface> SAL_CALL
VBAMacroResolver_createInstance(
css::uno::Reference<css::uno::XComponentContext > const & rxContext)
throw (css::uno::Exception);
} // namespace vba
} // namespace ooo
#endif
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
