TAO/tests/Param_Test/ub_wstring.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file    ub_wstring.cpp
   5  *
   6  *  tests unbounded wide strings
   7  *
   8  *  @author   Jeff Parsons <parsons@cs.wustl.edu>
   9  */
  10 //=============================================================================
  11
  12
  13 #include "helper.h"
  14 #include "ub_wstring.h"
  15 #include "ace/OS_NS_wchar.h"
  16
  17 // ************************************************************************
  18 //               Test_Unbounded_WString
  19 // ************************************************************************
  20
  21 Test_Unbounded_WString::Test_Unbounded_WString ()
  22   : opname_ (CORBA::string_dup ("test_unbounded_wstring")),
  23     in_ (0),
  24     inout_ (0),
  25     out_ (0),
  26     ret_ (0)
  27 {
  28 }
  29
  30 Test_Unbounded_WString::~Test_Unbounded_WString ()
  31 {
  32   CORBA::string_free (this->opname_);
  33   CORBA::wstring_free (this->in_);
  34   CORBA::wstring_free (this->inout_);
  35   CORBA::wstring_free (this->out_);
  36   CORBA::wstring_free (this->ret_);
  37   this->opname_ = 0;
  38   this->in_ = 0;
  39   this->inout_ = 0;
  40   this->out_ = 0;
  41   this->ret_ = 0;
  42 }
  43
  44 const char *
  45 Test_Unbounded_WString::opname () const
  46 {
  47   return this->opname_;
  48 }
  49
  50 void
  51 Test_Unbounded_WString::dii_req_invoke (CORBA::Request *req)
  52 {
  53   req->add_in_arg ("s1") <<= this->in_;
  54   req->add_inout_arg ("s2") <<= this->inout_;
  55   req->add_out_arg ("s3") <<= this->out_;
  56
  57   // The Any arg manages its memory but this class member does not.
  58   CORBA::wstring_free (this->inout_);
  59
  60   req->set_return_type (CORBA::_tc_wstring);
  61
  62   req->invoke ();
  63
  64   const CORBA::WChar *tmp;
  65   req->return_value () >>= tmp;
  66   this->ret_ = CORBA::wstring_dup (tmp);
  67
  68   CORBA::NamedValue_ptr o2 =
  69     req->arguments ()->item (1);
  70   *o2->value () >>= tmp;
  71   this->inout_ = CORBA::wstring_dup (tmp);
  72
  73   CORBA::NamedValue_ptr o3 =
  74     req->arguments ()->item (2);
  75   *o3->value () >>= tmp;
  76   this->out_ = CORBA::wstring_dup (tmp);
  77 }
  78
  79 int
  80 Test_Unbounded_WString::init_parameters (Param_Test_ptr)
  81 {
  82   Generator *gen = GENERATOR::instance (); // value generator
  83
  84   // release any previously occupied values
  85   CORBA::wstring_free (this->in_);
  86   CORBA::wstring_free (this->inout_);
  87   CORBA::wstring_free (this->out_);
  88   CORBA::wstring_free (this->ret_);
  89   this->in_ = 0;
  90   this->inout_ = 0;
  91   this->out_ = 0;
  92   this->ret_ = 0;
  93
  94   this->in_ = gen->gen_wstring ();
  95   this->inout_ = CORBA::wstring_dup (this->in_);
  96   return 0;
  97 }
  98
  99 int
 100 Test_Unbounded_WString::reset_parameters ()
 101 {
 102   // release any previously occupied values
 103   CORBA::wstring_free (this->inout_);
 104   CORBA::wstring_free (this->out_);
 105   CORBA::wstring_free (this->ret_);
 106   this->inout_ = 0;
 107   this->out_ = 0;
 108   this->ret_ = 0;
 109
 110   this->inout_ = CORBA::wstring_dup (this->in_);
 111   return 0;
 112 }
 113
 114 int
 115 Test_Unbounded_WString::run_sii_test (Param_Test_ptr objref)
 116 {
 117   try
 118     {
 119       CORBA::WString_out str_out (this->out_);
 120
 121       this->ret_ = objref->test_unbounded_wstring (this->in_,
 122                                                    this->inout_,
 123                                                    str_out);
 124
 125       return 0;
 126     }
 127   catch (const CORBA::Exception& ex)
 128     {
 129       ex._tao_print_exception ("Test_Unbounded_WString::run_sii_test\n");
 130     }
 131   return -1;
 132 }
 133
 134 CORBA::Boolean
 135 Test_Unbounded_WString::check_validity ()
 136 {
 137   CORBA::ULong len = ACE_OS::wslen (this->in_);
 138
 139   if (!ACE_OS::wscmp (this->in_, this->out_) &&
 140       !ACE_OS::wscmp (this->in_, this->ret_) &&
 141       ACE_OS::wslen (this->inout_) == 2*len &&
 142       !ACE_OS::wsncmp (this->in_, this->inout_, len) &&
 143       !ACE_OS::wsncmp (this->in_, &this->inout_[len], len))
 144     return 1;
 145
 146   return 0; // otherwise
 147 }
 148
 149 CORBA::Boolean
 150 Test_Unbounded_WString::check_validity (CORBA::Request_ptr )
 151 {
 152   // No need to retrieve anything because, for all the args and
 153   // the return, we provided the memory and we own it.
 154   return this->check_validity ();
 155 }
 156
 157 void
 158 Test_Unbounded_WString::print_values ()
 159 {
 160 }