TAO_DynUnion_i Class Reference

#include <DynUnion_i.h>

Inheritance diagram for TAO_DynUnion_i:

[legend]Collaboration diagram for TAO_DynUnion_i:

[legend]List of all members.

Public Member Functions
	TAO_DynUnion_i (void)
	Constructor.
	~TAO_DynUnion_i (void)
	Destructor.
void	init (const CORBA::Any &any)
	Constructor taking an Any argument.
void	init (CORBA::TypeCode_ptr tc)
	Constructor taking a typecode argument.
virtual DynamicAny::DynAny_ptr	get_discriminator () throw ( CORBA::SystemException )
virtual void	set_discriminator (DynamicAny::DynAny_ptr d) throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch )
virtual void	set_to_default_member () throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch )
virtual void	set_to_no_active_member () throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch )
virtual CORBA::Boolean	has_no_active_member () throw ( CORBA::SystemException )
virtual CORBA::TCKind	discriminator_kind () throw ( CORBA::SystemException )
virtual DynamicAny::DynAny_ptr	member () throw ( CORBA::SystemException, DynamicAny::DynAny::InvalidValue )
virtual char *	member_name () throw ( CORBA::SystemException, DynamicAny::DynAny::InvalidValue )
virtual CORBA::TCKind	member_kind () throw ( CORBA::SystemException, DynamicAny::DynAny::InvalidValue )
virtual void	from_any (const CORBA::Any &value) throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch, DynamicAny::DynAny::InvalidValue )
virtual CORBA::Any *	to_any () throw ( CORBA::SystemException )
virtual CORBA::Boolean	equal (DynamicAny::DynAny_ptr dyn_any) throw ( CORBA::SystemException )
virtual void	destroy () throw ( CORBA::SystemException )
virtual DynamicAny::DynAny_ptr	current_component () throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch )
Static Public Member Functions
TAO_DynUnion_i *	_narrow (CORBA::Object_ptr obj)
Private Member Functions
void	set_from_any (const CORBA::Any &any, CORBA::Boolean from_factory) throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch, DynamicAny::DynAnyFactory::InconsistentTypeCode )
void	init_common (void)
	Called by both versions of init().
CORBA::Boolean	label_match (const CORBA::Any &my_any, const CORBA::Any &other_any) throw ( CORBA::SystemException )
	Iterative check for label value match.
	TAO_DynUnion_i (const TAO_DynUnion_i &src)
	Use copy() or assign() instead of these.
TAO_DynUnion_i &	operator= (const TAO_DynUnion_i &src)
Private Attributes
DynamicAny::DynAny_var	member_
	Just two components.
DynamicAny::DynAny_var	discriminator_
CORBA::ULong	member_slot_
	The active member's slot in the union type code.

---

Detailed Description

Implementation of Dynamic Any type for Unions.

Definition at line 41 of file DynUnion_i.h.

---

Constructor & Destructor Documentation

TAO_BEGIN_VERSIONED_NAMESPACE_DECL TAO_DynUnion_i::TAO_DynUnion_i (  void   )

Constructor. Definition at line 15 of file DynUnion_i.cpp. { }

TAO_DynUnion_i::~TAO_DynUnion_i (  void   )

Destructor. Definition at line 19 of file DynUnion_i.cpp. { }

TAO_DynUnion_i::TAO_DynUnion_i (  const TAO_DynUnion_i &  src  )  [private]

Use copy() or assign() instead of these.

---

Member Function Documentation

TAO_DynUnion_i * TAO_DynUnion_i::_narrow (  CORBA::Object_ptr  obj  )  [static]

Implements DynamicAny::DynUnion. Definition at line 112 of file DynUnion_i.cpp. References CORBA::is_nil(). Referenced by equal(), and TAO_DynCommon::set_flag(). { if (CORBA::is_nil (_tao_objref)) { return 0; } return dynamic_cast<TAO_DynUnion_i *> (_tao_objref); }

DynamicAny::DynAny_ptr TAO_DynUnion_i::current_component (   )  throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch ) [virtual]

Implements DynamicAny::DynAny. Definition at line 939 of file DynUnion_i.cpp. References DynamicAny::DynAny::_duplicate(), ACE_CHECK_RETURN, ACE_ENV_ARG_PARAMETER, and ACE_THROW_RETURN. { if (this->destroyed_) { ACE_THROW_RETURN (CORBA::OBJECT_NOT_EXIST (), DynamicAny::DynAny::_nil ()); } if (this->current_position_ == 1) { this->set_flag (this->member_.in (), 0 ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (DynamicAny::DynAny::_nil ()); return DynamicAny::DynAny::_duplicate (this->member_.in ()); } else { this->set_flag (this->discriminator_.in (), 0 ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (DynamicAny::DynAny::_nil ()); return DynamicAny::DynAny::_duplicate (this->discriminator_.in ()); } }

void TAO_DynUnion_i::destroy (   )  throw ( CORBA::SystemException ) [virtual]

Implements DynamicAny::DynAny. Definition at line 904 of file DynUnion_i.cpp. References ACE_CHECK, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, and ACE_THROW. { if (this->destroyed_) { ACE_THROW (CORBA::OBJECT_NOT_EXIST ()); } if (!this->ref_to_component_ || this->container_is_destroying_) { // Free the two components. this->set_flag (this->member_.in (), 1 ACE_ENV_ARG_PARAMETER); ACE_CHECK; this->member_->destroy (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; this->set_flag (this->discriminator_.in (), 1 ACE_ENV_ARG_PARAMETER); ACE_CHECK; this->discriminator_->destroy (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; this->destroyed_ = 1; } }

CORBA::TCKind TAO_DynUnion_i::discriminator_kind (   )  throw ( CORBA::SystemException ) [virtual]

Implements DynamicAny::DynUnion. Definition at line 590 of file DynUnion_i.cpp. References ACE_CHECK_RETURN, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, ACE_THROW_RETURN, and TAO_DynAnyFactory::unalias(). { if (this->destroyed_) { ACE_THROW_RETURN (CORBA::OBJECT_NOT_EXIST (), CORBA::tk_null); } CORBA::TypeCode_var tc = this->discriminator_->type (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK_RETURN (CORBA::tk_null); CORBA::TCKind retval = TAO_DynAnyFactory::unalias (tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (CORBA::tk_null); return retval; }

CORBA::Boolean TAO_DynUnion_i::equal (  DynamicAny::DynAny_ptr  dyn_any  )  throw ( CORBA::SystemException ) [virtual]

Definition at line 857 of file DynUnion_i.cpp. References _narrow(), TAO_Local_RefCounted_Object::_remove_ref(), ACE_CHECK_RETURN, ACE_ENV_ARG_PARAMETER, ACE_THROW_RETURN, discriminator_, DynamicAny::DynAny_ptr, TAO_Objref_Var_T< T >::in(), member_, and TAO_DynCommon::type_. { if (this->destroyed_) { ACE_THROW_RETURN (CORBA::OBJECT_NOT_EXIST (), 0); } TAO_DynUnion_i *impl = TAO_DynUnion_i::_narrow (rhs ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (0); if (impl == 0) { return 0; } CORBA::Boolean equivalent = this->type_->equivalent (impl->type_.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (0); if (!equivalent) { return 0; } CORBA::Boolean member_equal = this->member_->equal (impl->member_.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (0); CORBA::Boolean disc_equal = this->discriminator_->equal (impl->discriminator_.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (0); impl->_remove_ref (); return (member_equal && disc_equal); }

void TAO_DynUnion_i::from_any (  const CORBA::Any &  value  )  throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch, DynamicAny::DynAny::InvalidValue ) [virtual]

Definition at line 712 of file DynUnion_i.cpp. References ACE_CHECK, ACE_ENV_ARG_PARAMETER, and ACE_THROW. { if (this->destroyed_) { ACE_THROW (CORBA::OBJECT_NOT_EXIST ()); } CORBA::TypeCode_var tc = any.type (); CORBA::Boolean equivalent = this->type_.in ()->equivalent (tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; if (equivalent) { // CORBA 2.3.1 section 9.2.3.3. this->current_position_ = 0; // May be changed in set_from_any(). this->component_count_ = 2; // Set the from_factory arg to FALSE, so any problems will throw // TypeMismatch. this->set_from_any (any, 0 ACE_ENV_ARG_PARAMETER); ACE_CHECK; } else { ACE_THROW (DynamicAny::DynAny::TypeMismatch ()); } }

DynamicAny::DynAny_ptr TAO_DynUnion_i::get_discriminator (   )  throw ( CORBA::SystemException ) [virtual]

Implements DynamicAny::DynUnion. Definition at line 302 of file DynUnion_i.cpp. References DynamicAny::DynAny::_duplicate(), ACE_ENV_ARG_PARAMETER, and ACE_THROW_RETURN. { if (this->destroyed_) { ACE_THROW_RETURN (CORBA::OBJECT_NOT_EXIST (), DynamicAny::DynAny::_nil ()); } // A deep copy is made only by copy() (CORBA 2.4.2 section 9.2.3.6). // Set the flag so the caller can't destroy. this->set_flag (this->discriminator_.in (), 0 ACE_ENV_ARG_PARAMETER); return DynamicAny::DynAny::_duplicate (this->discriminator_.in ()); }

CORBA::Boolean TAO_DynUnion_i::has_no_active_member (   )  throw ( CORBA::SystemException ) [virtual]

Implements DynamicAny::DynUnion. Definition at line 573 of file DynUnion_i.cpp. References ACE_THROW_RETURN. { if (this->destroyed_) { ACE_THROW_RETURN (CORBA::OBJECT_NOT_EXIST (), 0); } // No active member (CORBA 2.3.1). return (this->current_position_ == 0 && this->component_count_ == 1); }

void TAO_DynUnion_i::init (  CORBA::TypeCode_ptr  tc  )

Constructor taking a typecode argument. Definition at line 64 of file DynUnion_i.cpp. References ACE_CHECK, ACE_ENV_ARG_PARAMETER, ACE_THROW, init_common(), TAO_DynAnyFactory::make_dyn_any(), TAO_DynAnyFactory::strip_alias(), and TAO_DynAnyFactory::unalias(). { CORBA::TCKind kind = TAO_DynAnyFactory::unalias (tc ACE_ENV_ARG_PARAMETER); ACE_CHECK; if (kind != CORBA::tk_union) { ACE_THROW (DynamicAny::DynAnyFactory::InconsistentTypeCode ()); } // Initialize the typecode holder and current index. this->type_ = CORBA::TypeCode::_duplicate (tc); this->init_common (); // member_type()/member_label() do not work with aliased type codes. CORBA::TypeCode_var unaliased_tc = TAO_DynAnyFactory::strip_alias (this->type_.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::Any_var first_label = unaliased_tc->member_label (this->current_position_ ACE_ENV_ARG_PARAMETER); ACE_CHECK; // Initialize the discriminator to the label value of the first member. this->discriminator_ = TAO_DynAnyFactory::make_dyn_any (first_label.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::TypeCode_var first_type = unaliased_tc->member_type (this->current_position_ ACE_ENV_ARG_PARAMETER); ACE_CHECK; // Recursively initialize the member to its default value. this->member_ = TAO_DynAnyFactory::make_dyn_any (first_type.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; }

void TAO_DynUnion_i::init (  const CORBA::Any &  any  )

Constructor taking an Any argument. Definition at line 36 of file DynUnion_i.cpp. References ACE_CHECK, ACE_ENV_ARG_PARAMETER, ACE_THROW, init_common(), set_from_any(), and TAO_DynAnyFactory::unalias(). Referenced by TAO_DynAnyFactory::make_dyn_any(). { CORBA::TypeCode_var tc = any.type (); CORBA::TCKind kind = TAO_DynAnyFactory::unalias (tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; if (kind != CORBA::tk_union) { ACE_THROW (DynamicAny::DynAnyFactory::InconsistentTypeCode ()); } // Initialize the typecode holder. this->type_ = tc; this->init_common (); // Set the from_factory arg to TRUE, so any problems will throw // InconsistentTypeCode. this->set_from_any (any, 1 ACE_ENV_ARG_PARAMETER); ACE_CHECK; }

void TAO_DynUnion_i::init_common (  void   )  [private]

Called by both versions of init(). Definition at line 24 of file DynUnion_i.cpp. References member_slot_. Referenced by init(). { this->ref_to_component_ = 0; this->container_is_destroying_ = 0; this->has_components_ = 1; this->destroyed_ = 0; this->component_count_ = 2; this->current_position_ = 0; this->member_slot_ = 0; }

CORBA::Boolean TAO_DynUnion_i::label_match (  const CORBA::Any &  my_any, const CORBA::Any &  other_any )  throw ( CORBA::SystemException ) [private]

Iterative check for label value match. Definition at line 974 of file DynUnion_i.cpp. References ACE_CHECK_RETURN, ACE_ENV_ARG_PARAMETER, ACE_InputCDR::read_ulong(), and TAO_DynAnyFactory::unalias(). { // Use my_any so we can detect a default case label, // if we are iterating through the union type code's // member_label() calls. CORBA::TypeCode_var tc = my_any.type (); CORBA::TCKind kind = TAO_DynAnyFactory::unalias (tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (0); // No need to do any type checking - it was done before this // call was made. switch (kind) { case CORBA::tk_octet: // Default case label - just skip it. return 0; case CORBA::tk_short: { CORBA::Short my_val; CORBA::Short other_val; my_any >>= my_val; other_any >>= other_val; return my_val == other_val; } case CORBA::tk_long: { CORBA::Long my_val; CORBA::Long other_val; my_any >>= my_val; other_any >>= other_val; return my_val == other_val; } case CORBA::tk_ushort: { CORBA::UShort my_val; CORBA::UShort other_val; my_any >>= my_val; other_any >>= other_val; return my_val == other_val; } case CORBA::tk_ulong: { CORBA::ULong my_val; CORBA::ULong other_val; my_any >>= my_val; other_any >>= other_val; return my_val == other_val; } case CORBA::tk_boolean: { CORBA::Boolean my_val; CORBA::Boolean other_val; my_any >>= CORBA::Any::to_boolean (my_val); other_any >>= CORBA::Any::to_boolean (other_val); return my_val == other_val; } case CORBA::tk_char: { CORBA::Char my_val; CORBA::Char other_val; my_any >>= CORBA::Any::to_char (my_val); other_any >>= CORBA::Any::to_char (other_val); return my_val == other_val; } // For platforms without native 64-bit ints. #if !defined (ACE_LACKS_LONGLONG_T) case CORBA::tk_longlong: { CORBA::LongLong my_val; CORBA::LongLong other_val; my_any >>= my_val; other_any >>= other_val; return my_val == other_val; } #endif /* ACE_LACKS_LONGLONG_T */ case CORBA::tk_ulonglong: { CORBA::ULongLong my_val; CORBA::ULongLong other_val; my_any >>= my_val; other_any >>= other_val; return my_val == other_val; } case CORBA::tk_wchar: { CORBA::WChar my_val; CORBA::WChar other_val; my_any >>= CORBA::Any::to_wchar (my_val); other_any >>= CORBA::Any::to_wchar (other_val); return my_val == other_val; } case CORBA::tk_enum: { CORBA::ULong my_val; CORBA::ULong other_val; TAO::Any_Impl *my_impl = my_any.impl (); if (my_impl->encoded ()) { TAO::Unknown_IDL_Type *my_unk = dynamic_cast<TAO::Unknown_IDL_Type *> (my_impl); // We don't want unk's rd_ptr to move, in case we are shared by // another Any, so we use this to copy the state, not the buffer. TAO_InputCDR for_reading (my_unk->_tao_get_cdr ()); for_reading.read_ulong (my_val); } else { TAO_OutputCDR my_out; my_impl->marshal_value (my_out); TAO_InputCDR my_in (my_out); my_in.read_ulong (my_val); } TAO::Any_Impl *other_impl = other_any.impl (); if (other_impl->encoded ()) { TAO::Unknown_IDL_Type *other_unk = dynamic_cast<TAO::Unknown_IDL_Type *> (other_impl); // We don't want unk's rd_ptr to move, in case we are shared by // another Any, so we use this to copy the state, not the buffer. TAO_InputCDR for_reading (other_unk->_tao_get_cdr ()); for_reading.read_ulong (other_val); } else { TAO_OutputCDR other_out; other_impl->marshal_value (other_out); TAO_InputCDR other_in (other_out); other_in.read_ulong (other_val); } return my_val == other_val; } // Cannot happen - we've covered all the legal discriminator types. default: return 0; } }

DynamicAny::DynAny_ptr TAO_DynUnion_i::member (   )  throw ( CORBA::SystemException, DynamicAny::DynAny::InvalidValue ) [virtual]

Implements DynamicAny::DynUnion. Definition at line 613 of file DynUnion_i.cpp. References DynamicAny::DynAny::_duplicate(), ACE_CHECK_RETURN, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, and ACE_THROW_RETURN. { if (this->destroyed_) { ACE_THROW_RETURN (CORBA::OBJECT_NOT_EXIST (), DynamicAny::DynAny::_nil ()); } CORBA::Boolean has_no_active_member = this->has_no_active_member (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK_RETURN (DynamicAny::DynAny::_nil ()); if (has_no_active_member) { ACE_THROW_RETURN (DynamicAny::DynAny::InvalidValue (), DynamicAny::DynAny::_nil ()); } // A deep copy is made only by copy() (CORBA 2.4.2 section 9.2.3.6). // Set the flag so the caller can't destroy. this->set_flag (this->member_.in (), 0 ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (DynamicAny::DynAny::_nil ()); return DynamicAny::DynAny::_duplicate (this->member_.in ()); }

CORBA::TCKind TAO_DynUnion_i::member_kind (   )  throw ( CORBA::SystemException, DynamicAny::DynAny::InvalidValue ) [virtual]

Implements DynamicAny::DynUnion. Definition at line 676 of file DynUnion_i.cpp. References ACE_CHECK_RETURN, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, ACE_THROW_RETURN, and TAO_DynAnyFactory::unalias(). { if (this->destroyed_) { ACE_THROW_RETURN (CORBA::OBJECT_NOT_EXIST (), CORBA::tk_null); } CORBA::Boolean has_no_active_member = this->has_no_active_member (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK_RETURN (CORBA::tk_null); if (has_no_active_member) { ACE_THROW_RETURN (DynamicAny::DynAny::InvalidValue (), CORBA::tk_null); } CORBA::TypeCode_var tc = this->member_->type (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK_RETURN (CORBA::tk_null); CORBA::TCKind retval = TAO_DynAnyFactory::unalias (tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (CORBA::tk_null); return retval; }

char * TAO_DynUnion_i::member_name (   )  throw ( CORBA::SystemException, DynamicAny::DynAny::InvalidValue ) [virtual]

Implements DynamicAny::DynUnion. Definition at line 646 of file DynUnion_i.cpp. References ACE_CHECK_RETURN, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, ACE_THROW_RETURN, and CORBA::string_dup(). { if (this->destroyed_) { ACE_THROW_RETURN (CORBA::OBJECT_NOT_EXIST (), 0); } CORBA::Boolean has_no_active_member = this->has_no_active_member (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK_RETURN (0); if (has_no_active_member) { ACE_THROW_RETURN (DynamicAny::DynAny::InvalidValue (), 0); } const char *retval = this->type_->member_name (this->member_slot_ ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (0); return CORBA::string_dup (retval); }

TAO_DynUnion_i& TAO_DynUnion_i::operator= (  const TAO_DynUnion_i &  src  )  [private]

void TAO_DynUnion_i::set_discriminator (  DynamicAny::DynAny_ptr  d  )  throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch ) [virtual]

Definition at line 323 of file DynUnion_i.cpp. References ACE_CHECK, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, ACE_THROW, DynamicAny::DynAny_ptr, TAO_DynAnyFactory::make_dyn_any(), and TAO_DynAnyFactory::strip_alias(). { if (this->destroyed_) { ACE_THROW (CORBA::OBJECT_NOT_EXIST ()); } CORBA::TypeCode_var tc = value->type (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; CORBA::TypeCode_var disc_tc = this->discriminator_->type (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; CORBA::Boolean equivalent = disc_tc->equivalent (tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; if (!equivalent) { ACE_THROW (DynamicAny::DynAny::TypeMismatch ()); } CORBA::Any_var value_any = value->to_any (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; CORBA::ULong length = this->type_->member_count (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; CORBA::Any_var label_any; CORBA::ULong i; // member_label() does not work with aliased type codes. CORBA::TypeCode_var unaliased_tc = TAO_DynAnyFactory::strip_alias (this->type_.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::Boolean match = 0; for (i = 0; i < length; ++i) { label_any = unaliased_tc->member_label (i ACE_ENV_ARG_PARAMETER); ACE_CHECK; match = this->label_match (label_any.in (), value_any.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; if (match) { break; } } if (match) { // If the incoming label value matches the one we already // have, we do nothing. if (i == this->member_slot_) { return; } // If we got a match, a named member will be active. this->discriminator_->from_any (label_any.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; // member_type() does not work with aliased type codes. CORBA::TypeCode_var member_tc = unaliased_tc->member_type (i ACE_ENV_ARG_PARAMETER); ACE_CHECK; this->member_->destroy (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; // Initialize member to default value. this->member_ = TAO_DynAnyFactory::make_dyn_any (member_tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; // Named active member (CORBA 2.3.1). this->current_position_ = 1; this->component_count_ = 2; this->member_slot_ = i; } else { // default_index() does not work with aliased type codes. CORBA::TypeCode_var unaliased_tc = TAO_DynAnyFactory::strip_alias (this->type_.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; // If no match, either the default member or no member is active. CORBA::Long default_index = unaliased_tc->default_index (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; if (default_index == -1) { // This can't throw InvalidValue - if there's no default case // and all possible labels are used, we'd have had a match above. this->set_to_no_active_member (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; } else { this->set_to_default_member (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; this->member_slot_ = static_cast<CORBA::ULong> (default_index); } } // If we get here, we update the discriminator no matter what. // Any value will correspond to one of the three cases above. this->discriminator_->destroy (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; this->discriminator_ = value->copy (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; }

void TAO_DynUnion_i::set_from_any (  const CORBA::Any &  any, CORBA::Boolean  from_factory )  throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch, DynamicAny::DynAnyFactory::InconsistentTypeCode ) [private]

Code common to the constructor from an Any arg and the member function from_any(). Definition at line 126 of file DynUnion_i.cpp. References ACE_CHECK, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, ACE_NEW, CORBA::is_nil(), TAO_DynAnyFactory::make_dyn_any(), and TAO_DynAnyFactory::strip_alias(). Referenced by init(). { // discriminator_type () does not work with aliased type codes, // only on unions, so strip the alias out of the type code // CORBA::TypeCode_var tc = TAO_DynAnyFactory::strip_alias (any.type () ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::TypeCode_var disc_tc = tc->discriminator_type (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; CORBA::Any disc_any; TAO::Unknown_IDL_Type *unk = 0; // Get a CDR stream - if the Any doesn't have one, make one. TAO::Any_Impl *impl = any.impl (); TAO_OutputCDR out; TAO_InputCDR in (static_cast<ACE_Message_Block *> (0)); if (impl->encoded ()) { TAO::Unknown_IDL_Type *tmp = dynamic_cast<TAO::Unknown_IDL_Type *> (impl); in = tmp->_tao_get_cdr (); } else { impl->marshal_value (out); TAO_InputCDR tmp_in (out); in = tmp_in; } TAO_InputCDR unk_in (in); ACE_NEW (unk, TAO::Unknown_IDL_Type (disc_tc.in (), unk_in)); disc_any.replace (unk); // Need this here because we might have been called from init(). if (!CORBA::is_nil (this->discriminator_.in ())) { this->discriminator_->destroy (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; } // Set the discriminator. this->discriminator_ = TAO_DynAnyFactory::make_dyn_any (disc_any ACE_ENV_ARG_PARAMETER); ACE_CHECK; // Move to the next field in the CDR stream. (void) TAO_Marshal_Object::perform_skip (disc_tc.in (), &in ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::TypeCode_var unaliased = TAO_DynAnyFactory::strip_alias (tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::ULong count = unaliased->member_count (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; CORBA::Boolean match = 0; CORBA::ULong i; // Get the index. for (i = 0; i < count; ++i) { CORBA::Any_var label_any = tc->member_label (i ACE_ENV_ARG_PARAMETER); ACE_CHECK; match = this->label_match (label_any.in (), disc_any ACE_ENV_ARG_PARAMETER); ACE_CHECK; if (match) { break; } } // Need this here because we might have been called from init(). if (!CORBA::is_nil (this->member_.in ())) { this->member_->destroy (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; } if (match) { CORBA::TypeCode_var member_tc = tc->member_type (i ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::Any member_any; TAO::Unknown_IDL_Type *unk = 0; ACE_NEW (unk, TAO::Unknown_IDL_Type (member_tc.in (), in)); member_any.replace (unk); this->member_ = TAO_DynAnyFactory::make_dyn_any (member_any ACE_ENV_ARG_PARAMETER); ACE_CHECK; this->member_slot_ = i; } else { // If no match, either the Any contains the default member or the // type code was bad. // default_index() does not work with aliased type codes. CORBA::TypeCode_var unaliased_tc = TAO_DynAnyFactory::strip_alias (this->type_.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::Long default_index = unaliased_tc->default_index (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; if (default_index == -1) { set_to_no_active_member (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; } else { CORBA::ULong index = static_cast<CORBA::ULong> (default_index); CORBA::TypeCode_var default_tc = tc->member_type (index ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::Any default_any; TAO::Unknown_IDL_Type *unk = 0; ACE_NEW (unk, TAO::Unknown_IDL_Type (default_tc.in (), in)); default_any.replace (unk); this->member_ = TAO_DynAnyFactory::make_dyn_any (default_any ACE_ENV_ARG_PARAMETER); ACE_CHECK; this->member_slot_ = index; } } }

void TAO_DynUnion_i::set_to_default_member (   )  throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch ) [virtual]

Implements DynamicAny::DynUnion. Definition at line 460 of file DynUnion_i.cpp. References ACE_CHECK, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, ACE_THROW, TAO_DynAnyFactory::make_dyn_any(), and TAO_DynAnyFactory::strip_alias(). { if (this->destroyed_) { ACE_THROW (CORBA::OBJECT_NOT_EXIST ()); } // default_index() does not work with aliased type codes. CORBA::TypeCode_var unaliased_tc = TAO_DynAnyFactory::strip_alias (this->type_.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::Long default_index = unaliased_tc->default_index (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; if (default_index == -1) { // No explicit default case. ACE_THROW (DynamicAny::DynAny::TypeMismatch ()); } else { CORBA::ULong index = static_cast<CORBA::ULong> (default_index); CORBA::TypeCode_var default_tc = unaliased_tc->member_type (index ACE_ENV_ARG_PARAMETER); ACE_CHECK; this->member_->destroy (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; this->member_ = TAO_DynAnyFactory::make_dyn_any (default_tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; // Default member active (CORBA 2.3.1). this->current_position_ = 0; this->component_count_ = 2; this->member_slot_ = index; } }

void TAO_DynUnion_i::set_to_no_active_member (   )  throw ( CORBA::SystemException, DynamicAny::DynAny::TypeMismatch ) [virtual]

Implements DynamicAny::DynUnion. Definition at line 512 of file DynUnion_i.cpp. References ACE_CHECK, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, ACE_THROW, TAO_DynAnyFactory::strip_alias(), and TAO_DynAnyFactory::unalias(). { if (this->destroyed_) { ACE_THROW (CORBA::OBJECT_NOT_EXIST ()); } // default_index() does not work with aliased type codes. CORBA::TypeCode_var unaliased_tc = TAO_DynAnyFactory::strip_alias (this->type_.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; CORBA::Long default_index = unaliased_tc->default_index (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; // Throw an exception is there is an explicit default case or if all // possible case label values are used. if (default_index != -1) { ACE_THROW (DynamicAny::DynAny::TypeMismatch ()); } else { CORBA::TypeCode_var disc_tc = this->discriminator_->type (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; CORBA::TCKind kind = TAO_DynAnyFactory::unalias (disc_tc.in () ACE_ENV_ARG_PARAMETER); ACE_CHECK; if (kind == CORBA::tk_enum) { CORBA::ULong member_count = this->type_->member_count (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; CORBA::ULong label_count = disc_tc->member_count (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK; if (member_count == label_count) { ACE_THROW (DynamicAny::DynAny::TypeMismatch ()); } } } // No active member (CORBA 2.3.1). this->current_position_ = 0; this->component_count_ = 1; }

CORBA::Any_ptr TAO_DynUnion_i::to_any (   )  throw ( CORBA::SystemException ) [virtual]

Implements DynamicAny::DynAny. Definition at line 753 of file DynUnion_i.cpp. References ACE_CHECK_RETURN, ACE_ENV_ARG_PARAMETER, ACE_ENV_SINGLE_ARG_PARAMETER, ACE_NEW_THROW_EX, and ACE_THROW_RETURN. { if (this->destroyed_) { ACE_THROW_RETURN (CORBA::OBJECT_NOT_EXIST (), 0); } TAO_OutputCDR out_cdr; // Add the discriminator to the CDR stream. CORBA::TypeCode_var disc_tc = this->discriminator_->type (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK_RETURN (0); CORBA::Any_var disc_any = this->discriminator_->to_any (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK_RETURN (0); TAO::Any_Impl *disc_any_impl = disc_any->impl (); TAO_OutputCDR disc_out_cdr; TAO_InputCDR disc_in_cdr (static_cast<ACE_Message_Block *> (0)); if (disc_any_impl->encoded ()) { TAO::Unknown_IDL_Type *disc_unk = dynamic_cast<TAO::Unknown_IDL_Type *> (disc_any_impl); disc_in_cdr = disc_unk->_tao_get_cdr (); } else { disc_any_impl->marshal_value (disc_out_cdr); TAO_InputCDR disc_tmp_in_cdr (disc_out_cdr); disc_in_cdr = disc_tmp_in_cdr; } (void) TAO_Marshal_Object::perform_append (disc_tc.in (), &disc_in_cdr, &out_cdr ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (0); // Add the member to the CDR stream unless it has no active member. if (this->has_no_active_member () == 0) { CORBA::TypeCode_var member_tc = this->member_->type (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK_RETURN (0); CORBA::Any_var member_any = this->member_->to_any (ACE_ENV_SINGLE_ARG_PARAMETER); ACE_CHECK_RETURN (0); TAO::Any_Impl *member_any_impl = member_any->impl (); TAO_OutputCDR member_out_cdr; TAO_InputCDR member_in_cdr (static_cast<ACE_Message_Block *> (0)); if (member_any_impl->encoded ()) { TAO::Unknown_IDL_Type *member_unk = dynamic_cast<TAO::Unknown_IDL_Type *> (member_any_impl); member_in_cdr = member_unk->_tao_get_cdr (); } else { member_any_impl->marshal_value (member_out_cdr); TAO_InputCDR member_tmp_in_cdr (member_out_cdr); member_in_cdr = member_tmp_in_cdr; } (void) TAO_Marshal_Object::perform_append (member_tc.in (), &member_in_cdr, &out_cdr ACE_ENV_ARG_PARAMETER); ACE_CHECK_RETURN (0); } // Make the Any. TAO_InputCDR in_cdr (out_cdr); CORBA::Any_ptr retval = 0; ACE_NEW_THROW_EX (retval, CORBA::Any, CORBA::NO_MEMORY ()); ACE_CHECK_RETURN (0); TAO::Unknown_IDL_Type *unk = 0; ACE_NEW_THROW_EX (unk, TAO::Unknown_IDL_Type (this->type_.in (), in_cdr), CORBA::NO_MEMORY ()); ACE_CHECK_RETURN (0); retval->replace (unk); return retval; }

---

Member Data Documentation

DynamicAny::DynAny_var TAO_DynUnion_i::discriminator_ [private]

Definition at line 208 of file DynUnion_i.h. Referenced by equal().

DynamicAny::DynAny_var TAO_DynUnion_i::member_ [private]

Just two components. Definition at line 207 of file DynUnion_i.h. Referenced by equal().

CORBA::ULong TAO_DynUnion_i::member_slot_ [private]

The active member's slot in the union type code. Definition at line 211 of file DynUnion_i.h. Referenced by init_common().

---

The documentation for this class was generated from the following files:

• DynUnion_i.h
• DynUnion_i.cpp

---