diff options
Diffstat (limited to 'TAO/tao/AnyTypeCode/Any_Dual_Impl_T.cpp')
-rw-r--r-- | TAO/tao/AnyTypeCode/Any_Dual_Impl_T.cpp | 213 |
1 files changed, 213 insertions, 0 deletions
diff --git a/TAO/tao/AnyTypeCode/Any_Dual_Impl_T.cpp b/TAO/tao/AnyTypeCode/Any_Dual_Impl_T.cpp new file mode 100644 index 00000000000..e43cfaffc26 --- /dev/null +++ b/TAO/tao/AnyTypeCode/Any_Dual_Impl_T.cpp @@ -0,0 +1,213 @@ +// $Id$ + +#ifndef TAO_ANY_DUAL_IMPL_T_CPP +#define TAO_ANY_DUAL_IMPL_T_CPP + +#include "tao/AnyTypeCode/Any_Dual_Impl_T.h" +#include "tao/AnyTypeCode/Any.h" +#include "tao/AnyTypeCode/Any_Unknown_IDL_Type.h" +#include "tao/AnyTypeCode/Marshal.h" +#include "tao/CORBA_String.h" +#include "tao/SystemException.h" +#include "tao/CDR.h" +#include "tao/AnyTypeCode/TypeCode.h" + +#include "ace/Auto_Ptr.h" +#include "ace/OS_Memory.h" + +#if !defined (__ACE_INLINE__) +# include "tao/AnyTypeCode/Any_Dual_Impl_T.inl" +#endif /* ! __ACE_INLINE__ */ + +TAO_BEGIN_VERSIONED_NAMESPACE_DECL + +template<typename T> +TAO::Any_Dual_Impl_T<T>::Any_Dual_Impl_T (_tao_destructor destructor, + CORBA::TypeCode_ptr tc, + T * const val) + : Any_Impl (destructor, + tc), + value_ (val) +{ +} + +template<typename T> void +TAO::Any_Dual_Impl_T<T>::value (const T & val) +{ + ACE_NEW (this->value_, + T (val)); +} + +template<typename T> +TAO::Any_Dual_Impl_T<T>::Any_Dual_Impl_T (_tao_destructor destructor, + CORBA::TypeCode_ptr tc, + const T & val) + : Any_Impl (destructor, + tc) +{ + this->value (val); +} + +template<typename T> +TAO::Any_Dual_Impl_T<T>::Any_Dual_Impl_T (CORBA::TypeCode_ptr tc) + : Any_Impl (0, + tc) +{ +} + +template<typename T> +TAO::Any_Dual_Impl_T<T>::~Any_Dual_Impl_T (void) +{ +} + +template<typename T> +void +TAO::Any_Dual_Impl_T<T>::insert (CORBA::Any & any, + _tao_destructor destructor, + CORBA::TypeCode_ptr tc, + T * const value) +{ + Any_Dual_Impl_T<T> *new_impl = 0; + ACE_NEW (new_impl, + Any_Dual_Impl_T (destructor, + tc, + value)); + any.replace (new_impl); +} + +template<typename T> +void +TAO::Any_Dual_Impl_T<T>::insert_copy (CORBA::Any & any, + _tao_destructor destructor, + CORBA::TypeCode_ptr tc, + const T & value) +{ + Any_Dual_Impl_T<T> *new_impl = 0; + ACE_NEW (new_impl, + Any_Dual_Impl_T (destructor, + tc, + value)); + any.replace (new_impl); +} + +template<typename T> +CORBA::Boolean +TAO::Any_Dual_Impl_T<T>::extract (const CORBA::Any & any, + _tao_destructor destructor, + CORBA::TypeCode_ptr tc, + const T *& _tao_elem) +{ + _tao_elem = 0; + + try + { + CORBA::TypeCode_ptr any_tc = any._tao_get_typecode (); + CORBA::Boolean const _tao_equiv = any_tc->equivalent (tc); + + if (_tao_equiv == false) + { + return false; + } + + TAO::Any_Impl * const impl = any.impl (); + + if (impl && !impl->encoded ()) + { + TAO::Any_Dual_Impl_T<T> * const narrow_impl = + dynamic_cast <TAO::Any_Dual_Impl_T<T> *> (impl); + + if (narrow_impl == 0) + { + return false; + } + + _tao_elem = narrow_impl->value_; + return true; + } + + T *empty_value = 0; + ACE_NEW_RETURN (empty_value, + T, + false); + TAO::Any_Dual_Impl_T<T> *replacement = 0; + ACE_NEW_RETURN (replacement, + TAO::Any_Dual_Impl_T<T> (destructor, + any_tc, + empty_value), + false); + + auto_ptr<TAO::Any_Dual_Impl_T<T> > replacement_safety (replacement); + + // We know this will work since the unencoded case is covered above. + TAO::Unknown_IDL_Type * const unk = + dynamic_cast<TAO::Unknown_IDL_Type *> (impl); + + if (!unk) + return false; + + // We don't want the rd_ptr of unk to move, in case it is + // shared by another Any. This copies the state, not the buffer. + TAO_InputCDR for_reading (unk->_tao_get_cdr ()); + + CORBA::Boolean const good_decode = + replacement->demarshal_value (for_reading); + + if (good_decode) + { + _tao_elem = replacement->value_; + const_cast<CORBA::Any &> (any).replace (replacement); + replacement_safety.release (); + return true; + } + + // Duplicated by Any_Impl base class constructor. + ::CORBA::release (any_tc); + } + catch (const ::CORBA::Exception&) + { + } + + return false; +} + +template<typename T> +CORBA::Boolean +TAO::Any_Dual_Impl_T<T>::marshal_value (TAO_OutputCDR &cdr) +{ + return (cdr << *this->value_); +} + +template<typename T> +const void * +TAO::Any_Dual_Impl_T<T>::value (void) const +{ + return this->value_; +} + +template<typename T> +void +TAO::Any_Dual_Impl_T<T>::free_value (void) +{ + if (this->value_destructor_ != 0) + { + (*this->value_destructor_) (this->value_); + this->value_destructor_ = 0; + } + + ::CORBA::release (this->type_); + this->value_ = 0; +} + +template<typename T> +void +TAO::Any_Dual_Impl_T<T>::_tao_decode (TAO_InputCDR &cdr) +{ + if (! this->demarshal_value (cdr)) + { + throw ::CORBA::MARSHAL (); + } +} + +TAO_END_VERSIONED_NAMESPACE_DECL + +#endif /* TAO_ANY_DUAL_IMPL_T_CPP */ |