1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
9 * This file incorporates work covered by the following license notice:
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
21 #include <com/sun/star/xml/xpath/Libxml2ExtensionHandle.hpp>
22 #include <com/sun/star/beans/NamedValue.hpp>
23 #include "extension.hxx"
24 #include "xpathlib.hxx"
26 namespace com::sun::star::uno
{
27 class XComponentContext
;
30 using namespace com::sun::star::uno
;
31 using namespace com::sun::star::xforms
;
32 using namespace com::sun::star::xml::xpath
;
33 using namespace com::sun::star::beans
;
35 Libxml2ExtensionHandle SAL_CALL
CLibxml2XFormsExtension::getLibxml2ExtensionHandle()
37 Libxml2ExtensionHandle aHandle
;
38 aHandle
.functionLookupFunction
= reinterpret_cast< sal_Int64
>( &xforms_lookupFunc
);
39 aHandle
.functionData
= reinterpret_cast< sal_Int64
>( this );
40 aHandle
.variableLookupFunction
= sal_Int64(0);
41 aHandle
.variableData
= sal_Int64(0);
45 void SAL_CALL
CLibxml2XFormsExtension::initialize(const Sequence
< Any
>& aSequence
)
47 if (aSequence
.getLength() == 2
48 && (aSequence
[0] >>= m_aModel
)
49 && (aSequence
[1] >>= m_aContextNode
))
55 for (const Any
& rArg
: aSequence
)
57 if (! (rArg
>>= aValue
))
58 throw RuntimeException();
59 if ( aValue
.Name
== "Model" )
60 aValue
.Value
>>= m_aModel
;
61 else if ( aValue
.Name
== "ContextNode" )
62 aValue
.Value
>>= m_aContextNode
;
67 extern "C" SAL_DLLPUBLIC_EXPORT
css::uno::XInterface
*
68 com_sun_star_comp_xml_xpath_XFormsExtension_get_implementation(css::uno::XComponentContext
*,
69 css::uno::Sequence
<css::uno::Any
> const &)
71 return cppu::acquire(new CLibxml2XFormsExtension());
73 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */