TAO/tao/DynamicInterface/DII_Arguments.cpp

   1 #include "tao/DynamicInterface/DII_Arguments.h"
   2 #include "tao/AnyTypeCode/NVList.h"
   3 #include "tao/AnyTypeCode/Any_Impl.h"
   4 #include "tao/AnyTypeCode/DynamicC.h"
   5 #include "tao/Exception.h"
   6 #include "tao/CDR.h"
   7
   8 #if !defined (__ACE_INLINE__)
   9 # include "tao/DynamicInterface/DII_Arguments.inl"
  10 #endif /* ! __ACE_INLINE__ */
  11
  12 TAO_BEGIN_VERSIONED_NAMESPACE_DECL
  13
  14 namespace TAO
  15 {
  16   CORBA::Boolean
  17   NamedValue_Argument::demarshal (TAO_InputCDR &cdr)
  18   {
  19     try
  20       {
  21         if (this->x_ !=0 && this->x_->value ()->impl ())
  22           {
  23             this->x_->value ()->impl ()->_tao_decode (cdr);
  24           }
  25       }
  26     catch (const ::CORBA::Exception&)
  27       {
  28         return false;
  29       }
  30
  31     this->byte_order_ = cdr.byte_order ();
  32
  33     return true;
  34   }
  35
  36   void
  37   NamedValue_Argument::interceptor_value (CORBA::Any *any) const
  38   {
  39     (*any) <<= *this->x_->value ();
  40   }
  41
  42   // ========================================================================
  43
  44   CORBA::Boolean
  45   NVList_Argument::marshal (TAO_OutputCDR &cdr)
  46   {
  47     try
  48       {
  49         this->x_->_tao_encode (cdr, CORBA::ARG_IN | CORBA::ARG_INOUT);
  50       }
  51     catch (const ::CORBA::Exception&)
  52       {
  53         return false;
  54       }
  55
  56     return true;
  57   }
  58
  59   CORBA::Boolean
  60   NVList_Argument::demarshal (TAO_InputCDR &cdr)
  61   {
  62     try
  63       {
  64         // Now, get all the "return", "out", and "inout" parameters
  65         // from the response message body ... return parameter is
  66         // first, the rest are in the order defined in the IDL spec
  67         // (which is also the order that DII users are required to
  68         // use).
  69
  70         this->x_->_tao_incoming_cdr (
  71             cdr,
  72             CORBA::ARG_OUT | CORBA::ARG_INOUT,
  73             this->lazy_evaluation_);
  74       }
  75     catch (const ::CORBA::Exception&)
  76       {
  77         return false;
  78       }
  79
  80     return true;
  81   }
  82
  83   void
  84   NVList_Argument::interceptor_paramlist (Dynamic::ParameterList *lst)
  85   {
  86     CORBA::ULong const len = this->x_->count ();
  87     lst->length (len);
  88
  89     for (CORBA::ULong i = 0; i < len; ++i)
  90       {
  91         if (!this->x_->item (i)->value ())
  92           return;
  93
  94         (*lst)[i].argument.replace (this->x_->item (i)->value ()->impl ());
  95
  96         switch (this->x_->item (i)->flags ())
  97           {
  98           case CORBA::ARG_IN:
  99             {
 100               (*lst)[i].mode = CORBA::PARAM_IN;
 101               break;
 102             }
 103           case CORBA::ARG_INOUT:
 104             {
 105               (*lst)[i].mode = CORBA::PARAM_INOUT;
 106               break;
 107             }
 108           case CORBA::ARG_OUT:
 109             {
 110               (*lst)[i].mode = CORBA::PARAM_OUT;
 111               break;
 112             }
 113           default:
 114             break;
 115           }
 116       }
 117   }
 118 }
 119
 120 TAO_END_VERSIONED_NAMESPACE_DECL