diff options
Diffstat (limited to 'TAO/tests/Param_Test/except.cpp')
| -rw-r--r-- | TAO/tests/Param_Test/except.cpp | 276 |
1 files changed, 0 insertions, 276 deletions
diff --git a/TAO/tests/Param_Test/except.cpp b/TAO/tests/Param_Test/except.cpp deleted file mode 100644 index 09d7cd82cc8..00000000000 --- a/TAO/tests/Param_Test/except.cpp +++ /dev/null @@ -1,276 +0,0 @@ -// $Id$ - -// ============================================================================ -// -// = LIBRARY -// TAO/tests/Param_Test -// -// = FILENAME -// except.cpp -// -// = DESCRIPTION -// tests exception -// -// = AUTHORS -// Carlos O'Ryan -// -// ============================================================================ - -#include "helper.h" -#include "except.h" - -ACE_RCSID(Param_Test, except, "$Id$") - -// ************************************************************************ -// Test_Exception -// ************************************************************************ - -Test_Exception::Test_Exception (void) - : opname_ (CORBA::string_dup ("test_exception")), - iterations_ (0) -{ -} - -Test_Exception::~Test_Exception (void) -{ - CORBA::string_free (this->opname_); - this->opname_ = 0; -} - -const char * -Test_Exception::opname (void) const -{ - return this->opname_; -} - -void -Test_Exception::dii_req_invoke (CORBA::Request *req, - CORBA::Environment &ACE_TRY_ENV) -{ - ACE_TRY - { - req->invoke (ACE_TRY_ENV); - ACE_TRY_CHECK; - } - ACE_CATCH (CORBA::UnknownUserException, user_ex) - { - Param_Test::Ooops* oops; - Param_Test::BadBoy* bad_boy; - - if (user_ex.exception () >>= oops) - { - if (TAO_debug_level > 0) - { - const char *reason = oops->reason.in (); - if (reason == 0) - reason = "nil"; - ACE_DEBUG ((LM_DEBUG, - "Test_Exception::dii_req_invoke - " - "expected user exception" - " (%s,%d)\n", reason, oops->input)); - } - this->inout_ = this->in_ * 2; - this->out_ = this->in_ * 3; - this->ret_ = this->in_ * 4; - return; - } - else if (user_ex.exception () >>= bad_boy) - { - ACE_PRINT_EXCEPTION ((*bad_boy), - "Test_Exception::dii_req_invoke - " - "unexpected (but known) user exception\n"); - this->inout_ = this->in_ * 5; - this->out_ = this->in_ * 5; - this->ret_ = this->in_ * 5; - } - else - { - ACE_DEBUG ((LM_DEBUG, - "Test_Exception::dii_req_invoke - " - "unexpected (and unknown) user exception\n")); - } - - } - ACE_CATCH (CORBA::UNKNOWN, ex) - { - if (TAO_debug_level > 0) - { - ACE_PRINT_EXCEPTION (ex,"Test_Exception::run_sii_test - " - "expected system exception\n"); - } - this->inout_ = this->in_ * 2; - this->out_ = this->in_ * 3; - this->ret_ = this->in_ * 4; - - return; - } - ACE_ENDTRY; - ACE_CHECK; -} - -int -Test_Exception::init_parameters (Param_Test_ptr, - CORBA::Environment &) -{ - Generator *gen = GENERATOR::instance (); // value generator - - this->in_ = gen->gen_short (); - this->inout_ = 0; - return 0; -} - -int -Test_Exception::reset_parameters (void) -{ - this->inout_ = 0; - this->out_ = 0; - this->ret_ = 0; - return 0; -} - -int -Test_Exception::run_sii_test (Param_Test_ptr objref, - CORBA::Environment &ACE_TRY_ENV) -{ - ACE_TRY - { - this->in_++; - this->ret_ = objref->test_exception (this->in_, - this->inout_, - this->out_, - ACE_TRY_ENV); - ACE_TRY_CHECK; - } - ACE_CATCH (Param_Test::Ooops, ex) - { - if (TAO_debug_level > 0) - { - const char *reason = ex.reason.in (); - if (reason == 0) - reason = "nil"; - ACE_DEBUG ((LM_DEBUG, - "Test_Exception::run_sii_test - " - "expected user exception" - " (%s,%d)\n", reason, ex.input)); - } - this->inout_ = this->in_ * 2; - this->out_ = this->in_ * 3; - this->ret_ = this->in_ * 4; - return -1; - } - ACE_CATCH (CORBA::UNKNOWN, ex) - { - if (TAO_debug_level > 0) - { - ACE_PRINT_EXCEPTION (ex,"Test_Exception::run_sii_test - " - "expected system exception\n"); - } - this->inout_ = this->in_ * 2; - this->out_ = this->in_ * 3; - this->ret_ = this->in_ * 4; - return 0; - } - ACE_CATCH (Param_Test::BadBoy, ex) - { - ACE_PRINT_EXCEPTION (ex, - "Test_Exception::run_sii_test - " - "unexpected user exception\n"); - } - ACE_ENDTRY; - return -1; -} - -int -Test_Exception::add_args (CORBA::NVList_ptr param_list, - CORBA::NVList_ptr retval, - CORBA::Environment &ACE_TRY_ENV) -{ - ACE_TRY - { - // we provide top level memory to the ORB to retrieve the data - CORBA::Any in_arg (CORBA::_tc_ulong, - &this->in_, - 0); - - CORBA::Any inout_arg (CORBA::_tc_ulong, - &this->inout_, - 0); - - CORBA::Any out_arg (CORBA::_tc_ulong, - &this->out_, - 0); - - // add parameters - param_list->add_value ("s1", - in_arg, - CORBA::ARG_IN, - ACE_TRY_ENV); - ACE_TRY_CHECK; - - param_list->add_value ("s2", - inout_arg, - CORBA::ARG_INOUT, - ACE_TRY_ENV); - ACE_TRY_CHECK; - - param_list->add_value ("s3", - out_arg, - CORBA::ARG_OUT, - ACE_TRY_ENV); - ACE_TRY_CHECK; - - // add return value. Let the ORB allocate storage. We simply tell the ORB - // what type we are expecting. - CORBA::NamedValue *item = retval->item (0, - ACE_TRY_ENV); - ACE_TRY_CHECK; - - item->value ()->replace (CORBA::_tc_ulong, - &this->ret_, - 0, // does not own - ACE_TRY_ENV); - ACE_TRY_CHECK; - - return 0; - } - ACE_CATCHANY - { - ACE_PRINT_EXCEPTION (ACE_ANY_EXCEPTION, - "Test_Exception::add_args\n"); - - } - ACE_ENDTRY; - return -1; -} - -CORBA::Boolean -Test_Exception::check_validity (void) -{ - if (this->inout_ == this->in_ * 2 && - this->out_ == this->in_ * 3 && - this->ret_ == this->in_ * 4) - return 1; - return 0; -} - -CORBA::Boolean -Test_Exception::check_validity (CORBA::Request_ptr) -{ - return this->check_validity (); -} - -void -Test_Exception::print_values (void) -{ - ACE_DEBUG ((LM_DEBUG, - "\n=*=*=*=*=*=*\n" - "in = %d, " - "inout = %d, " - "out = %d, " - "ret = %d\n" - "\n=*=*=*=*=*=*\n", - this->in_, - this->inout_, - this->out_, - this->ret_)); -} |