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 .
20 #include <sal/types.h>
22 #include <com/sun/star/awt/AsyncCallback.hpp>
23 #include <com/sun/star/awt/XCallback.hpp>
24 #include <com/sun/star/beans/PropertyState.hpp>
25 #include <com/sun/star/beans/PropertyValue.hpp>
26 #include <com/sun/star/document/MacroExecMode.hpp>
27 #include <com/sun/star/frame/Desktop.hpp>
28 #include <com/sun/star/frame/DispatchResultEvent.hpp>
29 #include <com/sun/star/frame/DispatchResultState.hpp>
30 #include <com/sun/star/frame/XController.hpp>
31 #include <com/sun/star/frame/XDispatchProvider.hpp>
32 #include <com/sun/star/frame/XDispatchResultListener.hpp>
33 #include <com/sun/star/frame/XModel.hpp>
34 #include <com/sun/star/frame/XNotifyingDispatch.hpp>
35 #include <com/sun/star/lang/EventObject.hpp>
36 #include <com/sun/star/uno/Any.hxx>
37 #include <com/sun/star/uno/Reference.hxx>
38 #include <com/sun/star/uno/RuntimeException.hpp>
39 #include <com/sun/star/uno/Sequence.hxx>
40 #include <com/sun/star/util/URL.hpp>
41 #include <cppuhelper/implbase.hxx>
42 #include <cppunit/TestAssert.h>
43 #include <cppunit/TestFixture.h>
44 #include <cppunit/extensions/HelperMacros.h>
45 #include <cppunit/plugin/TestPlugIn.h>
46 #include <osl/conditn.hxx>
47 #include <osl/diagnose.h>
49 #include <rtl/ustring.h>
50 #include <rtl/ustring.hxx>
51 #include <unotest/gettestargument.hxx>
52 #include <unotest/officeconnection.hxx>
53 #include <unotest/toabsolutefileurl.hxx>
58 osl::Condition condition
;
65 Result(const Result
&) = delete;
66 Result
& operator=(const Result
&) = delete;
70 public cppu::WeakImplHelper
< css::frame::XDispatchResultListener
>
73 explicit Listener(Result
* result
): result_(result
) { OSL_ASSERT(result
!= nullptr); }
76 virtual void SAL_CALL
disposing(css::lang::EventObject
const &) override
{}
78 virtual void SAL_CALL
dispatchFinished(
79 css::frame::DispatchResultEvent
const & Result
) override
;
84 void Listener::dispatchFinished(css::frame::DispatchResultEvent
const & Result
)
87 (Result
.State
== css::frame::DispatchResultState::SUCCESS
) &&
88 (Result
.Result
>>= result_
->result
);
89 result_
->condition
.set();
92 class Callback
: public cppu::WeakImplHelper
< css::awt::XCallback
> {
95 css::uno::Reference
< css::frame::XNotifyingDispatch
> const & dispatch
,
96 css::util::URL
const & url
,
97 css::uno::Sequence
< css::beans::PropertyValue
> const & arguments
,
98 css::uno::Reference
< css::frame::XDispatchResultListener
> const &
100 dispatch_(dispatch
), url_(url
), arguments_(arguments
),
102 { OSL_ASSERT(dispatch
.is()); }
105 virtual void SAL_CALL
notify(css::uno::Any
const &) override
106 { dispatch_
->dispatchWithNotification(url_
, arguments_
, listener_
); }
108 css::uno::Reference
< css::frame::XNotifyingDispatch
> dispatch_
;
109 css::util::URL
const url_
;
110 css::uno::Sequence
< css::beans::PropertyValue
> const arguments_
;
111 css::uno::Reference
< css::frame::XDispatchResultListener
> listener_
;
114 class Test
: public CppUnit::TestFixture
{
116 virtual void setUp() override
;
118 virtual void tearDown() override
;
121 CPPUNIT_TEST_SUITE(Test
);
123 CPPUNIT_TEST_SUITE_END();
127 test::OfficeConnection connection_
;
134 void Test::tearDown() {
135 connection_
.tearDown();
141 test::getTestArgument(
142 "smoketest.doc", &doc
));
143 css::uno::Sequence
< css::beans::PropertyValue
> args(2);
144 args
[0].Name
= "MacroExecutionMode";
146 args
[0].Value
<<= css::document::MacroExecMode::ALWAYS_EXECUTE_NO_WARN
;
147 args
[0].State
= css::beans::PropertyState_DIRECT_VALUE
;
148 args
[1].Name
= "ReadOnly";
150 args
[1].Value
<<= true;
151 args
[1].State
= css::beans::PropertyState_DIRECT_VALUE
;
153 url
.Complete
= "vnd.sun.star.script:Standard.Global.StartTestWithDefaultOptions?"
154 "language=Basic&location=document";
156 css::uno::Reference
< css::frame::XDesktop2
> xDesktop
= css::frame::Desktop::create(connection_
.getComponentContext());
158 css::uno::Reference
< css::frame::XNotifyingDispatch
> disp(
159 css::uno::Reference
< css::frame::XDispatchProvider
>(
160 css::uno::Reference
< css::frame::XController
>(
161 css::uno::Reference
< css::frame::XModel
>(
162 xDesktop
->loadComponentFromURL(
163 test::toAbsoluteFileUrl(doc
),
166 css::uno::UNO_QUERY_THROW
)->getCurrentController(),
167 css::uno::UNO_SET_THROW
)->getFrame(),
168 css::uno::UNO_QUERY_THROW
)->queryDispatch(
170 css::uno::UNO_QUERY_THROW
);
172 // Shifted to main thread to work around potential deadlocks (i112867):
173 css::awt::AsyncCallback::create(
174 connection_
.getComponentContext())->addCallback(
176 disp
, url
, css::uno::Sequence
< css::beans::PropertyValue
>(),
177 new Listener(&result
)),
179 // Wait for result.condition or connection_ going stale:
181 osl::Condition::Result res
= result
.condition
.wait(std::chrono::seconds(1)); // 1 sec delay
182 if (res
== osl::Condition::result_ok
) {
185 CPPUNIT_ASSERT_EQUAL(osl::Condition::result_timeout
, res
);
186 CPPUNIT_ASSERT(connection_
.isStillAlive());
188 CPPUNIT_ASSERT(result
.success
);
189 CPPUNIT_ASSERT_EQUAL(OUString(), result
.result
);
192 CPPUNIT_TEST_SUITE_REGISTRATION(Test
);
196 CPPUNIT_PLUGIN_IMPLEMENT();
198 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */