TAO/tests/Param_Test/bd_wstr_seq.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file    bd_wstr_seq.cpp
   5  *
   6  *  tests bounded wide string sequences
   7  *
   8  *  @author   Jeff Parsons
   9  */
  10 //=============================================================================
  11
  12
  13 #include "helper.h"
  14 #include "bd_wstr_seq.h"
  15 #include "ace/OS_NS_wchar.h"
  16
  17 // ************************************************************************
  18 //               Test_Bounded_WString_Sequence
  19 // ************************************************************************
  20
  21 Test_Bounded_WString_Sequence::Test_Bounded_WString_Sequence ()
  22   : opname_ (CORBA::string_dup ("test_bounded_wstrseq")),
  23     in_ (new Param_Test::Bounded_WStrSeq),
  24     inout_ (new Param_Test::Bounded_WStrSeq),
  25     out_ (new Param_Test::Bounded_WStrSeq),
  26     ret_ (new Param_Test::Bounded_WStrSeq)
  27 {
  28 }
  29
  30 Test_Bounded_WString_Sequence::~Test_Bounded_WString_Sequence ()
  31 {
  32   CORBA::string_free (this->opname_);
  33   this->opname_ = 0;
  34 }
  35
  36 const char *
  37 Test_Bounded_WString_Sequence::opname () const
  38 {
  39   return this->opname_;
  40 }
  41
  42 void
  43 Test_Bounded_WString_Sequence::dii_req_invoke (CORBA::Request *req)
  44 {
  45   req->add_in_arg ("s1") <<= this->in_.in ();
  46   req->add_inout_arg ("s2") <<= this->inout_.in ();
  47   req->add_out_arg ("s3") <<= this->out_.in ();
  48
  49   req->set_return_type (Param_Test::_tc_Bounded_WStrSeq);
  50
  51   req->invoke ();
  52
  53   const Param_Test::Bounded_WStrSeq *tmp;
  54   req->return_value () >>= tmp;
  55   this->ret_ = new Param_Test::Bounded_WStrSeq (*tmp);
  56
  57   CORBA::NamedValue_ptr arg2 =
  58     req->arguments ()->item (1);
  59   *arg2->value () >>= tmp;
  60   this->inout_ = new Param_Test::Bounded_WStrSeq (*tmp);
  61
  62   CORBA::NamedValue_ptr arg3 =
  63     req->arguments ()->item (2);
  64   *arg3->value () >>= tmp;
  65   this->out_ = new Param_Test::Bounded_WStrSeq (*tmp);
  66 }
  67
  68 int
  69 Test_Bounded_WString_Sequence::init_parameters (Param_Test_ptr)
  70 {
  71   Generator *gen = GENERATOR::instance (); // value generator
  72
  73   CORBA::ULong len = this->in_->maximum ();
  74
  75   // set the length of the sequence
  76   this->in_->length (len);
  77   this->inout_->length (len);
  78
  79   // now set each individual element
  80   for (CORBA::ULong i = 0; i < this->in_->length (); i++)
  81     {
  82       this->in_[i] = gen->gen_wstring ();
  83
  84           // different from in_
  85       this->inout_[i] = gen->gen_wstring ();
  86     }
  87
  88   return 0;
  89 }
  90
  91 int
  92 Test_Bounded_WString_Sequence::reset_parameters ()
  93 {
  94   this->inout_ = new Param_Test::Bounded_WStrSeq; // delete the previous ones
  95   this->out_ = new Param_Test::Bounded_WStrSeq;
  96   this->ret_ = new Param_Test::Bounded_WStrSeq;
  97   return 0;
  98 }
  99
 100 int
 101 Test_Bounded_WString_Sequence::run_sii_test (Param_Test_ptr objref)
 102 {
 103   try
 104     {
 105       Param_Test::Bounded_WStrSeq_out out (this->out_.out ());
 106
 107       this->ret_ = objref->test_bounded_wstrseq (this->in_.in (),
 108                                                  this->inout_.inout (),
 109                                                  out);
 110
 111       return 0;
 112     }
 113   catch (const CORBA::Exception& ex)
 114     {
 115       ex._tao_print_exception ("Test_Bounded_WString_Sequence::run_sii_test\n");
 116     }
 117   return -1;
 118 }
 119
 120 CORBA::Boolean
 121 Test_Bounded_WString_Sequence::check_validity ()
 122 {
 123   CORBA::Boolean flag = 0;
 124   if ((this->in_->length () == this->inout_->length ()) &&
 125       (this->in_->length () == this->out_->length ()) &&
 126       (this->in_->length () == this->ret_->length ()))
 127     {
 128       flag = 1; // assume all are equal
 129       // lengths are same. Now compare the contents
 130       for (CORBA::ULong i=0; i < this->in_->length () && flag; i++)
 131         {
 132           if (ACE_OS::wscmp (this->in_[i], this->inout_[i]) ||
 133               ACE_OS::wscmp (this->in_[i], this->out_[i]) ||
 134               ACE_OS::wscmp (this->in_[i], this->ret_[i]))
 135             // not equal
 136             flag = 0;
 137         }
 138     }
 139   return flag;
 140 }
 141
 142 CORBA::Boolean
 143 Test_Bounded_WString_Sequence::check_validity (CORBA::Request_ptr)
 144 {
 145   return this->check_validity ();
 146 }
 147
 148 void
 149 Test_Bounded_WString_Sequence::print_values ()
 150 {
 151 }