diff options
Diffstat (limited to 'TAO/tests/Param_Test/ub_short_seq.cpp')
-rw-r--r-- | TAO/tests/Param_Test/ub_short_seq.cpp | 198 |
1 files changed, 0 insertions, 198 deletions
diff --git a/TAO/tests/Param_Test/ub_short_seq.cpp b/TAO/tests/Param_Test/ub_short_seq.cpp deleted file mode 100644 index 6f164a0c1ba..00000000000 --- a/TAO/tests/Param_Test/ub_short_seq.cpp +++ /dev/null @@ -1,198 +0,0 @@ -// $Id$ - -// ============================================================================ -// -// = LIBRARY -// TAO/tests/Param_Test -// -// = FILENAME -// ub_short_seq.cpp -// -// = DESCRIPTION -// tests unbounded short sequences -// -// = AUTHORS -// Aniruddha Gokhale -// -// ============================================================================ - -#include "helper.h" - -#include "ub_short_seq.h" - -// ************************************************************************ -// Test_Short_Sequence -// ************************************************************************ - -Test_Short_Sequence::Test_Short_Sequence (void) - : opname_ (CORBA::string_dup ("test_short_sequence")), - in_ (new Param_Test::Short_Seq), - inout_ (new Param_Test::Short_Seq), - out_ (0), - ret_ (0) -{ -} - -Test_Short_Sequence::~Test_Short_Sequence (void) -{ -} - -const char * -Test_Short_Sequence::opname (void) const -{ - return this->opname_; -} - -int -Test_Short_Sequence::init_parameters (Param_Test_ptr objref, - CORBA::Environment &env) -{ - Generator *gen = GENERATOR::instance (); // value generator - - ACE_UNUSED_ARG (objref); - ACE_UNUSED_ARG (env); - - // get some sequence length (not more than 10) - CORBA::ULong len = (CORBA::ULong) (gen->gen_long () % 10) + 1; - - // set the length of the sequence - this->in_->length (len); - // now set each individual element - for (CORBA::ULong i=0; i < this->in_->length (); i++) - { - // generate some arbitrary string to be filled into the ith location in - // the sequence - this->in_[i] = i; - - } - return 0; -} - -int -Test_Short_Sequence::reset_parameters (void) -{ - this->inout_ = new Param_Test::Short_Seq; // delete the previous one - this->out_ = 0; - this->ret_ = 0; - return 0; -} - -int -Test_Short_Sequence::run_sii_test (Param_Test_ptr objref, - CORBA::Environment &env) -{ - Param_Test::Short_Seq_out out (this->out_.out ()); - this->ret_ = objref->test_short_sequence (this->in_.in (), - this->inout_.inout (), - out, - env); - return (env.exception () ? -1:0); -} - -int -Test_Short_Sequence::add_args (CORBA::NVList_ptr ¶m_list, - CORBA::NVList_ptr &retval, - CORBA::Environment &env) -{ - CORBA::Any in_arg (Param_Test::_tc_Short_Seq, (void *) &this->in_.in (), 0); - CORBA::Any inout_arg (Param_Test::_tc_Short_Seq, &this->inout_.inout (), 0); - // ORB will allocate - CORBA::Any out_arg (Param_Test::_tc_Short_Seq, 0, 0); - - // add parameters - (void)param_list->add_value ("s1", in_arg, CORBA::ARG_IN, env); - (void)param_list->add_value ("s2", inout_arg, CORBA::ARG_INOUT, env); - (void)param_list->add_value ("s3", out_arg, CORBA::ARG_OUT, env); - - // add return value type - (void)retval->item (0, env)->value ()->replace (Param_Test::_tc_Short_Seq, - 0, - CORBA::B_FALSE, // does not own - env); - return 0; -} - -CORBA::Boolean -Test_Short_Sequence::check_validity (void) -{ - CORBA::Boolean flag = 0; - if ((this->in_->length () == this->inout_->length ()) && - (this->in_->length () == this->out_->length ()) && - (this->in_->length () == this->ret_->length ())) - { - flag = 1; // assume all are equal - // lengths are same. Now compare the contents - for (CORBA::ULong i=0; i < this->in_->length () && flag; i++) - { - if ((this->in_[i] != this->inout_[i]) || - (this->in_[i] != this->out_[i]) || - (this->in_[i] != this->ret_[i])) - // not equal - flag = 0; - } - } - return flag; -} - -CORBA::Boolean -Test_Short_Sequence::check_validity (CORBA::Request_ptr req) -{ - CORBA::Environment env; - - *req->arguments ()->item (2, env)->value () >>= this->out_.out (); - *req->result ()->value () >>= this->ret_.out (); - - return this->check_validity (); -} - -void -Test_Short_Sequence::print_values (void) -{ - CORBA::ULong i; - ACE_DEBUG ((LM_DEBUG, "\n*=*=*=*=*=*=*=*=*=*=\n")); - for (i=0; this->in_.ptr () && (i < this->in_->length ()); i++) - { - ACE_DEBUG ((LM_DEBUG, - "Element #%d\n" - "in : %s\n", - i, - this->in_[i]? (const char *)this->in_[i]:"<nul>")); - } - if (!this->in_.ptr ()) - ACE_DEBUG ((LM_DEBUG, "\nin sequence is NUL\n")); - ACE_DEBUG ((LM_DEBUG, "\n*=*=*=*=*=*=*=*=*=*=\n")); - for (i=0; this->inout_.ptr () && (i < this->inout_->length ()); i++) - { - ACE_DEBUG ((LM_DEBUG, - "Element #%d\n" - "in : %s\n", - i, - (this->inout_[i]? (const char *)this->inout_[i]:"<nul>"))); - } - if (!this->inout_.ptr ()) - ACE_DEBUG ((LM_DEBUG, "\ninout sequence is NUL\n")); - ACE_DEBUG ((LM_DEBUG, "\n*=*=*=*=*=*=*=*=*=*=\n")); - for (i=0; this->out_.ptr () && (i < this->out_->length ()); i++) - { - ACE_DEBUG ((LM_DEBUG, - "Element #%d\n" - "in : %s\n", - i, - (this->out_[i]? (const char *)this->out_[i]:"<nul>"))); - } - if (!this->out_.ptr ()) - ACE_DEBUG ((LM_DEBUG, "\nout sequence is NUL\n")); - ACE_DEBUG ((LM_DEBUG, "\n*=*=*=*=*=*=*=*=*=*=\n")); - for (i=0; this->ret_.ptr () && (i < this->ret_->length ()); i++) - { - ACE_DEBUG ((LM_DEBUG, - "Element #%d\n" - "in : %s\n", - i, - (this->ret_[i]? (const char *)this->ret_[i]:"<nul>"))); - } - if (!this->ret_.ptr ()) - ACE_DEBUG ((LM_DEBUG, "\nin sequence is NUL\n")); - ACE_DEBUG ((LM_DEBUG, "\n*=*=*=*=*=*=*=*=*=*=\n")); -} - |