forked from amazingfate/loongoffice
For some functions and all kinds of Exceptions. CannotConvertException CloseVetoException DisposedException EmptyUndoStackException ErrorCodeIOException Exception GridInvalidDataException GridInvalidModelException IOException IllegalAccessException IllegalArgumentException IllegalTypeException IndexOutOfBoundsException NoMasterException NoSuchElementException NoSupportException PropertyVetoException RuntimeException SAXException ScannerException StorageWrappedTargetException UnsupportedFlavorException VetoException WrappedTargetException ZipIOException throwGenericSQLException throwIllegallArgumentException createInstance createInstanceWithContext forName getByName getPackageManager getPropertyValue getUnpackedValueOrDefault getValueByName hasPropertyByName openKey setName setPropertyValue supportsService bash command: for i in `cat list`; do git grep "$i\s*(\s*OUString(\s*\"" -- '*.[hc]xx' | cut -d ':' -f1 | sort -u | xargs sed -i -e "s/\(\<$i\s*(\)\s*OUString(\s*\(\"[^\")\\]*\"\)\s*)\s*/\1\2/g" -e "s/\($i.*\)\"+ /\1\" + /g"; done Change-Id: Iaf8e641b0abf28c082906014f87a183517630535 Reviewed-on: https://gerrit.libreoffice.org/4624 Tested-by: LibreOffice gerrit bot <gerrit@libreoffice.org> Reviewed-by: Thomas Arnhold <thomas@arnhold.org> Tested-by: Thomas Arnhold <thomas@arnhold.org>
1322 lines
46 KiB
C++
1322 lines
46 KiB
C++
/* -*- 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 .
|
|
*/
|
|
|
|
|
|
#include <stdio.h>
|
|
#include <math.h>
|
|
#include <string>
|
|
#include <boost/unordered_map.hpp>
|
|
#include <map>
|
|
|
|
#include <osl/diagnose.h>
|
|
#include <osl/mutex.hxx>
|
|
#include <osl/module.h>
|
|
#include <osl/process.h>
|
|
#include <osl/thread.h>
|
|
#include <osl/conditn.hxx>
|
|
#include <osl/time.h>
|
|
|
|
#ifdef SAL_W32
|
|
#include <windows.h>
|
|
#else
|
|
#include <sys/times.h>
|
|
#include <unistd.h>
|
|
#endif
|
|
|
|
#include <rtl/string.hxx>
|
|
#include <rtl/strbuf.hxx>
|
|
#include <rtl/ustrbuf.hxx>
|
|
|
|
#include <uno/environment.hxx>
|
|
#include <uno/mapping.hxx>
|
|
|
|
#include <cppuhelper/factory.hxx>
|
|
#include <cppuhelper/implbase2.hxx>
|
|
|
|
#include <com/sun/star/lang/XServiceInfo.hpp>
|
|
#include <com/sun/star/lang/XComponent.hpp>
|
|
#include <com/sun/star/lang/XMain.hpp>
|
|
#include <com/sun/star/lang/XInitialization.hpp>
|
|
#include <com/sun/star/loader/XImplementationLoader.hpp>
|
|
#include <com/sun/star/registry/XRegistryKey.hpp>
|
|
#include <com/sun/star/bridge/XUnoUrlResolver.hpp>
|
|
#include <com/sun/star/container/XSet.hpp>
|
|
#include <com/sun/star/test/performance/XPerformanceTest.hpp>
|
|
|
|
#define NLOOP 200000000
|
|
|
|
using namespace osl;
|
|
using namespace cppu;
|
|
using namespace com::sun::star::uno;
|
|
using namespace com::sun::star::lang;
|
|
using namespace com::sun::star::loader;
|
|
using namespace com::sun::star::registry;
|
|
using namespace com::sun::star::bridge;
|
|
using namespace com::sun::star::container;
|
|
using namespace com::sun::star::test::performance;
|
|
|
|
|
|
#define SERVICENAME "com.sun.star.test.performance.PerformanceTest"
|
|
#define IMPLNAME "com.sun.star.comp.performance.PerformanceTest"
|
|
|
|
namespace benchmark_test
|
|
{
|
|
|
|
static inline sal_uInt32 getSystemTicks()
|
|
{
|
|
#ifdef SAL_W32
|
|
return (sal_uInt32)GetTickCount();
|
|
#else // only UNX supported for now
|
|
static sal_uInt32 nImplTicksPerSecond = 0;
|
|
static double dImplTicksPerSecond;
|
|
static double dImplTicksULONGMAX;
|
|
|
|
struct tms aTms;
|
|
sal_uInt32 nTicks = (sal_uInt32)times( &aTms );
|
|
|
|
if ( !nImplTicksPerSecond )
|
|
{
|
|
nImplTicksPerSecond = sysconf(_SC_CLK_TCK);
|
|
dImplTicksPerSecond = nImplTicksPerSecond;
|
|
dImplTicksULONGMAX = (double)(sal_uInt32)ULONG_MAX;
|
|
}
|
|
|
|
double fTicks = nTicks;
|
|
fTicks *= 1000;
|
|
fTicks /= dImplTicksPerSecond;
|
|
fTicks = fmod (fTicks, dImplTicksULONGMAX);
|
|
|
|
return (sal_uInt32)fTicks;
|
|
#endif
|
|
}
|
|
|
|
//--------------------------------------------------------------------------------------------------
|
|
static void out( const sal_Char * pText, FILE * stream = stderr,
|
|
sal_Int32 nStart = -1, sal_Char cFillchar = ' ' )
|
|
{
|
|
static sal_Int32 s_nPos = 0;
|
|
|
|
sal_Char ar[2] = { cFillchar, 0 };
|
|
while (s_nPos < nStart)
|
|
{
|
|
::fprintf( stream, ar );
|
|
++s_nPos;
|
|
}
|
|
|
|
::fprintf( stream, pText );
|
|
|
|
for ( const sal_Char * p = pText; *p; ++p )
|
|
{
|
|
if (*p == '\n')
|
|
s_nPos = 0;
|
|
else
|
|
++s_nPos;
|
|
}
|
|
}
|
|
//--------------------------------------------------------------------------------------------------
|
|
static inline void out( const OUString & rText, FILE * stream = stderr,
|
|
sal_Int32 nStart = -1, sal_Char cFillchar = ' ' )
|
|
{
|
|
OString aText( OUStringToOString( rText, RTL_TEXTENCODING_ASCII_US ) );
|
|
out( aText.getStr(), stream, nStart, cFillchar );
|
|
}
|
|
//--------------------------------------------------------------------------------------------------
|
|
static inline void out( double fVal, FILE * stream = stderr,
|
|
sal_Int32 nStart = -1, sal_Char cFillchar = ' ' )
|
|
{
|
|
sal_Char ar[128];
|
|
::snprintf( ar, sizeof(ar), (fVal < 0.000001 ? "%g" : "%f"), fVal );
|
|
out( ar, stream, nStart, cFillchar );
|
|
}
|
|
//--------------------------------------------------------------------------------------------------
|
|
static inline void out( sal_Int64 nVal, FILE * stream = stderr,
|
|
sal_Int32 nStart = -1, sal_Char cFillchar = ' ' )
|
|
{
|
|
sal_Char ar[128];
|
|
::snprintf( ar, sizeof(ar), "%ld", nVal );
|
|
out( ar, stream, nStart, cFillchar );
|
|
}
|
|
|
|
//==================================================================================================
|
|
Reference< XSingleServiceFactory > loadLibComponentFactory(
|
|
const OUString & rLibName, const OUString & rImplName,
|
|
const Reference< XMultiServiceFactory > & xSF, const Reference< XRegistryKey > & xKey )
|
|
{
|
|
Reference< XSingleServiceFactory > xRet;
|
|
|
|
OUStringBuffer aLibNameBuf( 32 );
|
|
#ifdef SAL_UNX
|
|
aLibNameBuf.appendAscii( RTL_CONSTASCII_STRINGPARAM("lib") );
|
|
aLibNameBuf.append( rLibName );
|
|
aLibNameBuf.appendAscii( RTL_CONSTASCII_STRINGPARAM(".so") );
|
|
#else
|
|
aLibNameBuf.append( rLibName );
|
|
aLibNameBuf.appendAscii( RTL_CONSTASCII_STRINGPARAM(".dll") );
|
|
#endif
|
|
OUString aLibName( aLibNameBuf.makeStringAndClear() );
|
|
oslModule lib = osl_loadModule( aLibName.pData, SAL_LOADMODULE_LAZY | SAL_LOADMODULE_GLOBAL );
|
|
|
|
if (lib)
|
|
{
|
|
void * pSym;
|
|
|
|
// ========================= LATEST VERSION =========================
|
|
OUString aGetEnvName( RTL_CONSTASCII_USTRINGPARAM(COMPONENT_GETENV) );
|
|
if (pSym = osl_getSymbol( lib, aGetEnvName.pData ))
|
|
{
|
|
uno_Environment * pCurrentEnv = 0;
|
|
uno_Environment * pEnv = 0;
|
|
const sal_Char * pEnvTypeName = 0;
|
|
(*((component_getImplementationEnvironmentFunc)pSym))( &pEnvTypeName, &pEnv );
|
|
|
|
sal_Bool bNeedsMapping =
|
|
(pEnv || 0 != rtl_str_compare( pEnvTypeName, CPPU_CURRENT_LANGUAGE_BINDING_NAME ));
|
|
|
|
OUString aEnvTypeName( OUString::createFromAscii( pEnvTypeName ) );
|
|
|
|
if (bNeedsMapping)
|
|
{
|
|
if (! pEnv)
|
|
uno_getEnvironment( &pEnv, aEnvTypeName.pData, 0 );
|
|
if (pEnv)
|
|
{
|
|
OUString aCppEnvTypeName( RTL_CONSTASCII_USTRINGPARAM(CPPU_CURRENT_LANGUAGE_BINDING_NAME) );
|
|
uno_getEnvironment( &pCurrentEnv, aCppEnvTypeName.pData, 0 );
|
|
if (pCurrentEnv)
|
|
bNeedsMapping = (pEnv != pCurrentEnv);
|
|
}
|
|
}
|
|
|
|
OUString aGetFactoryName( RTL_CONSTASCII_USTRINGPARAM(COMPONENT_GETFACTORY) );
|
|
if (pSym = osl_getSymbol( lib, aGetFactoryName.pData ))
|
|
{
|
|
OString aImplName( OUStringToOString( rImplName, RTL_TEXTENCODING_ASCII_US ) );
|
|
|
|
if (bNeedsMapping)
|
|
{
|
|
if (pEnv && pCurrentEnv)
|
|
{
|
|
Mapping aCurrent2Env( pCurrentEnv, pEnv );
|
|
Mapping aEnv2Current( pEnv, pCurrentEnv );
|
|
|
|
if (aCurrent2Env.is() && aEnv2Current.is())
|
|
{
|
|
void * pSMgr = aCurrent2Env.mapInterface(
|
|
xSF.get(), ::getCppuType( (const Reference< XMultiServiceFactory > *)0 ) );
|
|
void * pKey = aCurrent2Env.mapInterface(
|
|
xKey.get(), ::getCppuType( (const Reference< XRegistryKey > *)0 ) );
|
|
|
|
void * pSSF = (*((component_getFactoryFunc)pSym))(
|
|
aImplName.getStr(), pSMgr, pKey );
|
|
|
|
if (pKey)
|
|
(*pEnv->pExtEnv->releaseInterface)( pEnv->pExtEnv, pKey );
|
|
if (pSMgr)
|
|
(*pEnv->pExtEnv->releaseInterface)( pEnv->pExtEnv, pSMgr );
|
|
|
|
if (pSSF)
|
|
{
|
|
aEnv2Current.mapInterface(
|
|
reinterpret_cast< void ** >( &xRet ),
|
|
pSSF, ::getCppuType( (const Reference< XSingleServiceFactory > *)0 ) );
|
|
(*pEnv->pExtEnv->releaseInterface)( pEnv->pExtEnv, pSSF );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
XSingleServiceFactory * pRet = (XSingleServiceFactory *)
|
|
(*((component_getFactoryFunc)pSym))(
|
|
aImplName.getStr(), xSF.get(), xKey.get() );
|
|
if (pRet)
|
|
{
|
|
xRet = pRet;
|
|
pRet->release();
|
|
}
|
|
}
|
|
}
|
|
|
|
if (pEnv)
|
|
(*pEnv->release)( pEnv );
|
|
if (pCurrentEnv)
|
|
(*pCurrentEnv->release)( pCurrentEnv );
|
|
}
|
|
|
|
// ========================= PREVIOUS VERSION =========================
|
|
else
|
|
{
|
|
OUString aGetFactoryName( RTL_CONSTASCII_USTRINGPARAM(CREATE_COMPONENT_FACTORY_FUNCTION) );
|
|
if (pSym = osl_getSymbol( lib, aGetFactoryName.pData ))
|
|
{
|
|
OUString aCppEnvTypeName( RTL_CONSTASCII_USTRINGPARAM(CPPU_CURRENT_LANGUAGE_BINDING_NAME) );
|
|
OUString aUnoEnvTypeName( RTL_CONSTASCII_USTRINGPARAM(UNO_LB_UNO) );
|
|
Mapping aUno2Cpp( aUnoEnvTypeName, aCppEnvTypeName );
|
|
Mapping aCpp2Uno( aCppEnvTypeName, aUnoEnvTypeName );
|
|
OSL_ENSURE( aUno2Cpp.is() && aCpp2Uno.is(), "### cannot get uno mappings!" );
|
|
|
|
if (aUno2Cpp.is() && aCpp2Uno.is())
|
|
{
|
|
uno_Interface * pUComponentFactory = 0;
|
|
|
|
uno_Interface * pUSFactory = (uno_Interface *)aCpp2Uno.mapInterface(
|
|
xSF.get(), ::getCppuType( (const Reference< XMultiServiceFactory > *)0 ) );
|
|
uno_Interface * pUKey = (uno_Interface *)aCpp2Uno.mapInterface(
|
|
xKey.get(), ::getCppuType( (const Reference< XRegistryKey > *)0 ) );
|
|
|
|
pUComponentFactory = (*((CreateComponentFactoryFunc)pSym))(
|
|
rImplName.getStr(), pUSFactory, pUKey );
|
|
|
|
if (pUKey)
|
|
(*pUKey->release)( pUKey );
|
|
if (pUSFactory)
|
|
(*pUSFactory->release)( pUSFactory );
|
|
|
|
if (pUComponentFactory)
|
|
{
|
|
XSingleServiceFactory * pXFactory =
|
|
(XSingleServiceFactory *)aUno2Cpp.mapInterface(
|
|
pUComponentFactory, ::getCppuType( (const Reference< XSingleServiceFactory > *)0 ) );
|
|
(*pUComponentFactory->release)( pUComponentFactory );
|
|
|
|
if (pXFactory)
|
|
{
|
|
xRet = pXFactory;
|
|
pXFactory->release();
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if (! xRet.is())
|
|
osl_unloadModule( lib );
|
|
}
|
|
|
|
return xRet;
|
|
}
|
|
//--------------------------------------------------------------------------------------------------
|
|
template< class T >
|
|
static void createInstance( Reference< T > & rxOut,
|
|
const Reference< XMultiServiceFactory > & xMgr,
|
|
const OUString & rServiceName )
|
|
throw (RuntimeException)
|
|
{
|
|
Reference< XInterface > x( xMgr->createInstance( rServiceName ), UNO_QUERY );
|
|
|
|
if (! x.is())
|
|
{
|
|
static sal_Bool s_bSet = sal_False;
|
|
if (! s_bSet)
|
|
{
|
|
MutexGuard aGuard( Mutex::getGlobalMutex() );
|
|
if (! s_bSet)
|
|
{
|
|
Reference< XSet > xSet( xMgr, UNO_QUERY );
|
|
if (xSet.is())
|
|
{
|
|
// acceptor
|
|
xSet->insert( makeAny( loadLibComponentFactory(
|
|
OUString("acceptor"),
|
|
OUString("com.sun.star.comp.stoc.Acceptor"),
|
|
xMgr, Reference< XRegistryKey >() ) ) );
|
|
// connector
|
|
xSet->insert( makeAny( loadLibComponentFactory(
|
|
OUString("connectr"),
|
|
OUString("com.sun.star.comp.stoc.Connector"),
|
|
xMgr, Reference< XRegistryKey >() ) ) );
|
|
// iiop bridge
|
|
xSet->insert( makeAny( loadLibComponentFactory(
|
|
OUString("remotebridge"),
|
|
OUString("com.sun.star.bridge.Bridge.various"),
|
|
xMgr, Reference< XRegistryKey >() ) ) );
|
|
// bridge factory
|
|
xSet->insert( makeAny( loadLibComponentFactory(
|
|
OUString("brdgfctr"),
|
|
OUString("com.sun.star.comp.stoc.BridgeFactory"),
|
|
xMgr, Reference< XRegistryKey >() ) ) );
|
|
// uno url resolver
|
|
xSet->insert( makeAny( loadLibComponentFactory(
|
|
OUString("uuresolver"),
|
|
OUString("com.sun.star.comp.bridge.UnoUrlResolver"),
|
|
xMgr, Reference< XRegistryKey >() ) ) );
|
|
// java loader
|
|
// xSet->insert( makeAny( loadLibComponentFactory(
|
|
// OUString("javaloader"),
|
|
// OUString("com.sun.star.comp.stoc.JavaComponentLoader"),
|
|
// xMgr, Reference< XRegistryKey >() ) ) );
|
|
}
|
|
s_bSet = sal_True;
|
|
}
|
|
}
|
|
x = xMgr->createInstance( rServiceName );
|
|
}
|
|
|
|
if (! x.is())
|
|
{
|
|
OUStringBuffer buf( 64 );
|
|
buf.appendAscii( RTL_CONSTASCII_STRINGPARAM("cannot get service instance \"") );
|
|
buf.append( rServiceName );
|
|
buf.appendAscii( RTL_CONSTASCII_STRINGPARAM("\"!") );
|
|
throw RuntimeException( buf.makeStringAndClear(), Reference< XInterface >() );
|
|
}
|
|
|
|
rxOut = Reference< T >::query( x );
|
|
if (! rxOut.is())
|
|
{
|
|
OUStringBuffer buf( 64 );
|
|
buf.appendAscii( RTL_CONSTASCII_STRINGPARAM("service instance \"") );
|
|
buf.append( rServiceName );
|
|
buf.appendAscii( RTL_CONSTASCII_STRINGPARAM("\" does not support demanded interface \"") );
|
|
const Type & rType = ::getCppuType( (const Reference< T > *)0 );
|
|
buf.append( rType.getTypeName() );
|
|
buf.appendAscii( RTL_CONSTASCII_STRINGPARAM("\"!") );
|
|
throw RuntimeException( buf.makeStringAndClear(), Reference< XInterface >() );
|
|
}
|
|
}
|
|
|
|
//--------------------------------------------------------------------------------------------------
|
|
inline static Sequence< OUString > getSupportedServiceNames()
|
|
{
|
|
OUString aName( RTL_CONSTASCII_USTRINGPARAM(SERVICENAME) );
|
|
return Sequence< OUString >( &aName, 1 );
|
|
}
|
|
|
|
//==================================================================================================
|
|
class TestImpl : public WeakImplHelper2< XServiceInfo, XMain >
|
|
{
|
|
Reference< XMultiServiceFactory > _xSMgr;
|
|
|
|
Reference< XInterface > _xDirect;
|
|
Reference< XInterface > getDirect() throw (Exception);
|
|
Reference< XInterface > resolveObject( const OUString & rUnoUrl ) throw (Exception);
|
|
|
|
public:
|
|
TestImpl( const Reference< XMultiServiceFactory > & xSMgr );
|
|
virtual ~TestImpl();
|
|
|
|
// XServiceInfo
|
|
virtual OUString SAL_CALL getImplementationName() throw (RuntimeException);
|
|
virtual sal_Bool SAL_CALL supportsService( const OUString & rServiceName ) throw (RuntimeException);
|
|
virtual Sequence< OUString > SAL_CALL getSupportedServiceNames() throw (RuntimeException);
|
|
|
|
// XMain
|
|
virtual sal_Int32 SAL_CALL run( const Sequence< OUString > & rArgs ) throw (RuntimeException);
|
|
};
|
|
|
|
//##################################################################################################
|
|
|
|
//__________________________________________________________________________________________________
|
|
TestImpl::TestImpl( const Reference< XMultiServiceFactory > & xSMgr )
|
|
: _xSMgr( xSMgr )
|
|
{
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
TestImpl::~TestImpl()
|
|
{
|
|
}
|
|
|
|
//==================================================================================================
|
|
static Reference< XInterface > SAL_CALL TestImpl_create( const Reference< XMultiServiceFactory > & xSMgr )
|
|
{
|
|
return Reference< XInterface >( *new TestImpl( xSMgr ) );
|
|
}
|
|
|
|
// XServiceInfo
|
|
//__________________________________________________________________________________________________
|
|
OUString TestImpl::getImplementationName()
|
|
throw (RuntimeException)
|
|
{
|
|
return OUString( RTL_CONSTASCII_USTRINGPARAM(IMPLNAME) );
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
sal_Bool TestImpl::supportsService( const OUString & rServiceName )
|
|
throw (RuntimeException)
|
|
{
|
|
const Sequence< OUString > & rSNL = getSupportedServiceNames();
|
|
const OUString * pArray = rSNL.getConstArray();
|
|
for ( sal_Int32 nPos = rSNL.getLength(); nPos--; )
|
|
{
|
|
if (pArray[nPos] == rServiceName)
|
|
return sal_True;
|
|
}
|
|
return sal_False;
|
|
}
|
|
//__________________________________________________________________________________________________
|
|
Sequence< OUString > TestImpl::getSupportedServiceNames()
|
|
throw (RuntimeException)
|
|
{
|
|
return benchmark_test::getSupportedServiceNames();
|
|
}
|
|
|
|
//__________________________________________________________________________________________________
|
|
Reference< XInterface > TestImpl::getDirect()
|
|
throw (Exception)
|
|
{
|
|
if (! _xDirect.is())
|
|
{
|
|
MutexGuard aGuard( Mutex::getGlobalMutex() );
|
|
if (! _xDirect.is())
|
|
{
|
|
Reference< XSingleServiceFactory > xFac( loadLibComponentFactory(
|
|
OUString("perfobj"),
|
|
OUString("com.sun.star.comp.performance.PerformanceTestObject"),
|
|
_xSMgr, Reference< XRegistryKey >() ) );
|
|
if (! xFac.is())
|
|
throw RuntimeException("no test object available!", Reference< XInterface >() );
|
|
_xDirect = xFac->createInstance();
|
|
}
|
|
}
|
|
return _xDirect;
|
|
}
|
|
//--------------------------------------------------------------------------------------------------
|
|
Reference< XInterface > TestImpl::resolveObject( const OUString & rUnoUrl )
|
|
throw (Exception)
|
|
{
|
|
Reference< XUnoUrlResolver > xResolver;
|
|
createInstance(
|
|
xResolver, _xSMgr,
|
|
OUString("com.sun.star.bridge.UnoUrlResolver") );
|
|
|
|
Reference< XInterface > xResolvedObject( xResolver->resolve( rUnoUrl ) );
|
|
|
|
if (! xResolvedObject.is())
|
|
{
|
|
OUStringBuffer buf( 32 );
|
|
buf.appendAscii( RTL_CONSTASCII_STRINGPARAM("cannot resolve object \"") );
|
|
buf.append( rUnoUrl );
|
|
buf.appendAscii( RTL_CONSTASCII_STRINGPARAM("\"!") );
|
|
throw RuntimeException( buf.makeStringAndClear(), Reference< XInterface >() );
|
|
}
|
|
|
|
return xResolvedObject;
|
|
}
|
|
|
|
//==================================================================================================
|
|
class TimeEntry
|
|
{
|
|
sal_Int64 nLoop;
|
|
sal_uInt32 nTicks;
|
|
|
|
public:
|
|
TimeEntry()
|
|
{}
|
|
TimeEntry( sal_Int64 nLoop_, sal_uInt32 nTicks_ )
|
|
: nLoop( nLoop_ )
|
|
, nTicks( nTicks_ )
|
|
{}
|
|
|
|
inline double secPerCall() const
|
|
{ return (((double)nTicks) / (nLoop * 1000)); }
|
|
|
|
double ratio( const TimeEntry & rEntry ) const;
|
|
};
|
|
//__________________________________________________________________________________________________
|
|
double TimeEntry::ratio( const TimeEntry & rEntry ) const
|
|
{
|
|
double f = rEntry.nTicks * nLoop;
|
|
if (f == 0.0)
|
|
{
|
|
return 0.0;
|
|
}
|
|
else
|
|
{
|
|
return (((double)(nTicks * rEntry.nLoop)) / f);
|
|
}
|
|
}
|
|
|
|
//==================================================================================================
|
|
typedef std::map< std::string, TimeEntry > t_TimeEntryMap;
|
|
|
|
//==================================================================================================
|
|
struct TimingSheet
|
|
{
|
|
t_TimeEntryMap _entries;
|
|
void insert( const sal_Char * pText, sal_Int64 nLoop, sal_uInt32 nTicks );
|
|
};
|
|
//__________________________________________________________________________________________________
|
|
void TimingSheet::insert( const sal_Char * pText, sal_Int64 nLoop, sal_uInt32 nTicks )
|
|
{
|
|
_entries[ pText ] = TimeEntry( nLoop, nTicks );
|
|
}
|
|
|
|
//==================================================================================================
|
|
typedef boost::unordered_map< std::string, TimingSheet > t_TimingSheetMap;
|
|
|
|
//--------------------------------------------------------------------------------------------------
|
|
static void benchmark(
|
|
TimingSheet & rSheet, const Reference< XInterface > & xInstance, sal_Int64 nLoop )
|
|
throw (Exception)
|
|
{
|
|
Reference< XPerformanceTest > xBench( xInstance, UNO_QUERY );
|
|
if (! xBench.is())
|
|
throw RuntimeException("illegal test object!", Reference< XInterface >() );
|
|
|
|
sal_Int64 i;
|
|
sal_uInt32 tStart, tEnd;
|
|
|
|
const Type & rKnownType = ::getCppuType( (const Reference< XPerformanceTest > *)0 );
|
|
const Type & rUnKnownType = ::getCppuType( (const Reference< XSet > *)0 );
|
|
|
|
ComplexTypes aDummyStruct;
|
|
|
|
//------------------------------------
|
|
// oneway calls
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->async();
|
|
sal_uInt32 tEndSend = getSystemTicks();
|
|
xBench->sync();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "1a: sending simple oneway calls (no params, no return)", nLoop, tEndSend - tStart );
|
|
rSheet.insert( "1b: simple oneway calls (no params, no return)", nLoop, tEnd - tStart );
|
|
// synchron calls
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->sync();
|
|
xBench->sync();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "1c: simple synchron calls (no params no return)", nLoop+1, tEnd - tStart );
|
|
|
|
// acquire
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->acquire();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "2a: interface acquire() calls", nLoop, tEnd - tStart );
|
|
// release
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->release();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "2b: interface release() calls", nLoop, tEnd - tStart );
|
|
|
|
// queryInterface() for known type
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->queryInterface( rKnownType );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "2c: interface query for implemented type", nLoop, tEnd - tStart );
|
|
// queryInterface() for unknown type
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->queryInterface( rUnKnownType );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "2d: interface query for unknown type", nLoop, tEnd - tStart );
|
|
|
|
// create and forget objects
|
|
Reference< XPerformanceTest > xBench2( xBench );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench2 = xBench2->createObject();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "3a: create and release test objects", nLoop, tEnd - tStart );
|
|
|
|
// hold new objects
|
|
Sequence< Reference< XInterface > > aSeq( nLoop / 100 );
|
|
Reference< XInterface > * pSeq = aSeq.getArray();
|
|
xBench2 = xBench;
|
|
i = aSeq.getLength();
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
pSeq[i] = xBench2 = xBench2->createObject();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "3b: create and hold test objects", nLoop, tEnd - tStart );
|
|
|
|
// structs
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->complex_in( aDummyStruct );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "4a: complex_in() calls (in struct; return struct)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->complex_inout( aDummyStruct );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "4b: complex_inout() calls (inout struct; return struct)", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->complex_oneway( aDummyStruct );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "4c: complex_oneway() oneway calls (in struct)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->complex_noreturn( aDummyStruct );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "4d: complex_noreturn() calls (in struct)", nLoop, tEnd - tStart );
|
|
|
|
// attributes, get() methods
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getLong();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5a: getLong() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getLong_attr();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5b: get long attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setLong( 0 );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5c: setLong() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setLong_attr( 0 );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5d: set long attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getHyper();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5e: getHyper() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getHyper_attr();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5f: get hyper attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setHyper( 0 );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5g: setHyper() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setHyper_attr( 0 );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5h: set hyper attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getFloat();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5i: getFloat() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getFloat_attr();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5j: get float attribute",nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setFloat( 0.0 );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5k: setFloat() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setFloat_attr( 0.0 );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5l: set float attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getDouble();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5m: getDouble() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getDouble_attr();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5n: get double attribute", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setDouble( 0.0 );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5o: setDouble() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setDouble_attr( 0.0 );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "5p: set double attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getString();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "6a: getString() call (empty)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getString_attr();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "6b: get empty string attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
OUString aDummyString;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setString( aDummyString );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "6c: setString() call (emtpy)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setString_attr( aDummyString );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "6d: set empty string attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getInterface();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "7a: getInterface() call (null)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getInterface_attr();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "7b: get interface attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
Reference< XInterface > aDummyInterface;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setInterface( aDummyInterface );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "7c: setInterface() call (null)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setInterface_attr( Reference< XInterface >() );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "7d: set interface attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getAny();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "8a: getAny() call (empty)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getAny_attr();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "8b: get empty any attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
Any aDummyAny;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setAny( aDummyAny );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "8c: setAny() call (empty)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setAny_attr( aDummyAny );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "8d: set empty any attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getSequence();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "9a: getSequence() call (empty)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getSequence_attr();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "9b: get empty sequence attribute", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
Sequence< Reference< XInterface > > aDummySeq;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setSequence( aDummySeq );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "9c: setSequence() call (empty)", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setSequence_attr( aDummySeq );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "9d: set empty sequence attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getStruct();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "Aa: getStruct() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->getStruct_attr();
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "Ab: get struct attribute", nLoop, tEnd - tStart );
|
|
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setStruct( aDummyStruct );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "Ac: setStruct() call", nLoop, tEnd - tStart );
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
xBench->setStruct_attr( aDummyStruct );
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "Ad: set struct attribute", nLoop, tEnd - tStart );
|
|
|
|
// load
|
|
// i = nLoop;
|
|
// tStart = getSystemTicks();
|
|
// while (i--)
|
|
// xBench->setSequence( aSeq );
|
|
// tEnd = getSystemTicks();
|
|
// rSheet.insert( "transfer of exisiting objects", nLoop, tEnd - tStart );
|
|
|
|
// exceptions
|
|
i = nLoop;
|
|
tStart = getSystemTicks();
|
|
while (i--)
|
|
{
|
|
try
|
|
{
|
|
xBench->raiseRuntimeException();
|
|
}
|
|
catch (RuntimeException &)
|
|
{
|
|
}
|
|
}
|
|
tEnd = getSystemTicks();
|
|
rSheet.insert( "Ba: raising RuntimeException", nLoop, tEnd - tStart );
|
|
|
|
//------------------------------------
|
|
}
|
|
|
|
//--------------------------------------------------------------------------------------------------
|
|
static OUString extractParam( const Sequence< OUString > & rArgs, const OUString & rParam )
|
|
{
|
|
const OUString * pArgs = rArgs.getConstArray();
|
|
for ( sal_Int32 nPos = rArgs.getLength(); nPos--; )
|
|
{
|
|
if (pArgs[nPos].indexOf( rParam ) == 0 &&
|
|
pArgs[nPos].getLength() > (rParam.getLength()+1))
|
|
{
|
|
return pArgs[nPos].copy( rParam.getLength() +1 ); // XXX=bla
|
|
}
|
|
}
|
|
return OUString();
|
|
}
|
|
|
|
const sal_Int32 nMagicNumberDirect = 34000;
|
|
|
|
//XMain
|
|
//__________________________________________________________________________________________________
|
|
sal_Int32 TestImpl::run( const Sequence< OUString > & rArgs )
|
|
throw (RuntimeException)
|
|
{
|
|
// defaults
|
|
FILE * stream = stderr;
|
|
sal_Int64 nLoop = NLOOP;
|
|
OUString aArg("dms");
|
|
|
|
try
|
|
{
|
|
OUString aLoopStr( extractParam( rArgs, OUString("loop") ) );
|
|
if (aLoopStr.getLength())
|
|
{
|
|
sal_Int64 n = aLoopStr.toInt64();
|
|
if (n > 0)
|
|
nLoop = n;
|
|
}
|
|
|
|
OUString aDurationStr( extractParam( rArgs , OUString("duration" ) ) );
|
|
if( aDurationStr.getLength() )
|
|
{
|
|
sal_Int64 n = aDurationStr.toInt64();
|
|
if( n >0 )
|
|
nLoop = nMagicNumberDirect * n;
|
|
}
|
|
|
|
OUString aLogStr( extractParam( rArgs, OUString("log") ) );
|
|
if (aLogStr.getLength())
|
|
{
|
|
if (aLogStr.compareToAscii( "stderr" ) == 0)
|
|
{
|
|
stream = stderr;
|
|
}
|
|
else if (aLogStr.compareToAscii( "stdout" ) == 0)
|
|
{
|
|
stream = stdout;
|
|
}
|
|
else
|
|
{
|
|
OString aFileName( OUStringToOString( aLogStr, RTL_TEXTENCODING_ASCII_US ) );
|
|
stream = ::fopen( aFileName.getStr(), "w" );
|
|
if (! stream)
|
|
{
|
|
OUStringBuffer buf( 32 );
|
|
buf.appendAscii( RTL_CONSTASCII_STRINGPARAM("cannot open file for writing: \"") );
|
|
buf.append( aLogStr );
|
|
buf.appendAscii( RTL_CONSTASCII_STRINGPARAM("\"!") );
|
|
throw RuntimeException( buf.makeStringAndClear(), Reference< XInterface >() );
|
|
}
|
|
}
|
|
}
|
|
|
|
OUString aArgStr( extractParam( rArgs, OUString("opt") ) );
|
|
if (aArgStr.getLength())
|
|
{
|
|
aArg = aArgStr;
|
|
}
|
|
|
|
if (! rArgs.getLength())
|
|
out( "\n> no options given, using defaults" );
|
|
|
|
// params
|
|
out( "\n> opt=" );
|
|
out( aArg );
|
|
out( " log=" );
|
|
if (stream == stderr)
|
|
out( "stderr" );
|
|
else if (stream == stdout)
|
|
out( "stdout loop=" );
|
|
else
|
|
out( aLogStr );
|
|
out( " loop=" );
|
|
out( nLoop );
|
|
out( "\n" );
|
|
t_TimingSheetMap aSheets;
|
|
TimingSheet aDirect;
|
|
|
|
//------------------------------------------------------------------------------------------
|
|
|
|
if (aArg.indexOf( 'd' ) >= 0)
|
|
{
|
|
// in process direct test
|
|
sal_uInt32 nStart = getSystemTicks();
|
|
benchmark( aDirect, getDirect(), nLoop );
|
|
sal_uInt32 nEnd = getSystemTicks();
|
|
fprintf( stderr, "Duration (direct in process): %g s\n", (nEnd - nStart)/1000. );
|
|
}
|
|
|
|
//------------------------------------------------------------------------------------------
|
|
|
|
if (aArg.indexOf( 'm' ) >= 0)
|
|
{
|
|
// in process uno dispatch
|
|
Environment aCppEnv, aAnoCppEnv;
|
|
OUString aCurrentLanguageBindingName( RTL_CONSTASCII_USTRINGPARAM(CPPU_CURRENT_LANGUAGE_BINDING_NAME) );
|
|
uno_getEnvironment( reinterpret_cast< uno_Environment ** >( &aCppEnv ),
|
|
aCurrentLanguageBindingName.pData, 0 );
|
|
// anonymous
|
|
uno_createEnvironment( reinterpret_cast< uno_Environment ** >( &aAnoCppEnv ),
|
|
aCurrentLanguageBindingName.pData, 0 );
|
|
|
|
// pseudo mapping uno<->uno: does nothing!
|
|
Mapping aMapping( aCppEnv.get(), aAnoCppEnv.get(), OUString("pseudo") );
|
|
if (! aMapping.is())
|
|
throw RuntimeException("no pseudo mapping available!", Reference< XInterface >() );
|
|
|
|
Reference< XInterface > xMapped;
|
|
Reference< XInterface > xDirect( getDirect() );
|
|
aMapping.mapInterface( reinterpret_cast< void ** >( &xMapped ), xDirect.get(),
|
|
::getCppuType( &xDirect ) );
|
|
if (! xMapped.is())
|
|
throw RuntimeException("mapping object failed!", Reference< XInterface >() );
|
|
|
|
sal_uInt32 nStart = getSystemTicks();
|
|
benchmark( aSheets[ "mapped in process" ], xMapped, nLoop / 100 );
|
|
sal_uInt32 nEnd = getSystemTicks();
|
|
fprintf( stderr, "Duration (mapped in process): %g s\n", (nStart - nEnd)/1000. );
|
|
}
|
|
|
|
//------------------------------------------------------------------------------------------
|
|
|
|
if (aArg.indexOf( 's' ) >= 0)
|
|
{
|
|
// start server process
|
|
oslSecurity hSecurity = osl_getCurrentSecurity();
|
|
if (! hSecurity)
|
|
throw RuntimeException("cannot get current security handle!", Reference< XInterface >() );
|
|
|
|
OUString aArgs[] = {
|
|
OUString("-c"),
|
|
OUString("com.sun.star.comp.performance.PerformanceTestObject"),
|
|
OUString("-l"),
|
|
#ifdef SAL_UNX
|
|
OUString("libperfobj.so"),
|
|
#else
|
|
OUString("perfobj.dll"),
|
|
#endif
|
|
OUString("-r"),
|
|
OUString("applicat.rdb"),
|
|
OUString("-u"),
|
|
OUString("uno:socket,host=localhost,port=6000;iiop;TestRemoteObject"),
|
|
OUString("--singleaccept")
|
|
};
|
|
rtl_uString * pArgs[] = {
|
|
aArgs[0].pData,
|
|
aArgs[1].pData,
|
|
aArgs[2].pData,
|
|
aArgs[3].pData,
|
|
aArgs[4].pData,
|
|
aArgs[5].pData,
|
|
aArgs[6].pData,
|
|
aArgs[7].pData,
|
|
aArgs[8].pData,
|
|
};
|
|
|
|
out( "\n> executing: \"uno" );
|
|
for ( sal_Int32 nPos = 0; nPos < (sizeof(aArgs) / sizeof(OUString)); ++nPos )
|
|
{
|
|
out( " " );
|
|
out( aArgs[nPos] );
|
|
}
|
|
out( "\" ..." );
|
|
|
|
oslProcess hProcess = 0;
|
|
OUString aUnoExe("uno");
|
|
OUString aWorkingDir(".");
|
|
osl_executeProcess(
|
|
aUnoExe.pData, pArgs, sizeof(aArgs) / sizeof(OUString),
|
|
osl_Process_SEARCHPATH | osl_Process_DETACHED | osl_Process_NORMAL,
|
|
hSecurity, aWorkingDir.pData, 0, 0, &hProcess );
|
|
|
|
osl_freeSecurityHandle( hSecurity );
|
|
if (! hProcess)
|
|
throw RuntimeException("cannot start server process!", Reference< XInterface >() );
|
|
osl_freeProcessHandle( hProcess );
|
|
|
|
// wait three seconds
|
|
TimeValue threeSeconds;
|
|
threeSeconds.Seconds = 3;
|
|
osl_waitThread( &threeSeconds );
|
|
|
|
// connect and resolve outer process object
|
|
Reference< XInterface > xResolvedObject( resolveObject( OUString("uno:socket,host=localhost,port=6000;iiop;TestRemoteObject") ) );
|
|
|
|
benchmark( aSheets[ "remote same host" ], xResolvedObject, nLoop / 300 );
|
|
}
|
|
|
|
//------------------------------------------------------------------------------------------
|
|
|
|
if (aArg.indexOf( 'r' ) >= 0)
|
|
{
|
|
// remote
|
|
OUString aUnoUrl( extractParam( rArgs, OUString("url") ) );
|
|
if (! aUnoUrl.getLength())
|
|
throw RuntimeException( OUString( RTL_CONSTASCII_USTRINGPARAM("performance test r(emote) needs additional uno url!") ), Reference< XInterface >() );
|
|
|
|
// connect and resolve outer process object
|
|
Reference< XInterface > xResolvedObject( resolveObject( aUnoUrl ) );
|
|
|
|
sal_Int32 t1 = getSystemTicks();
|
|
OString o = OUStringToOString( aUnoUrl, RTL_TEXTENCODING_ASCII_US );
|
|
benchmark( aSheets[ o.getStr() ], xResolvedObject, nLoop / 900 );
|
|
sal_Int32 t2 = getSystemTicks();
|
|
fprintf( stderr, "Duration (%s): %g s\n", o.getStr(),(t2 - t1)/1000. );
|
|
}
|
|
|
|
//------------------------------------------------------------------------------------------
|
|
|
|
if (aArg.indexOf( 'j' ) >= 0)
|
|
{
|
|
// java
|
|
benchmark( aSheets[ "java in process" ],
|
|
_xSMgr->createInstance("com.sun.star.comp.benchmark.JavaTestObject"),
|
|
nLoop / 1000 );
|
|
}
|
|
|
|
//------------------------------------------------------------------------------------------
|
|
// dump out tables
|
|
|
|
out( "\nTimes( ratio to direct in process )", stream );
|
|
#if OSL_DEBUG_LEVEL > 1
|
|
out ("; compiled with OSL_DEBUG_LEVEL > 1", stream );
|
|
#endif
|
|
out( ":", stream );
|
|
|
|
sal_Int32 nPos = 60;
|
|
out( "[direct in process]", stream, nPos );
|
|
t_TimingSheetMap::const_iterator iSheets( aSheets.begin() );
|
|
for ( ; iSheets != aSheets.end(); ++iSheets )
|
|
{
|
|
nPos += 40;
|
|
out( "[", stream, nPos );
|
|
out( (*iSheets).first.c_str(), stream );
|
|
out( "]", stream );
|
|
}
|
|
for ( t_TimeEntryMap::const_iterator iTopics( aDirect._entries.begin() );
|
|
iTopics != aDirect._entries.end(); ++iTopics )
|
|
{
|
|
const std::string & rTopic = (*iTopics).first;
|
|
|
|
out( "\n", stream );
|
|
out( rTopic.c_str(), stream );
|
|
|
|
out( ":", stream, 58, '.' );
|
|
|
|
sal_Int32 nPos = 60;
|
|
|
|
double secs = (*iTopics).second.secPerCall();
|
|
if (secs > 0.0)
|
|
{
|
|
out( secs * 1000, stream, nPos );
|
|
out( "ms", stream );
|
|
}
|
|
else
|
|
{
|
|
out( "NA", stream, nPos );
|
|
}
|
|
|
|
iSheets = aSheets.begin();
|
|
for ( ; iSheets != aSheets.end(); ++iSheets )
|
|
{
|
|
const t_TimeEntryMap::const_iterator iFind( (*iSheets).second._entries.find( rTopic ) );
|
|
OSL_ENSURE( iFind != (*iSheets).second._entries.end(), "####" );
|
|
|
|
nPos += 40;
|
|
|
|
double secs = (*iFind).second.secPerCall();
|
|
if (secs != 0.0)
|
|
{
|
|
out( secs * 1000, stream, nPos );
|
|
out( "ms", stream );
|
|
|
|
out( " (", stream );
|
|
double ratio = (*iFind).second.ratio( (*iTopics).second );
|
|
if (ratio != 0.0)
|
|
{
|
|
out( ratio, stream );
|
|
out( " x)", stream );
|
|
}
|
|
else
|
|
{
|
|
out( "NA)", stream );
|
|
}
|
|
}
|
|
else
|
|
{
|
|
out( "NA", stream, nPos );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
catch (Exception & rExc)
|
|
{
|
|
if (stream != stderr && stream != stdout)
|
|
::fclose( stream );
|
|
throw RuntimeException( rExc.Message, rExc.Context );
|
|
}
|
|
|
|
if (stream != stderr && stream != stdout)
|
|
::fclose( stream );
|
|
|
|
out( "\n> done.\n" );
|
|
return 0;
|
|
}
|
|
|
|
}
|
|
|
|
|
|
//##################################################################################################
|
|
//##################################################################################################
|
|
//##################################################################################################
|
|
|
|
|
|
extern "C"
|
|
{
|
|
//==================================================================================================
|
|
sal_Bool SAL_CALL component_writeInfo(
|
|
void * pServiceManager, void * pRegistryKey )
|
|
{
|
|
if (pRegistryKey)
|
|
{
|
|
try
|
|
{
|
|
Reference< XRegistryKey > xNewKey(
|
|
reinterpret_cast< XRegistryKey * >( pRegistryKey )->createKey(
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM("/" IMPLNAME "/UNO/SERVICES") ) ) );
|
|
xNewKey->createKey( OUString( RTL_CONSTASCII_USTRINGPARAM(SERVICENAME) ) );
|
|
|
|
return sal_True;
|
|
}
|
|
catch (InvalidRegistryException &)
|
|
{
|
|
OSL_FAIL( "### InvalidRegistryException!" );
|
|
}
|
|
}
|
|
return sal_False;
|
|
}
|
|
//==================================================================================================
|
|
SAL_DLLPUBLIC_EXPORT void * SAL_CALL component_getFactory(
|
|
const sal_Char * pImplName, void * pServiceManager, void * pRegistryKey )
|
|
{
|
|
void * pRet = 0;
|
|
|
|
if (pServiceManager && rtl_str_compare( pImplName, IMPLNAME ) == 0)
|
|
{
|
|
Reference< XSingleServiceFactory > xFactory( createSingleFactory(
|
|
reinterpret_cast< XMultiServiceFactory * >( pServiceManager ),
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM(IMPLNAME) ),
|
|
benchmark_test::TestImpl_create,
|
|
benchmark_test::getSupportedServiceNames() ) );
|
|
|
|
if (xFactory.is())
|
|
{
|
|
xFactory->acquire();
|
|
pRet = xFactory.get();
|
|
}
|
|
}
|
|
|
|
return pRet;
|
|
}
|
|
}
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|