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 (void)
  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 (void)
  27 {
  28   CORBA::string_free (this->opname_);
  29   this->opname_ = 0;
  30 }
  31
  32 const char *
  33 Test_Fixed_Array::opname (void) 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 (void)
  82 {
  83
  84   for (CORBA::ULong i=0; i < Param_Test::DIM1; i++)
  85     {
  86       this->inout_ [i] = 0;
  87       this->out_ [i] = 0;
  88     }
  89   // free the return value array
  90   Param_Test::Fixed_Array_free (this->ret_._retn ());
  91   // needed for repeated DII calls
  92   this->ret_ = new Param_Test::Fixed_Array;
  93   return 0;
  94 }
  95
  96 int
  97 Test_Fixed_Array::run_sii_test (Param_Test_ptr objref)
  98 {
  99   try
 100     {
 101       this->ret_ = objref->test_fixed_array (this->in_,
 102                                              this->inout_,
 103                                              this->out_);
 104
 105       return 0;
 106     }
 107   catch (const CORBA::Exception& ex)
 108     {
 109       ex._tao_print_exception ("Test_Fixed_Array::run_sii_test\n");
 110
 111     }
 112   return -1;
 113 }
 114
 115 CORBA::Boolean
 116 Test_Fixed_Array::check_validity (void)
 117 {
 118   if (this->compare (this->in_, this->inout_) &&
 119       this->compare (this->in_, this->out_) &&
 120       this->compare (this->in_, this->ret_.in ()))
 121     return 1;
 122   else
 123     return 0;
 124 }
 125
 126 CORBA::Boolean
 127 Test_Fixed_Array::check_validity (CORBA::Request_ptr /*req*/)
 128 {
 129   //ACE_UNUSED_ARG (req);
 130   return this->check_validity ();
 131 }
 132
 133 CORBA::Boolean
 134 Test_Fixed_Array::compare (const Param_Test::Fixed_Array_slice *a1,
 135                            const Param_Test::Fixed_Array_slice *a2)
 136 {
 137   for (CORBA::ULong i=0; i < Param_Test::DIM1; i++)
 138     {
 139       if (a1[i] != a2[i])
 140         return 0;
 141     }
 142   return 1; // success
 143 }
 144
 145 void
 146 Test_Fixed_Array::print_values (void)
 147 {
 148   ACE_DEBUG ((LM_DEBUG, "IN array\n"));
 149   this->print (this->in_);
 150   ACE_DEBUG ((LM_DEBUG, "INOUT array\n"));
 151   this->print (this->inout_);
 152   ACE_DEBUG ((LM_DEBUG, "OUT array\n"));
 153   this->print (this->out_);
 154   ACE_DEBUG ((LM_DEBUG, "RET array\n"));
 155   this->print (this->ret_.in ());
 156 }
 157
 158 void
 159 Test_Fixed_Array::print (const Param_Test::Fixed_Array_slice *a)
 160 {
 161   for (CORBA::ULong i = 0; i < Param_Test::DIM1; i++)
 162     {
 163       ACE_DEBUG ((LM_DEBUG, "\t\tElement #%d = %d\n",i, a[i]));
 164     }
 165 }