office-gobmx/stoc/test/registry_tdprovider/testregistrytdprovider.cxx
Rüdiger Timm 6a2911b5e1 INTEGRATION: CWS sb14 (1.1.2); FILE ADDED
2004/03/18 13:05:46 sb 1.1.2.2: #i26602# Make sure typereg_reader_getSuperTypeName is not called with an invalid index.
2004/03/16 17:29:12 sb 1.1.2.1: #i21150# Tests.
2004-03-30 15:18:21 +00:00

622 lines
25 KiB
C++

/*************************************************************************
*
* $RCSfile: testregistrytdprovider.cxx,v $
*
* $Revision: 1.2 $
*
* last change: $Author: rt $ $Date: 2004-03-30 16:18:21 $
*
* The Contents of this file are made available subject to the terms of
* either of the following licenses
*
* - GNU Lesser General Public License Version 2.1
* - Sun Industry Standards Source License Version 1.1
*
* Sun Microsystems Inc., October, 2000
*
* GNU Lesser General Public License Version 2.1
* =============================================
* Copyright 2000 by Sun Microsystems, Inc.
* 901 San Antonio Road, Palo Alto, CA 94303, USA
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License version 2.1, as published by the Free Software Foundation.
*
* This library 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 for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307 USA
*
*
* Sun Industry Standards Source License Version 1.1
* =================================================
* The contents of this file are subject to the Sun Industry Standards
* Source License Version 1.1 (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.openoffice.org/license.html.
*
* Software provided under this License is provided on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
* WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
* MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
* See the License for the specific provisions governing your rights and
* obligations concerning the Software.
*
* The Initial Developer of the Original Code is: Sun Microsystems, Inc.
*
* Copyright: 2000 by Sun Microsystems, Inc.
*
* All Rights Reserved.
*
* Contributor(s): _______________________________________
*
*
************************************************************************/
#include "com/sun/star/beans/XPropertySet.hpp"
#include "com/sun/star/container/XHierarchicalNameAccess.hpp"
#include "com/sun/star/lang/XMain.hpp"
#include "com/sun/star/lang/XSingleComponentFactory.hpp"
#include "com/sun/star/reflection/XCompoundTypeDescription.hpp"
#include "com/sun/star/reflection/XInterfaceAttributeTypeDescription2.hpp"
#include "com/sun/star/reflection/XInterfaceMemberTypeDescription.hpp"
#include "com/sun/star/reflection/XInterfaceMethodTypeDescription.hpp"
#include "com/sun/star/reflection/XInterfaceTypeDescription2.hpp"
#include "com/sun/star/reflection/XServiceTypeDescription2.hpp"
#include "com/sun/star/reflection/XSingletonTypeDescription2.hpp"
#include "com/sun/star/reflection/XTypeDescription.hpp"
#include "com/sun/star/registry/InvalidRegistryException.hpp"
#include "com/sun/star/registry/XRegistryKey.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 "com/sun/star/uno/TypeClass.hpp"
#include "com/sun/star/uno/XComponentContext.hpp"
#include "com/sun/star/uno/XInterface.hpp"
#include "cppuhelper/factory.hxx"
#include "cppuhelper/implbase1.hxx"
#include "cppuhelper/weak.hxx"
#include "rtl/textenc.h"
#include "rtl/ustring.h"
#include "rtl/ustring.hxx"
#include "sal/types.h"
#include "uno/environment.h"
#include "uno/lbnames.h"
#include /*MSVC trouble: <cstdlib>*/ <stdlib.h>
#include <iostream>
#include <ostream>
namespace css = com::sun::star;
namespace {
class Service: public cppu::WeakImplHelper1< css::lang::XMain > {
public:
virtual sal_Int32 SAL_CALL
run(css::uno::Sequence< rtl::OUString > const & arguments)
throw (css::uno::RuntimeException);
static rtl::OUString getImplementationName();
static css::uno::Sequence< rtl::OUString > getSupportedServiceNames();
static css::uno::Reference< css::uno::XInterface > SAL_CALL createInstance(
css::uno::Reference< css::uno::XComponentContext > const & context)
throw (css::uno::Exception);
private:
explicit Service(
css::uno::Reference< css::uno::XComponentContext > const & context):
m_context(context)
{}
css::uno::Reference< css::uno::XComponentContext > m_context;
};
}
namespace {
std::ostream & operator <<(std::ostream & out, rtl::OUString const & value) {
return out << rtl::OUStringToOString(value, RTL_TEXTENCODING_UTF8).getStr();
}
void assertTrue(bool argument) {
if (!argument) {
std::cerr
<< "assertTrue(" << argument << ") failed" << std::endl;
/*MSVC trouble: std::*/abort();
}
}
void assertFalse(bool argument) {
if (argument) {
std::cerr
<< "assertFalse(" << argument << ") failed" << std::endl;
/*MSVC trouble: std::*/abort();
}
}
template< typename T > void assertEqual(T const & value, T const & argument) {
if (argument != value) {
std::cerr
<< "assertEqual(" << value << ", " << argument << ") failed"
<< std::endl;
/*MSVC trouble: std::*/abort();
}
}
}
sal_Int32 Service::run(css::uno::Sequence< rtl::OUString > const & arguments)
throw (css::uno::RuntimeException)
{
css::uno::Reference< css::lang::XMultiComponentFactory > factory(
m_context->getServiceManager());
assertTrue(factory.is());
css::uno::Sequence< css::uno::Any > args(1);
args[0] = css::uno::Reference< css::beans::XPropertySet >(
factory, css::uno::UNO_QUERY_THROW)->getPropertyValue(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("Registry")));
css::uno::Reference< css::container::XHierarchicalNameAccess > provider(
factory->createInstanceWithArgumentsAndContext(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"com.sun.star.comp.stoc.RegistryTypeDescriptionProvider")),
args, m_context),
css::uno::UNO_QUERY_THROW);
// The following assumes that interface members are sorted by increasing
// values of XInterfaceMemberTypeDescription.getPosition, the exceptions
// of interface attributes and interface methods, the constructors of
// services, and the exceptions of service constructors are sorted as given
// in the UNOIDL source code:
css::uno::Reference< css::reflection::XCompoundTypeDescription > exception;
exception
= css::uno::Reference< css::reflection::XCompoundTypeDescription >(
provider->getByHierarchicalName(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"com.sun.star.uno.Exception"))),
css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_EXCEPTION, exception->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("com.sun.star.uno.Exception")),
exception->getName());
assertFalse(exception->getBaseType().is());
exception
= css::uno::Reference< css::reflection::XCompoundTypeDescription >(
provider->getByHierarchicalName(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"com.sun.star.uno.RuntimeException"))),
css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_EXCEPTION, exception->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("com.sun.star.uno.RuntimeException")),
exception->getName());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("com.sun.star.uno.Exception")),
exception->getBaseType()->getName());
css::uno::Reference< css::reflection::XCompoundTypeDescription > structure(
provider->getByHierarchicalName(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"test.registrytdprovider.Struct2"))),
css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_STRUCT, structure->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.Struct2")),
structure->getName());
assertFalse(structure->getBaseType().is());
assertEqual< sal_Int32 >(1, structure->getMemberTypes().getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.Struct1")),
structure->getMemberTypes()[0]->getName());
assertEqual< sal_Int32 >(1, structure->getMemberNames().getLength());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("s1")),
structure->getMemberNames()[0]);
css::uno::Reference< css::reflection::XInterfaceTypeDescription2 >
interface(
provider->getByHierarchicalName(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"test.registrytdprovider.XTest"))),
css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_INTERFACE, interface->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XTest")),
interface->getName());
css::uno::Sequence<
css::uno::Reference< css::reflection::XInterfaceTypeDescription2 > >
bases(interface->getBaseTypes());
assertEqual< sal_Int32 >(1, bases.getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("com.sun.star.uno.XInterface")),
bases[0]->getName());
css::uno::Sequence<
css::uno::Reference< css::reflection::XInterfaceTypeDescription2 > >
optionalBases(interface->getOptionalBaseTypes());
assertEqual< sal_Int32 >(1, optionalBases.getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XBase")),
optionalBases[0]->getName());
css::uno::Sequence<
css::uno::Reference<
css::reflection::XInterfaceMemberTypeDescription > > members(
interface->getMembers());
assertEqual< sal_Int32 >(5, members.getLength());
css::uno::Reference< css::reflection::XInterfaceAttributeTypeDescription2 >
attribute;
css::uno::Sequence<
css::uno::Reference< css::reflection::XCompoundTypeDescription > >
getExceptions;
css::uno::Sequence<
css::uno::Reference< css::reflection::XCompoundTypeDescription > >
setExceptions;
css::uno::Reference< css::reflection::XInterfaceMethodTypeDescription >
method;
attribute = css::uno::Reference<
css::reflection::XInterfaceAttributeTypeDescription2 >(
members[0], css::uno::UNO_QUERY_THROW);
assertEqual(
css::uno::TypeClass_INTERFACE_ATTRIBUTE, attribute->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XTest::a1")),
attribute->getName());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("a1")),
attribute->getMemberName());
assertEqual< sal_Int32 >(3, attribute->getPosition());
assertEqual< bool >(false, attribute->isReadOnly());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("short")),
attribute->getType()->getName());
assertEqual< bool >(true, attribute->isBound());
getExceptions = attribute->getGetExceptions();
assertEqual< sal_Int32 >(0, getExceptions.getLength());
setExceptions = attribute->getSetExceptions();
assertEqual< sal_Int32 >(0, setExceptions.getLength());
attribute = css::uno::Reference<
css::reflection::XInterfaceAttributeTypeDescription2 >(
members[1], css::uno::UNO_QUERY_THROW);
assertEqual(
css::uno::TypeClass_INTERFACE_ATTRIBUTE, attribute->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XTest::a2")),
attribute->getName());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("a2")),
attribute->getMemberName());
assertEqual< sal_Int32 >(4, attribute->getPosition());
assertEqual< bool >(false, attribute->isReadOnly());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("long")),
attribute->getType()->getName());
assertEqual< bool >(false, attribute->isBound());
getExceptions = attribute->getGetExceptions();
assertEqual< sal_Int32 >(2, getExceptions.getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"com.sun.star.lang.WrappedTargetException")),
getExceptions[0]->getName());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("com.sun.star.uno.RuntimeException")),
getExceptions[1]->getName());
setExceptions = attribute->getSetExceptions();
assertEqual< sal_Int32 >(2, setExceptions.getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("com.sun.star.uno.Exception")),
setExceptions[0]->getName());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"com.sun.star.lang.WrappedTargetException")),
setExceptions[1]->getName());
attribute = css::uno::Reference<
css::reflection::XInterfaceAttributeTypeDescription2 >(
members[2], css::uno::UNO_QUERY_THROW);
assertEqual(
css::uno::TypeClass_INTERFACE_ATTRIBUTE, attribute->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XTest::a3")),
attribute->getName());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("a3")),
attribute->getMemberName());
assertEqual< sal_Int32 >(5, attribute->getPosition());
assertEqual< bool >(true, attribute->isReadOnly());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("hyper")),
attribute->getType()->getName());
assertEqual< bool >(true, attribute->isBound());
getExceptions = attribute->getGetExceptions();
assertEqual< sal_Int32 >(1, getExceptions.getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"com.sun.star.lang.WrappedTargetException")),
getExceptions[0]->getName());
setExceptions = attribute->getSetExceptions();
assertEqual< sal_Int32 >(0, setExceptions.getLength());
method = css::uno::Reference<
css::reflection::XInterfaceMethodTypeDescription >(
members[3], css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_INTERFACE_METHOD, method->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XTest::f1")),
method->getName());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("f1")),
method->getMemberName());
assertEqual< sal_Int32 >(6, method->getPosition());
assertEqual< bool >(false, method->isOneway());
assertEqual< sal_Int32 >(1, method->getParameters().getLength());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("p")),
method->getParameters()[0]->getName());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("any")),
method->getParameters()[0]->getType()->getName());
assertEqual< bool >(false, method->getParameters()[0]->isIn());
assertEqual< bool >(true, method->getParameters()[0]->isOut());
assertEqual< sal_Int32 >(0, method->getParameters()[0]->getPosition());
assertEqual< sal_Int32 >(1, method->getExceptions().getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("com.sun.star.uno.RuntimeException")),
method->getExceptions()[0]->getName());
method = css::uno::Reference<
css::reflection::XInterfaceMethodTypeDescription >(
members[4], css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_INTERFACE_METHOD, method->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XTest::f2")),
method->getName());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("f2")),
method->getMemberName());
assertEqual< sal_Int32 >(7, method->getPosition());
assertEqual< bool >(true, method->isOneway());
assertEqual< sal_Int32 >(0, method->getParameters().getLength());
assertEqual< sal_Int32 >(0, method->getExceptions().getLength());
css::uno::Reference< css::reflection::XServiceTypeDescription2 > service;
service = css::uno::Reference< css::reflection::XServiceTypeDescription2 >(
provider->getByHierarchicalName(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"test.registrytdprovider.Service1"))),
css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_SERVICE, service->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.Service1")),
service->getName());
assertEqual< sal_Int32 >(0, service->getMandatoryServices().getLength());
assertEqual< sal_Int32 >(0, service->getOptionalServices().getLength());
assertEqual< sal_Int32 >(0, service->getMandatoryInterfaces().getLength());
assertEqual< sal_Int32 >(0, service->getOptionalInterfaces().getLength());
assertEqual< bool >(true, service->isSingleInterfaceBased());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XTest")),
service->getInterface()->getName());
assertEqual< sal_Int32 >(2, service->getConstructors().getLength());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("c1")),
service->getConstructors()[0]->getName());
assertEqual< sal_Int32 >(
0, service->getConstructors()[0]->getParameters().getLength());
assertEqual< sal_Int32 >(
0, service->getConstructors()[0]->getExceptions().getLength());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("c2")),
service->getConstructors()[1]->getName());
assertEqual< sal_Int32 >(
1, service->getConstructors()[1]->getParameters().getLength());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("p")),
service->getConstructors()[1]->getParameters()[0]->getName());
assertEqual(
rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("any")),
(service->getConstructors()[1]->getParameters()[0]->getType()->
getName()));
assertEqual< bool >(
true, service->getConstructors()[1]->getParameters()[0]->isIn());
assertEqual< bool >(
false, service->getConstructors()[1]->getParameters()[0]->isOut());
assertEqual< sal_Int32 >(
0, service->getConstructors()[1]->getParameters()[0]->getPosition());
assertEqual< bool >(
true,
service->getConstructors()[1]->getParameters()[0]->isRestParameter());
assertEqual< sal_Int32 >(
1, service->getConstructors()[1]->getExceptions().getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("com.sun.star.uno.RuntimeException")),
service->getConstructors()[1]->getExceptions()[0]->getName());
service = css::uno::Reference< css::reflection::XServiceTypeDescription2 >(
provider->getByHierarchicalName(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"test.registrytdprovider.Service2"))),
css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_SERVICE, service->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.Service2")),
service->getName());
assertEqual< sal_Int32 >(0, service->getMandatoryServices().getLength());
assertEqual< sal_Int32 >(0, service->getOptionalServices().getLength());
assertEqual< sal_Int32 >(1, service->getMandatoryInterfaces().getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XTest")),
service->getMandatoryInterfaces()[0]->getName());
assertEqual< sal_Int32 >(1, service->getOptionalInterfaces().getLength());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XBase")),
service->getOptionalInterfaces()[0]->getName());
assertEqual< bool >(false, service->isSingleInterfaceBased());
assertFalse(service->getInterface().is());
assertEqual< sal_Int32 >(0, service->getConstructors().getLength());
css::uno::Reference< css::reflection::XSingletonTypeDescription2 >
singleton;
singleton = css::uno::Reference<
css::reflection::XSingletonTypeDescription2 >(
provider->getByHierarchicalName(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"test.registrytdprovider.Singleton1"))),
css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_SINGLETON, singleton->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.Singleton1")),
singleton->getName());
assertFalse(singleton->getService().is());
assertEqual< bool >(true, singleton->isInterfaceBased());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.XTest")),
singleton->getInterface()->getName());
singleton = css::uno::Reference<
css::reflection::XSingletonTypeDescription2 >(
provider->getByHierarchicalName(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM(
"test.registrytdprovider.Singleton2"))),
css::uno::UNO_QUERY_THROW);
assertEqual(css::uno::TypeClass_SINGLETON, singleton->getTypeClass());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.Singleton2")),
singleton->getName());
assertEqual(
rtl::OUString(
RTL_CONSTASCII_USTRINGPARAM("test.registrytdprovider.Service1")),
singleton->getService()->getName());
assertEqual< bool >(false, singleton->isInterfaceBased());
assertFalse(singleton->getInterface().is());
return 0;
}
rtl::OUString Service::getImplementationName() {
return rtl::OUString::createFromAscii("test.registrytdprovider.impl");
}
css::uno::Sequence< rtl::OUString > Service::getSupportedServiceNames() {
return css::uno::Sequence< rtl::OUString >();
}
css::uno::Reference< css::uno::XInterface > Service::createInstance(
css::uno::Reference< css::uno::XComponentContext > const & context)
throw (css::uno::Exception)
{
return static_cast< cppu::OWeakObject * >(new Service(context));
}
extern "C" void SAL_CALL component_getImplementationEnvironment(
char const ** envTypeName, uno_Environment **)
{
if (envTypeName != 0) {
*envTypeName = CPPU_CURRENT_LANGUAGE_BINDING_NAME;
}
}
extern "C" void * SAL_CALL component_getFactory(char const * implName,
void * serviceManager, void *) {
void * p = 0;
if (serviceManager != 0) {
css::uno::Reference< css::lang::XSingleComponentFactory > f;
if (Service::getImplementationName().equalsAscii(implName)) {
f = cppu::createSingleComponentFactory(
&Service::createInstance, Service::getImplementationName(),
Service::getSupportedServiceNames());
}
if (f.is()) {
f->acquire();
p = f.get();
}
}
return p;
}
namespace {
bool writeInfo(void * registryKey, rtl::OUString const & implementationName,
css::uno::Sequence< rtl::OUString > const & serviceNames) {
rtl::OUString keyName(rtl::OUString::createFromAscii("/"));
keyName += implementationName;
keyName += rtl::OUString::createFromAscii("/UNO/SERVICES");
css::uno::Reference< css::registry::XRegistryKey > key;
try {
key = static_cast< css::registry::XRegistryKey * >(registryKey)->
createKey(keyName);
} catch (css::registry::InvalidRegistryException &) {}
if (!key.is()) {
return false;
}
bool success = true;
for (sal_Int32 i = 0; i < serviceNames.getLength(); ++i) {
try {
key->createKey(serviceNames[i]);
} catch (css::registry::InvalidRegistryException &) {
success = false;
break;
}
}
return success;
}
}
extern "C" sal_Bool SAL_CALL component_writeInfo(void *, void * registryKey) {
return registryKey
&& writeInfo(registryKey, Service::getImplementationName(),
Service::getSupportedServiceNames());
}