summaryrefslogtreecommitdiff
path: root/cppu/test/env_tester/purpenv.test.cxx
diff options
context:
space:
mode:
Diffstat (limited to 'cppu/test/env_tester/purpenv.test.cxx')
-rw-r--r--cppu/test/env_tester/purpenv.test.cxx401
1 files changed, 0 insertions, 401 deletions
diff --git a/cppu/test/env_tester/purpenv.test.cxx b/cppu/test/env_tester/purpenv.test.cxx
deleted file mode 100644
index 662a862c8..000000000
--- a/cppu/test/env_tester/purpenv.test.cxx
+++ /dev/null
@@ -1,401 +0,0 @@
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * 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 <iostream>
-
-#include "sal/main.h"
-
-#include "uno/environment.hxx"
-#include "uno/dispatcher.h"
-
-#include "typelib/typedescription.h"
-
-#include "com/sun/star/uno/Any.h"
-
-#include "../ObjectFactory/ObjectFactory.hxx"
-
-
-using namespace com::sun::star;
-
-
-static rtl::OUString g_usret(RTL_CONSTASCII_USTRINGPARAM("\n"));
-static rtl::OUString g_ustab(RTL_CONSTASCII_USTRINGPARAM("\t"));
-static rtl::OUString g_comment;
-static uno::Environment g_env;
-static bool g_check = 0;
-
-extern "C" { static void s_callee(rtl_uString * pMethod_name)
-{
- if (g_check)
- {
- g_comment += g_ustab;
- g_comment += g_ustab;
- g_comment += rtl::OUString(pMethod_name);
-
- rtl::OUString reason;
- int valid = g_env.isValid(&reason);
-
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("["));
- g_comment += rtl::OUString::valueOf((sal_Int32)valid);
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(","));
- g_comment += reason;
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("]"));
-
- if (!valid)
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" - FAILURE"));
-
- g_comment += g_usret;
- }
-}}
-
-
-static rtl::OUString s_test_registerInterface(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- g_comment = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test_registerInterface"));
- g_comment += g_usret;
-
- rtl::OUString id(RTL_CONSTASCII_USTRINGPARAM("blabla"));
-
- typelib_TypeDescriptionReference * type_XInterface =
- * typelib_static_type_getByTypeClass( typelib_TypeClass_INTERFACE );
-
- typelib_TypeDescription * pRet = NULL;
- typelib_typedescriptionreference_getDescription(&pRet, type_XInterface);
-
- void * pObject = createObject(envDcp, s_callee);
- g_check = 1;
- g_env.get()->pExtEnv->registerInterface(g_env.get()->pExtEnv,
- &pObject,
- id.pData,
- (struct _typelib_InterfaceTypeDescription *)pRet);
- g_check = 0;
-
- g_env.get()->pExtEnv->revokeInterface(g_env.get()->pExtEnv, pObject);
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
-
- g_env.clear();
-
- return g_comment;
-}
-
-extern "C" { static void s_freeFunc(struct _uno_ExtEnvironment * /*pEnv*/, void * /*pProxy*/ )
-{
- if (g_check)
- {
- g_comment += g_ustab;
- g_comment += g_ustab;
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("s_freeFunc"));
-
- rtl::OUString reason;
- int valid = g_env.isValid(&reason);
-
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("["));
- g_comment += rtl::OUString::valueOf((sal_Int32)valid);
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(","));
- g_comment += reason;
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("]"));
-
- if (!valid)
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" - FAILURE"));
-
- g_comment += g_usret;
- }
-}}
-
-static rtl::OUString s_test_registerProxyInterface(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- g_comment = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test_registerProxyInterface"));
- g_comment += g_usret;
-
- rtl::OUString id(RTL_CONSTASCII_USTRINGPARAM("blabla"));
-
- typelib_TypeDescriptionReference * type_XInterface =
- * typelib_static_type_getByTypeClass( typelib_TypeClass_INTERFACE );
-
- typelib_TypeDescription * pRet = NULL;
- typelib_typedescriptionreference_getDescription(&pRet, type_XInterface);
-
- void * pObject = createObject(envDcp, s_callee);
- g_check = 1;
- g_env.get()->pExtEnv->registerProxyInterface(g_env.get()->pExtEnv,
- &pObject,
- s_freeFunc,
- id.pData,
- (typelib_InterfaceTypeDescription *)pRet);
- g_check = 0;
-
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
- g_check = 1;
- g_env.get()->pExtEnv->revokeInterface(g_env.get()->pExtEnv, pObject);
- g_check = 0;
-
- g_env.clear();
-
-
- return g_comment;
-}
-
-static rtl::OUString s_test_revokeInterface(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- g_comment = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test_revokeInterface"));
- g_comment += g_usret;
-
- rtl::OUString id(RTL_CONSTASCII_USTRINGPARAM("blabla"));
-
- typelib_TypeDescriptionReference * type_XInterface =
- * typelib_static_type_getByTypeClass( typelib_TypeClass_INTERFACE );
-
- typelib_TypeDescription * pRet = NULL;
- typelib_typedescriptionreference_getDescription(&pRet, type_XInterface);
-
- void * pObject = createObject(envDcp, s_callee);
- g_env.get()->pExtEnv->registerInterface(g_env.get()->pExtEnv,
- &pObject,
- id.pData,
- (struct _typelib_InterfaceTypeDescription *)pRet);
-
- g_check = 1;
- g_env.get()->pExtEnv->revokeInterface(g_env.get()->pExtEnv, pObject);
- g_check = 0;
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
-
- g_env.clear();
-
- return g_comment;
-}
-
-static rtl::OUString s_test_getObjectIdentifier(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- g_comment = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test_getObjectIdentifier"));
- g_comment += g_usret;
-
- rtl::OUString oId;
- void * pObject = createObject(envDcp, s_callee);
- g_check = 1;
- g_env.get()->pExtEnv->getObjectIdentifier(g_env.get()->pExtEnv, &oId.pData, pObject);
- g_check = 0;
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
-
- g_env.clear();
-
- return g_comment;
-}
-
-static rtl::OUString s_test_getRegisteredInterface(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- g_comment = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test_getRegisteredInterface"));
- g_comment += g_usret;
-
- rtl::OUString id(RTL_CONSTASCII_USTRINGPARAM("blabla"));
-
-
- typelib_TypeDescriptionReference * type_XInterface =
- * typelib_static_type_getByTypeClass( typelib_TypeClass_INTERFACE );
-
- typelib_TypeDescription * pRet = NULL;
- typelib_typedescriptionreference_getDescription(&pRet, type_XInterface);
-
- void * pObject = createObject(envDcp, s_callee);
- g_env.get()->pExtEnv->registerInterface(g_env.get()->pExtEnv,
- &pObject,
- id.pData,
- (typelib_InterfaceTypeDescription *)pRet);
-
-
- g_check = 1;
- g_env.get()->pExtEnv->getRegisteredInterface(g_env.get()->pExtEnv, &pObject, id.pData,
- (typelib_InterfaceTypeDescription *)pRet);
- g_check = 0;
-
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
- g_env.get()->pExtEnv->revokeInterface(g_env.get()->pExtEnv, pObject);
-
- g_env.clear();
-
- return g_comment;
-}
-
-static rtl::OUString s_test_getRegisteredInterfaces(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- g_comment = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test_getRegisteredInterfaces"));
- g_comment += g_usret;
-
- rtl::OUString id(RTL_CONSTASCII_USTRINGPARAM("blabla"));
-
-
- typelib_TypeDescriptionReference * type_XInterface =
- * typelib_static_type_getByTypeClass( typelib_TypeClass_INTERFACE );
-
- typelib_TypeDescription * pRet = NULL;
- typelib_typedescriptionreference_getDescription(&pRet, type_XInterface);
-
- void * pObject = createObject(envDcp, s_callee);
- g_env.get()->pExtEnv->registerInterface(g_env.get()->pExtEnv,
- &pObject,
- id.pData,
- (typelib_InterfaceTypeDescription *)pRet);
-
- g_check = 1;
- void ** ppObject;
- sal_Int32 nCount;
- g_env.get()->pExtEnv->getRegisteredInterfaces(g_env.get()->pExtEnv, &ppObject, &nCount, rtl_allocateMemory);
- g_check = 0;
-
-
- if (nCount != 1)
- {
- g_comment += g_ustab;
- g_comment += g_ustab;
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("more than one object registered -> FAILURE"));
- g_comment += g_usret;
- }
-
- if (*ppObject != pObject)
- {
- g_comment += g_ustab;
- g_comment += g_ustab;
- g_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("returned object is not the registerd one -> FAILURE"));
- g_comment += g_usret;
- }
-
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, *ppObject);
-
- g_env.get()->pExtEnv->revokeInterface(g_env.get()->pExtEnv, pObject);
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
-
- rtl_freeMemory(ppObject);
-
- g_env.clear();
-
- return g_comment;
-}
-
-static rtl::OUString s_test_computeObjectIdentifier(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- g_comment = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test_computeObjectIdentifier"));
- g_comment += g_usret;
-
- rtl::OUString oId;
- void * pObject = createObject(envDcp, s_callee);
- g_check = 1;
- g_env.get()->pExtEnv->computeObjectIdentifier(g_env.get()->pExtEnv, &oId.pData, pObject);
- g_check = 0;
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
-
- g_env.clear();
-
- return g_comment;
-}
-
-static rtl::OUString s_test_acquire(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- g_comment = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test_acquire"));
- g_comment += g_usret;
- void * pObject = createObject(envDcp, s_callee);
-
- g_check = 1;
- g_env.get()->pExtEnv->acquireInterface(g_env.get()->pExtEnv, pObject);
- g_check = 0;
-
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
- g_env.clear();
-
- return g_comment;
-}
-
-static rtl::OUString s_test_release(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- g_comment = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test_release"));
- g_comment += g_usret;
- void * pObject = createObject(envDcp, s_callee);
-
- g_check = 1;
- g_env.get()->pExtEnv->releaseInterface(g_env.get()->pExtEnv, pObject);
- g_check = 0;
-
- g_env.clear();
-
- return g_comment;
-}
-
-
-rtl::OUString purpenv_test(rtl::OUString const & envDcp)
-{
- g_env = uno::Environment(envDcp);
-
- rtl::OUString result;
- result += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("purpenv_test"));
- result += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\n"));
-
- result += s_test_registerInterface(envDcp);
- result += g_usret;
-
- result += s_test_registerProxyInterface(envDcp);
- result += g_usret;
-
- result += s_test_revokeInterface(envDcp);
- result += g_usret;
-
- result += s_test_getObjectIdentifier(envDcp);
- result += g_usret;
-
- result += s_test_getRegisteredInterface(envDcp);
- result += g_usret;
-
- result += s_test_getRegisteredInterfaces(envDcp);
- result += g_usret;
-
- result += s_test_computeObjectIdentifier(envDcp);
- result += g_usret;
-
- result += s_test_acquire(envDcp);
- result += g_usret;
-
- result += s_test_release(envDcp);
- result += g_usret;
-
- return result;
-}