cppuhelper/test/bootstrap/bootstrap.test.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   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/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  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 .
  18  */
  19
  20
  21 #include <sal/main.h>
  22 #include <osl/file.hxx>
  23
  24 #include <typelib/typedescription.hxx>
  25
  26 #include <cppuhelper/bootstrap.hxx>
  27 #include <cppuhelper/shlib.hxx>
  28
  29 #include <com/sun/star/lang/XComponent.hpp>
  30
  31 #include <uno/environment.hxx>
  32 #include <uno/lbnames.h>
  33 #include <cppu/EnvDcp.hxx>
  34 #include <cppu/EnvGuards.hxx>
  35
  36 #include <iostream>
  37
  38
  39 #ifndef SAL_DLLPREFIX
  40 # define SAL_DLLPREFIX  ""
  41 #endif
  42
  43
  44 using namespace com::sun::star;
  45
  46
  47 static rtl::OUString s_comment;
  48
  49 static bool s_check_object_is_in(void * pObject)
  50 {
  51     uno::Environment currentEnv(uno::Environment::getCurrent());
  52
  53     rtl_uString * pOId = NULL;
  54     currentEnv.get()->pExtEnv->getObjectIdentifier(currentEnv.get()->pExtEnv, &pOId, pObject);
  55
  56
  57     uno::TypeDescription typeDescription(rtl::OUString("com.sun.star.uno.XInterface"));
  58
  59     void * pRegisteredObject = NULL;
  60     currentEnv.get()->pExtEnv->getRegisteredInterface(currentEnv.get()->pExtEnv,
  61                                                       &pRegisteredObject,
  62                                                       pOId,
  63                                                       (typelib_InterfaceTypeDescription *)typeDescription.get());
  64
  65
  66     if (pOId) rtl_uString_release(pOId);
  67
  68     bool result = pRegisteredObject != NULL;
  69
  70     if (result)
  71         currentEnv.get()->pExtEnv->releaseInterface(currentEnv.get()->pExtEnv, pRegisteredObject);
  72
  73      return result;
  74 }
  75
  76 static void s_test__loadSharedLibComponentFactory(rtl::OUString const & clientPurpose,
  77                                                   rtl::OUString const & servicePurpose)
  78 {
  79     cppu::EnvGuard envGuard(uno::Environment(UNO_LB_UNO + clientPurpose, NULL));
  80     if (!clientPurpose.isEmpty() && !envGuard.is())
  81     {
  82         s_comment += "\t\tcouldn't get purpose env: \"" + clientPurpose + "\" - FAILURE\n";
  83         return;
  84     }
  85
  86     rtl::OString os_clientPurpose(rtl::OUStringToOString(clientPurpose, RTL_TEXTENCODING_ASCII_US));
  87
  88     uno::Reference<uno::XInterface> xItf(
  89         cppu::loadSharedLibComponentFactory(
  90             rtl::OUString(SAL_DLLPREFIX "TestComponent.uno" SAL_DLLEXTENSION),
  91 #ifdef WIN32
  92             "",
  93 #else
  94             "file://../lib/",
  95 #endif
  96             "impl.test.TestComponent" + servicePurpose,
  97             uno::Reference<lang::XMultiServiceFactory>(),
  98             uno::Reference<registry::XRegistryKey>()
  99             )
 100         );
 101
 102     if (!xItf.is())
 103     {
 104         s_comment += rtl::OUString("\t\tgot no object - FAILURE\n");
 105         return;
 106     }
 107
 108     if (!clientPurpose.equals(servicePurpose) && !s_check_object_is_in(xItf.get()))
 109     {
 110         s_comment += "\t\tcouldn't find object in current purpose \"" + clientPurpose + "\" - FAILURE\n";
 111     }
 112
 113     if (!cppu::EnvDcp::getPurpose(uno::Environment::getCurrent().getTypeName()).equals(clientPurpose))
 114     {
 115         s_comment += "\t\tdid not enter client purpose \"" + clientPurpose + "\" - FAILURE\n";
 116     }
 117 }
 118
 119 static void s_test__loadSharedLibComponentFactory__free_free()
 120 {
 121     s_comment += "\ts_test__loadSharedLibComponentFactory__free_free\n";
 122
 123     s_test__loadSharedLibComponentFactory("", "");
 124 }
 125
 126 static void s_test__loadSharedLibComponentFactory__free_purpose()
 127 {
 128     s_comment += "\ts_test__loadSharedLibComponentFactory__free_purpose\n";
 129
 130     s_test__loadSharedLibComponentFactory("", ":testenv");
 131 }
 132
 133 static void s_test__loadSharedLibComponentFactory__purpose_free()
 134 {
 135     s_comment += "\ts_test__loadSharedLibComponentFactory__purpose_free\n";
 136
 137     s_test__loadSharedLibComponentFactory(":testenv", "");
 138 }
 139
 140 static void s_test__loadSharedLibComponentFactory__purpose_purpose()
 141 {
 142     s_comment += "\ts_test__loadSharedLibComponentFactory__purpose_purpose\n";
 143
 144     s_test__loadSharedLibComponentFactory(":testenv", ":testenv");
 145 }
 146
 147 static rtl::OUString s_getSDrive()
 148 {
 149     rtl::OUString path;//("file://");
 150
 151     // FIXME no more S drive
 152
 153     osl::FileBase::getFileURLFromSystemPath(path, path);
 154
 155     return path;
 156 }
 157
 158 static void s_test__createSimpleRegistry(rtl::OUString const & clientPurpose)
 159 {
 160     cppu::EnvGuard envGuard(uno::Environment(rtl::OUString(UNO_LB_UNO)
 161                                                + clientPurpose, NULL));
 162     if (!clientPurpose.isEmpty() && !envGuard.is())
 163     {
 164         s_comment += "\t\tcouldn't get purpose env: \"" + clientPurpose + "\" - FAILURE\n";
 165         return;
 166     }
 167
 168     uno::Reference<registry::XSimpleRegistry> registry(cppu::createSimpleRegistry(
 169                                                            s_getSDrive()));
 170
 171     if (!registry.is())
 172     {
 173         s_comment += "\t\tgot no object - FAILURE\n";
 174         return;
 175     }
 176
 177     if (!clientPurpose.isEmpty() && !s_check_object_is_in(registry.get()))
 178     {
 179         s_comment += "\t\tcouldn't find object in current purpose \"" + clientPurpose + "\" - FAILURE\n";
 180     }
 181 }
 182
 183 static void s_test__createSimpleRegistry__free()
 184 {
 185     s_comment += "\ts_test__createSimpleRegistry__free\n";
 186
 187     s_test__createSimpleRegistry(rtl::OUString());
 188 }
 189
 190 static void s_test__createSimpleRegistry__purpose()
 191 {
 192     s_comment += "\ts_test__createSimpleRegistry__purpose\n";
 193
 194     s_test__createSimpleRegistry(":testenv");
 195 }
 196
 197
 198 static void s_test__bootstrap_InitialComponentContext(rtl::OUString const & clientPurpose)
 199 {
 200     cppu::EnvGuard envGuard(uno::Environment(rtl::OUString(UNO_LB_UNO)
 201                                                + clientPurpose, NULL));
 202     if (!clientPurpose.isEmpty() && !envGuard.is())
 203     {
 204         s_comment += "\t\tcouldn't get purpose env: \"" + clientPurpose + "\" - FAILURE\n";
 205         return;
 206     }
 207
 208     uno::Reference<uno::XComponentContext> xContext(
 209         cppu::bootstrap_InitialComponentContext(
 210             uno::Reference<registry::XSimpleRegistry>(),
 211             s_getSDrive())
 212         );
 213
 214     if (!xContext.is())
 215     {
 216         s_comment += "\t\tgot no object - FAILURE\n";
 217         return;
 218     }
 219
 220     if (!clientPurpose.isEmpty() && !s_check_object_is_in(xContext.get()))
 221     {
 222         s_comment += "\t\tcouldn't find object in current purpose \"" + clientPurpose + "\" - FAILURE\n";
 223     }
 224
 225     uno::Reference<lang::XComponent> xComponent(xContext, uno::UNO_QUERY_THROW);
 226     xComponent->dispose();
 227 }
 228
 229 static void s_test__bootstrap_InitialComponentContext__free()
 230 {
 231     s_comment += "\ts_test__bootstrap_InitialComponentContext__free\n";
 232
 233     s_test__bootstrap_InitialComponentContext(rtl::OUString());
 234 }
 235
 236 static void s_test__bootstrap_InitialComponentContext__purpose()
 237 {
 238     s_comment += "\ts_test__bootstrap_InitialComponentContext__purpose\n";
 239
 240     s_test__bootstrap_InitialComponentContext(":testenv");
 241 }
 242
 243
 244 SAL_IMPLEMENT_MAIN_WITH_ARGS(/*argc*/, argv)
 245 {
 246     s_test__createSimpleRegistry__free();
 247     s_test__createSimpleRegistry__purpose();
 248
 249     s_test__loadSharedLibComponentFactory__free_free();
 250     s_test__loadSharedLibComponentFactory__free_purpose();
 251     s_test__loadSharedLibComponentFactory__purpose_free();
 252     s_test__loadSharedLibComponentFactory__purpose_purpose();
 253
 254     s_test__bootstrap_InitialComponentContext__free();
 255     s_test__bootstrap_InitialComponentContext__purpose();
 256
 257     int ret;
 258     if (s_comment.indexOf("FAILURE") == -1)
 259     {
 260         s_comment += "TESTS PASSED\n";
 261         ret = 0;
 262     }
 263     else
 264     {
 265         s_comment += "TESTS _NOT_ PASSED\n";
 266         ret = -1;
 267     }
 268
 269     std::cerr
 270         << argv[0]
 271         << std::endl
 272         << rtl::OUStringToOString(s_comment, RTL_TEXTENCODING_ASCII_US).getStr()
 273         << std::endl;
 274
 275     return ret;
 276 }
 277
 278 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */