summaryrefslogtreecommitdiff
path: root/TAO/tests/DynAny_Test/test_dynunion.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/tests/DynAny_Test/test_dynunion.cpp')
-rw-r--r--TAO/tests/DynAny_Test/test_dynunion.cpp172
1 files changed, 0 insertions, 172 deletions
diff --git a/TAO/tests/DynAny_Test/test_dynunion.cpp b/TAO/tests/DynAny_Test/test_dynunion.cpp
deleted file mode 100644
index e74a02b2415..00000000000
--- a/TAO/tests/DynAny_Test/test_dynunion.cpp
+++ /dev/null
@@ -1,172 +0,0 @@
-// -*- c++ -*-
-// $Id$
-// ============================================================================
-//
-// = LIBRARY
-// TAO/tests/DynAny_Test
-//
-// = FILENAME
-// test_dynunion.cpp
-//
-// = DESCRIPTION
-// Implementation of the simple DynUnion test
-//
-// = AUTHOR
-// Jeff Parsons <parsons@cs.wustl.edu>
-//
-// ============================================================================
-
-#include "test_dynunion.h"
-#include "da_testsC.h"
-#include "data.h"
-
-Test_DynUnion::Test_DynUnion (CORBA::ORB_var orb)
- : orb_ (orb),
- test_name_ (CORBA::string_dup ("test_dynunion")),
- error_count_ (0)
-{
-}
-
-Test_DynUnion::~Test_DynUnion (void)
-{
- CORBA::string_free (this->test_name_);
- this->test_name_ = 0;
-}
-
-const char*
-Test_DynUnion::test_name (void) const
-{
- return this->test_name_;
-}
-
-int
-Test_DynUnion::run_test (void)
-{
- Data data (this->orb_);
-
- DynAnyTests::test_union tu;
-
- ACE_TRY_NEW_ENV
- {
- ACE_DEBUG ((LM_DEBUG,
- "\t*=*=*=*= %s =*=*=*=*\n",
- data.labels[12]));
-
- ACE_DEBUG ((LM_DEBUG,
- "testing: constructor(Any)/insert/get\n"));
-
- tu._d(DynAnyTests::TE_SECOND);
- tu.tc (data.m_typecode2);
- CORBA_Any in_any1;
- in_any1 <<= tu;
- CORBA_DynAny_ptr dp1 =
- this->orb_->create_dyn_any (in_any1,
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
- CORBA_DynUnion_ptr fa1 = CORBA_DynUnion::_narrow (dp1,
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
- fa1->insert_typecode (data.m_typecode1,
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
- CORBA::TypeCode_ptr s_out1 = fa1->get_typecode (ACE_TRY_ENV);
- ACE_TRY_CHECK;
- if (s_out1->equal (data.m_typecode1))
- ACE_DEBUG ((LM_DEBUG,
- "++ OK ++\n"));
- else
- ++this->error_count_;
-
- ACE_DEBUG ((LM_DEBUG,
- "testing: constructor(TypeCode)/from_any/to_any\n"));
-
- CORBA_Any* out_any1 = fa1->to_any (ACE_TRY_ENV);
- ACE_TRY_CHECK;
- CORBA_DynUnion_ptr ftc1 =
- this->orb_->create_dyn_union (DynAnyTests::_tc_test_union,
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
- ftc1->from_any (*out_any1,
- ACE_TRY_ENV);
- ACE_TRY_CHECK;
- CORBA::TypeCode_ptr s_out2 = ftc1->get_typecode (ACE_TRY_ENV);
- ACE_TRY_CHECK;
- if (s_out2->equal (data.m_typecode1))
- ACE_DEBUG ((LM_DEBUG,
- "++ OK ++\n"));
- else
- ++this->error_count_;
-
- // Created with NEW
- delete out_any1;
-
- ACE_DEBUG ((LM_DEBUG,
- "testing: set_as_default\n"));
-
- if (!ftc1->set_as_default (ACE_TRY_ENV))
- ACE_DEBUG ((LM_DEBUG,
- "++ OK ++\n"));
- else
- ++this->error_count_;
-
- ACE_TRY_CHECK;
-
- ACE_DEBUG ((LM_DEBUG,
- "testing:discriminator/discriminator_kind\n"));
-
- CORBA_DynAny_ptr dp2 = ftc1->discriminator (ACE_TRY_ENV);
- ACE_TRY_CHECK;
- if (dp2->type (ACE_TRY_ENV)->kind ()
- == ftc1->discriminator_kind (ACE_TRY_ENV))
- ACE_DEBUG ((LM_DEBUG,
- "++ OK ++\n"));
- else
- ++this->error_count_;
-
- ACE_TRY_CHECK;
-
- ACE_DEBUG ((LM_DEBUG,
- "testing:member/member_kind/member_name\n"));
-
- CORBA_DynAny_ptr dp3 = ftc1->member (ACE_TRY_ENV);
- ACE_TRY_CHECK;
- CORBA::String m_nm = ftc1->member_name (ACE_TRY_ENV);
- ACE_TRY_CHECK;
- CORBA::TCKind tk = ftc1->member_kind (ACE_TRY_ENV);
- ACE_TRY_CHECK;
- if (!ACE_OS::strcmp (m_nm, "tc")
- && tk == CORBA::tk_TypeCode
- && data.m_typecode1->equal (dp3->get_typecode (ACE_TRY_ENV)))
- ACE_DEBUG ((LM_DEBUG,
- "++ OK ++\n"));
- else
- ++this->error_count_;
-
- ACE_TRY_CHECK;
-
- // Created with string_dup
- CORBA::string_free (m_nm);
-
- fa1->destroy (ACE_TRY_ENV);
- ACE_TRY_CHECK;
- CORBA::release (fa1);
- CORBA::release (dp1);
- ftc1->destroy (ACE_TRY_ENV);
- ACE_TRY_CHECK;
- CORBA::release (ftc1);
- }
- ACE_CATCHANY
- {
- ACE_PRINT_EXCEPTION (ACE_ANY_EXCEPTION,
- "test_dynunion::run_test");
- return -1;
- }
- ACE_ENDTRY;
-
- ACE_DEBUG ((LM_DEBUG,
- "\n%d errors\n",
- this->error_count_));
-
- return 0;
-}
-