TAO/tests/Param_Test/fixed_array.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file    fixed_array.cpp
   5  *
   6  *  tests fixed size arrays
   7  *
   8  *  @author   Aniruddha Gokhale
   9  */
  10 //=============================================================================
  11
  12
  13 #include "helper.h"
  14 #include "fixed_array.h"
  15
  16 // ************************************************************************
  17 //               Test_Fixed_Array
  18 // ************************************************************************
  19
  20 Test_Fixed_Array::Test_Fixed_Array ()
  21   : opname_ (CORBA::string_dup ("test_fixed_array")),
  22     ret_ (new Param_Test::Fixed_Array)
  23 {
  24 }
  25
  26 Test_Fixed_Array::~Test_Fixed_Array ()
  27 {
  28   CORBA::string_free (this->opname_);
  29   this->opname_ = 0;
  30 }
  31
  32 const char *
  33 Test_Fixed_Array::opname () const
  34 {
  35   return this->opname_;
  36 }
  37
  38 void
  39 Test_Fixed_Array::dii_req_invoke (CORBA::Request *req)
  40 {
  41   req->add_in_arg ("s1") <<= Param_Test::Fixed_Array_forany (this->in_);
  42   req->add_inout_arg ("s2") <<= Param_Test::Fixed_Array_forany (this->inout_);
  43   req->add_out_arg ("s3") <<= Param_Test::Fixed_Array_forany (this->out_);
  44   req->set_return_type (Param_Test::_tc_Fixed_Array);
  45
  46   req->invoke ();
  47
  48   Param_Test::Fixed_Array_forany forany;
  49   req->return_value () >>= forany;
  50   Param_Test::Fixed_Array_copy (this->ret_, forany.in ());
  51
  52   CORBA::NamedValue_ptr arg2 =
  53     req->arguments ()->item (1);
  54   *arg2->value () >>= forany;
  55   Param_Test::Fixed_Array_copy (this->inout_, forany.in ());
  56
  57   CORBA::NamedValue_ptr arg3 =
  58     req->arguments ()->item (2);
  59   Param_Test::Fixed_Array_forany out_any (this->out_);
  60   *arg3->value () >>= forany;
  61   Param_Test::Fixed_Array_copy (this->out_, forany.in ());
  62 }
  63
  64 int
  65 Test_Fixed_Array::init_parameters (Param_Test_ptr /*objref*/
  66 /*env*/)
  67 {
  68   Generator *gen = GENERATOR::instance (); // value generator
  69
  70   //ACE_UNUSED_ARG (objref);
  71
  72   for (CORBA::ULong i=0; i < Param_Test::DIM1; i++)
  73     {
  74       this->in_ [i] = gen->gen_long ();
  75     }
  76
  77   return 0;
  78 }
  79
  80 int
  81 Test_Fixed_Array::reset_parameters ()
  82 {
  83   for (CORBA::ULong i=0; i < Param_Test::DIM1; i++)
  84     {
  85       this->inout_ [i] = 0;
  86       this->out_ [i] = 0;
  87     }
  88   // free the return value array
  89   Param_Test::Fixed_Array_free (this->ret_._retn ());
  90   // needed for repeated DII calls
  91   this->ret_ = new Param_Test::Fixed_Array;
  92   return 0;
  93 }
  94
  95 int
  96 Test_Fixed_Array::run_sii_test (Param_Test_ptr objref)
  97 {
  98   try
  99     {
 100       this->ret_ = objref->test_fixed_array (this->in_,
 101                                              this->inout_,
 102                                              this->out_);
 103
 104       return 0;
 105     }
 106   catch (const CORBA::Exception& ex)
 107     {
 108       ex._tao_print_exception ("Test_Fixed_Array::run_sii_test\n");
 109     }
 110   return -1;
 111 }
 112
 113 CORBA::Boolean
 114 Test_Fixed_Array::check_validity ()
 115 {
 116   if (this->compare (this->in_, this->inout_) &&
 117       this->compare (this->in_, this->out_) &&
 118       this->compare (this->in_, this->ret_.in ()))
 119     return 1;
 120   else
 121     return 0;
 122 }
 123
 124 CORBA::Boolean
 125 Test_Fixed_Array::check_validity (CORBA::Request_ptr /*req*/)
 126 {
 127   //ACE_UNUSED_ARG (req);
 128   return this->check_validity ();
 129 }
 130
 131 CORBA::Boolean
 132 Test_Fixed_Array::compare (const Param_Test::Fixed_Array_slice *a1,
 133                            const Param_Test::Fixed_Array_slice *a2)
 134 {
 135   for (CORBA::ULong i=0; i < Param_Test::DIM1; i++)
 136     {
 137       if (a1[i] != a2[i])
 138         return 0;
 139     }
 140   return 1; // success
 141 }
 142
 143 void
 144 Test_Fixed_Array::print_values ()
 145 {
 146   ACE_DEBUG ((LM_DEBUG, "IN array\n"));
 147   this->print (this->in_);
 148   ACE_DEBUG ((LM_DEBUG, "INOUT array\n"));
 149   this->print (this->inout_);
 150   ACE_DEBUG ((LM_DEBUG, "OUT array\n"));
 151   this->print (this->out_);
 152   ACE_DEBUG ((LM_DEBUG, "RET array\n"));
 153   this->print (this->ret_.in ());
 154 }
 155
 156 void
 157 Test_Fixed_Array::print (const Param_Test::Fixed_Array_slice *a)
 158 {
 159   for (CORBA::ULong i = 0; i < Param_Test::DIM1; i++)
 160     {
 161       ACE_DEBUG ((LM_DEBUG, "\t\tElement #%d = %d\n",i, a[i]));
 162     }
 163 }