office-gobmx/smoketestoo_native/smoketest.cxx

332 lines
12 KiB
C++

/*************************************************************************
* 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: code,v $
*
* $Revision: 1.4 $
*
* 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.
************************************************************************/
#include "sal/config.h"
#include "string"
#include "boost/noncopyable.hpp"
#include "com/sun/star/beans/PropertyState.hpp"
#include "com/sun/star/beans/PropertyValue.hpp"
#include "com/sun/star/bridge/UnoUrlResolver.hpp"
#include "com/sun/star/bridge/XUnoUrlResolver.hpp"
#include "com/sun/star/connection/NoConnectException.hpp"
#include "com/sun/star/document/MacroExecMode.hpp"
#include "com/sun/star/frame/DispatchResultEvent.hpp"
#include "com/sun/star/frame/DispatchResultState.hpp"
#include "com/sun/star/frame/XComponentLoader.hpp"
#include "com/sun/star/frame/XController.hpp"
#include "com/sun/star/frame/XDesktop.hpp"
#include "com/sun/star/frame/XDispatchProvider.hpp"
#include "com/sun/star/frame/XDispatchResultListener.hpp"
#include "com/sun/star/frame/XModel.hpp"
#include "com/sun/star/frame/XNotifyingDispatch.hpp"
#include "com/sun/star/lang/DisposedException.hpp"
#include "com/sun/star/lang/EventObject.hpp"
#include "com/sun/star/lang/XMultiServiceFactory.hpp"
#include "com/sun/star/uno/Reference.hxx"
#include "com/sun/star/uno/RuntimeException.hpp"
#include "com/sun/star/uno/Sequence.hxx"
#include "com/sun/star/uno/XComponentContext.hpp"
#include "com/sun/star/util/URL.hpp"
#include "cppuhelper/bootstrap.hxx"
#include "cppuhelper/implbase1.hxx"
#include "cppunit/TestAssert.h"
#include "cppunit/TestFixture.h"
#include "cppunit/extensions/HelperMacros.h"
#include "cppunit/plugin/TestPlugIn.h"
#include "osl/conditn.hxx"
#include "osl/diagnose.h"
#include "osl/file.hxx"
#include "osl/process.h"
#include "osl/time.h"
#include "rtl/bootstrap.hxx"
#include "rtl/string.hxx"
#include "rtl/textenc.h"
#include "rtl/ustring.h"
#include "rtl/ustring.hxx"
#include "sal/main.h"
#include "sal/types.h"
namespace CppUnit {
template<> struct assertion_traits< rtl::OUString > {
static bool equal(rtl::OUString const & x, rtl::OUString const & y) {
return x == y;
}
static std::string toString(rtl::OUString const & x) {
return rtl::OUStringToOString(x, RTL_TEXTENCODING_UTF8).getStr();
}
};
}
namespace {
namespace css = com::sun::star;
rtl::OUString argumentName(rtl::OUString const & name) {
return rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("arg-")) + name;
}
rtl::OUString getArgument(rtl::OUString const & name) {
rtl::OUString val;
CPPUNIT_ASSERT(rtl::Bootstrap::get(argumentName(name), val));
return val;
}
bool getOptionalArgument(rtl::OUString const & name, rtl::OUString * value) {
OSL_ASSERT(value != 0);
return rtl::Bootstrap::get(argumentName(name), *value);
}
rtl::OUString toUrl(rtl::OUString const & pathname) {
rtl::OUString cwd;
CPPUNIT_ASSERT_EQUAL(
osl_Process_E_None, osl_getProcessWorkingDir(&cwd.pData));
rtl::OUString url;
CPPUNIT_ASSERT_EQUAL(
osl::FileBase::E_None,
osl::FileBase::getFileURLFromSystemPath(pathname, url));
rtl::OUString absUrl;
CPPUNIT_ASSERT_EQUAL(
osl::FileBase::E_None,
osl::FileBase::getAbsoluteFileURL(cwd, url, absUrl));
return absUrl;
}
struct Result: private boost::noncopyable {
osl::Condition condition;
bool success;
rtl::OUString result;
};
class Listener:
public cppu::WeakImplHelper1< css::frame::XDispatchResultListener >
{
public:
Listener(Result * result): result_(result) { OSL_ASSERT(result != 0); }
private:
virtual void SAL_CALL disposing(css::lang::EventObject const &)
throw (css::uno::RuntimeException) {}
virtual void SAL_CALL dispatchFinished(
css::frame::DispatchResultEvent const & Result)
throw (css::uno::RuntimeException);
Result * result_;
};
void Listener::dispatchFinished(css::frame::DispatchResultEvent const & Result)
throw (css::uno::RuntimeException)
{
result_->success =
(Result.State == css::frame::DispatchResultState::SUCCESS) &&
(Result.Result >>= result_->result);
result_->condition.set();
}
class Test: public CppUnit::TestFixture {
public:
Test(): process_(0) {}
virtual void setUp();
virtual void tearDown();
private:
CPPUNIT_TEST_SUITE(Test);
CPPUNIT_TEST(test);
CPPUNIT_TEST_SUITE_END();
void test();
oslProcess process_;
css::uno::Reference< css::lang::XMultiServiceFactory > factory_;
};
void Test::setUp() {
oslProcessInfo info;
info.Size = sizeof info;
CPPUNIT_ASSERT_EQUAL(
osl_Process_E_None,
osl_getProcessInfo(0, osl_Process_IDENTIFIER, &info));
rtl::OUString desc(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("pipe,name=oootest")) +
rtl::OUString::valueOf(static_cast< sal_Int64 >(info.Ident)) +
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(";urp")));
rtl::OUString noquickArg(
RTL_CONSTASCII_USTRINGPARAM("-quickstart=no"));
rtl::OUString nofirstArg(
RTL_CONSTASCII_USTRINGPARAM("-nofirststartwizard"));
rtl::OUString acceptArg(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("-accept=")) + desc);
rtl::OUString userArg(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("-env:UserInstallation=")) +
toUrl(getArgument(rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("user")))));
rtl::OUString jreArg(
RTL_CONSTASCII_USTRINGPARAM("-env:UNO_JAVA_JFW_ENV_JREHOME=true"));
rtl::OUString classpathArg(
RTL_CONSTASCII_USTRINGPARAM("-env:UNO_JAVA_JFW_ENV_CLASSPATH=true"));
rtl::OUString dbgsvArg(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("-env:DBGSV_INIT=")) +
getArgument(rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("dbgsv"))));
rtl_uString * args[] = {
noquickArg.pData, nofirstArg.pData, acceptArg.pData, userArg.pData,
jreArg.pData, classpathArg.pData, dbgsvArg.pData };
rtl_uString ** envs = 0;
rtl::OUString argEnv;
if (getOptionalArgument(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("env")), &argEnv))
{
envs = &argEnv.pData;
}
CPPUNIT_ASSERT_EQUAL(
osl_Process_E_None,
osl_executeProcess(
(toUrl(
getArgument(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("path")))).
pData),
args, sizeof args / sizeof args[0], 0, 0, 0, envs,
envs == 0 ? 0 : 1, &process_));
try {
css::uno::Reference< css::uno::XComponentContext > context(
cppu::defaultBootstrap_InitialComponentContext());
css::uno::Reference< css::bridge::XUnoUrlResolver > resolver(
css::bridge::UnoUrlResolver::create(context));
for (int i = 0;; ++i) {
try {
factory_ =
css::uno::Reference< css::lang::XMultiServiceFactory >(
resolver->resolve(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("uno:")) +
desc +
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
";StarOffice.ServiceManager"))),
css::uno::UNO_QUERY_THROW);
break;
} catch (css::connection::NoConnectException &) {
if (i == 600) { // 600 sec
throw;
}
}
TimeValue delay = { 1, 0 }; // 1 sec
CPPUNIT_ASSERT_EQUAL(
osl_Process_E_TimedOut,
osl_joinProcessWithTimeout(process_, &delay));
}
} catch (...) {
CPPUNIT_ASSERT_EQUAL(
osl_Process_E_None, osl_terminateProcess(process_));
osl_freeProcessHandle(process_);
process_ = 0;
throw;
}
}
void Test::tearDown() {
if (factory_.is()) {
css::uno::Reference< css::frame::XDesktop > desktop(
factory_->createInstance(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("com.sun.star.frame.Desktop"))),
css::uno::UNO_QUERY_THROW);
factory_.clear();
try {
CPPUNIT_ASSERT(desktop->terminate());
desktop.clear();
} catch (css::lang::DisposedException &) {}
// it appears that DisposedExceptions can already happen while
// receiving the response of the terminate call
}
if (process_ != 0) {
CPPUNIT_ASSERT_EQUAL(osl_Process_E_None, osl_joinProcess(process_));
oslProcessInfo info;
info.Size = sizeof info;
CPPUNIT_ASSERT_EQUAL(
osl_Process_E_None,
osl_getProcessInfo(process_, osl_Process_EXITCODE, &info));
CPPUNIT_ASSERT_EQUAL(oslProcessExitCode(0), info.Code);
osl_freeProcessHandle(process_);
}
}
void Test::test() {
css::uno::Sequence< css::beans::PropertyValue > args(1);
args[0].Name = rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("MacroExecutionMode"));
args[0].Handle = -1;
args[0].Value <<=
com::sun::star::document::MacroExecMode::ALWAYS_EXECUTE_NO_WARN;
args[0].State = css::beans::PropertyState_DIRECT_VALUE;
css::util::URL url;
url.Complete = rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"vnd.sun.star.script:Standard.Global.StartTestWithDefaultOptions?"
"language=Basic&location=document"));
Result result;
css::uno::Reference< css::frame::XNotifyingDispatch >(
css::uno::Reference< css::frame::XDispatchProvider >(
css::uno::Reference< css::frame::XController >(
css::uno::Reference< css::frame::XModel >(
css::uno::Reference< css::frame::XComponentLoader >(
factory_->createInstance(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"com.sun.star.frame.Desktop"))),
css::uno::UNO_QUERY_THROW)->loadComponentFromURL(
toUrl(
getArgument(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("doc")))),
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("_default")),
0, args),
css::uno::UNO_QUERY_THROW)->getCurrentController(),
css::uno::UNO_SET_THROW)->getFrame(),
css::uno::UNO_QUERY_THROW)->queryDispatch(
url, rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("_self")), 0),
css::uno::UNO_QUERY_THROW)->dispatchWithNotification(
url, css::uno::Sequence< css::beans::PropertyValue >(),
new Listener(&result));
result.condition.wait();
CPPUNIT_ASSERT(result.success);
CPPUNIT_ASSERT_EQUAL(rtl::OUString(), result.result);
}
CPPUNIT_TEST_SUITE_REGISTRATION(Test);
}
CPPUNIT_PLUGIN_IMPLEMENT();