TAO/tao/PI/RequestInfo_Util.cpp

   1 // -*- C++ -*-
   2 #include "tao/PI/RequestInfo_Util.h"
   3
   4 #if TAO_HAS_INTERCEPTORS == 1
   5
   6 #include "tao/AnyTypeCode/TypeCode.h"
   7 #include "tao/AnyTypeCode/DynamicC.h"
   8 #include "tao/ORB_Constants.h"
   9 #include "tao/StringSeqC.h"
  10 #include "tao/SystemException.h"
  11 #include "ace/CORBA_macros.h"
  12
  13 TAO_BEGIN_VERSIONED_NAMESPACE_DECL
  14
  15 Dynamic::ParameterList *
  16 TAO_RequestInfo_Util::make_parameter_list ()
  17 {
  18   Dynamic::ParameterList *parameter_list = 0;
  19   ACE_NEW_THROW_EX (parameter_list,
  20                     Dynamic::ParameterList,
  21                     CORBA::NO_MEMORY (
  22                       CORBA::SystemException::_tao_minor_code (
  23                         0,
  24                         ENOMEM),
  25                       CORBA::COMPLETED_NO));
  26
  27   // No need to do an ACE_CHECK_RETURN.  The caller should do that.
  28
  29   return parameter_list;
  30 }
  31
  32 Dynamic::ExceptionList *
  33 TAO_RequestInfo_Util::make_exception_list ()
  34 {
  35   Dynamic::ExceptionList *exception_list = 0;
  36   ACE_NEW_THROW_EX (exception_list,
  37                     Dynamic::ExceptionList,
  38                     CORBA::NO_MEMORY (
  39                       CORBA::SystemException::_tao_minor_code (
  40                         0,
  41                         ENOMEM),
  42                       CORBA::COMPLETED_NO));
  43
  44   // No need to do an ACE_CHECK_RETURN.  The caller should do that.
  45
  46   return exception_list;
  47 }
  48
  49 Dynamic::ContextList *
  50 TAO_RequestInfo_Util::make_context_list ()
  51 {
  52   Dynamic::ContextList *context_list = 0;
  53   ACE_NEW_THROW_EX (context_list,
  54                     Dynamic::ContextList,
  55                     CORBA::NO_MEMORY (
  56                       CORBA::SystemException::_tao_minor_code (
  57                         0,
  58                         ENOMEM),
  59                       CORBA::COMPLETED_NO));
  60
  61   // No need to do an ACE_CHECK_RETURN.  The caller should do that.
  62
  63   return context_list;
  64 }
  65
  66 Dynamic::RequestContext *
  67 TAO_RequestInfo_Util::make_request_context ()
  68 {
  69   Dynamic::RequestContext *request_context = 0;
  70   ACE_NEW_THROW_EX (request_context,
  71                     Dynamic::RequestContext,
  72                     CORBA::NO_MEMORY (
  73                       CORBA::SystemException::_tao_minor_code (
  74                         0,
  75                         ENOMEM),
  76                       CORBA::COMPLETED_NO));
  77
  78   // No need to do an ACE_CHECK_RETURN.  The caller should do that.
  79
  80   return request_context;
  81 }
  82
  83 CORBA::Any *
  84 TAO_RequestInfo_Util::make_any (CORBA::Boolean tk_void_any)
  85 {
  86   CORBA::Any *any = 0;
  87   ACE_NEW_THROW_EX (any,
  88                     CORBA::Any,
  89                     CORBA::NO_MEMORY (
  90                       CORBA::SystemException::_tao_minor_code (
  91                         0,
  92                         ENOMEM),
  93                       CORBA::COMPLETED_NO));
  94
  95   if (tk_void_any)
  96     {
  97       any->_tao_set_typecode (CORBA::_tc_void);
  98     }
  99
 100   return any;
 101 }
 102
 103 TAO_END_VERSIONED_NAMESPACE_DECL
 104
 105 #endif