INTEGRATION: CWS bunoexttm (1.1.2.3.2); FILE ADDED

2007/02/08 10:16:53 kr 1.1.2.3.2.2: fixed: linkage
2007/01/25 16:06:52 kr 1.1.2.3.2.1: fixed: license, warnings, a leak; adapted: EnvDcp nsp

1 files changed, 257 insertions, 0 deletions

diff --git a/cppu/test/Shield/Shield.test.cxx b/cppu/test/Shield/Shield.test.cxx
new file mode 100644
index 000000000000..633dc645d2bb
--- /dev/null
+++ b/cppu/test/Shield/Shield.test.cxx
@@ -0,0 +1,257 @@
+/*************************************************************************
+ *
+ *  OpenOffice.org - a multi-platform office productivity suite
+ *
+ *  $RCSfile: Shield.test.cxx,v $
+ *
+ *  $Revision: 1.2 $
+ *
+ *  last change: $Author: kz $ $Date: 2007-05-09 13:45:13 $
+ *
+ *  The Contents of this file are made available subject to
+ *  the terms of GNU Lesser General Public License Version 2.1.
+ *
+ *
+ *    GNU Lesser General Public License Version 2.1
+ *    =============================================
+ *    Copyright 2005 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
+ *
+ ************************************************************************/
+
+#include <iostream>
+
+#include "sal/main.h"
+
+#include "uno/environment.hxx"
+
+#include "cppu/Shield.hxx"
+#include "cppu/EnvGuards.hxx"
+
+#include "../ObjectFactory/ObjectFactory.hxx"
+
+
+using namespace com::sun::star;
+
+
+static rtl::OUString    s_comment;
+static uno::Environment s_env;
+
+extern "C" {
+static void s_callee_in(rtl_uString *  pMethod_name)
+{
+    rtl::OUString method_name(pMethod_name);
+
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\t\ts_callee_in  method:\""));
+    s_comment += method_name;
+
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\" env: \""));
+    s_comment += uno::Environment::getCurrent().getTypeName();
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\""));
+
+    if (!s_env.is())
+    {
+        s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" - FAILURE: s_env not set"));
+        return;
+    }
+
+    rtl::OUString reason;
+    int valid = s_env.isValid(&reason);
+
+    if (valid)
+        s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\n"));
+
+    else
+    {
+        s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" - FAILURE: "));
+        s_comment += reason;
+        s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\n"));
+    }
+}
+
+static void s_callee_out(rtl_uString *  pMethod_name)
+{
+    rtl::OUString method_name(pMethod_name);
+
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\t\ts_callee_out method:\""));
+    s_comment += method_name;
+
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\" env: \""));
+    s_comment += uno::Environment::getCurrent().getTypeName();
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\""));
+
+    if (!s_env.is())
+    {
+        s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" - FAILURE: s_env not set"));
+        return;
+    }
+
+    rtl::OUString reason;
+    int valid = s_env.isValid(&reason);
+
+    if (!valid)
+        s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\n"));
+
+    else
+        s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(" - FAILURE: is in\n"));
+}
+}
+
+static uno::Reference<uno::XInterface> s_get_envObject(void)
+{
+    cppu::EnvGuard envGuard(s_env);
+
+    uno::XInterface * pObject = reinterpret_cast<uno::XInterface *>(
+        createObject(rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(CPPU_STRINGIFY(CPPU_ENV))),
+                     s_callee_in));
+
+    return uno::Reference<uno::XInterface>(pObject, SAL_NO_ACQUIRE);
+}
+
+static uno::XInterface * s_x_get_flatObject(void)
+{
+    uno::XInterface * pObject = reinterpret_cast<uno::XInterface *>(
+        createObject(rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(CPPU_STRINGIFY(CPPU_ENV))),
+                     s_callee_out));
+
+    return pObject;
+}
+
+static uno::Reference<uno::XInterface> s_get_flatObject(void)
+{
+    return uno::Reference<uno::XInterface>(s_x_get_flatObject(), SAL_NO_ACQUIRE);
+}
+
+
+static void s_test__shield(void)
+{
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test__shield:\n"));
+
+    uno::Reference<uno::XInterface> obj;
+
+    {
+        cppu::EnvGuard envGuard(s_env);
+        obj.set(cppu::shield(s_get_envObject().get()), SAL_NO_ACQUIRE);
+    }
+
+     obj->acquire();
+     obj->release();
+}
+
+static void s_test__unshield(void)
+{
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test__unshield:\n"));
+
+    uno::Reference<uno::XInterface> obj;
+
+    {
+        cppu::EnvGuard envGuard(s_env);
+        uno::XInterface * pObj = s_x_get_flatObject();
+        obj.set(cppu::unshield(pObj), SAL_NO_ACQUIRE);
+
+        envGuard.clear();
+        pObj->release();
+    }
+
+    {
+        cppu::EnvGuard envGuard(s_env);
+        obj.clear();
+    }
+}
+
+static void s_test__shieldAny(void)
+{
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test__shieldAny:\n"));
+
+    uno::Any out;
+
+    {
+        cppu::EnvGuard envGuard(s_env);
+        uno::Any any;
+        any <<= s_get_envObject();
+        cppu::shieldAny(any, &out);
+    }
+
+    uno::Reference<uno::XInterface> obj;
+    out >>= obj;
+
+     obj->acquire();
+     obj->release();
+}
+
+static void s_test__unshieldAny(void)
+{
+    s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("\ts_test__unshieldAny:\n"));
+
+    uno::Any out;
+    {
+        uno::Any any(s_get_flatObject());
+
+        {
+            cppu::EnvGuard envGuard(s_env);
+            cppu::unshieldAny(any, &out);
+        }
+    }
+
+    {
+        cppu::EnvGuard envGuard(s_env);
+
+        uno::Reference<uno::XInterface> obj;
+        out >>= obj;
+
+        obj.clear();
+    }
+}
+
+
+SAL_IMPLEMENT_MAIN_WITH_ARGS(/*argc*/, argv)
+{
+    uno::Environment(rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(UNO_LB_UNO))).enter();
+
+    s_env = uno::Environment(rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("uno:unsafe")));
+
+    s_test__shield();
+      s_test__shieldAny();
+       s_test__unshield();
+       s_test__unshieldAny();
+
+    s_env.clear();
+
+
+    uno_Environment_enter(NULL);
+
+
+    int ret;
+    if (s_comment.indexOf(rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("FAILURE"))) == -1)
+    {
+        s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("TESTS PASSED\n"));
+        ret = 0;
+    }
+    else
+    {
+        s_comment += rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("TESTS _NOT_ PASSED\n"));
+        ret = -1;
+    }
+
+    std::cerr
+        << argv[0]
+        << std::endl
+        << rtl::OUStringToOString(s_comment, RTL_TEXTENCODING_ASCII_US).getStr()
+        << std::endl;
+
+    return ret;
+}