1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
|
//=============================================================================
/**
* @file DynAnyFactory.cpp
*
* $Id$
*
* @author Carlos O'Ryan <coryan@uci.edu>
*/
//=============================================================================
#include "tao/AnyTypeCode/AnyTypeCode_methods.h"
#include "tao/DynamicAny/DynAnyFactory.h"
#include "tao/DynamicAny/DynAny_i.h"
#include "tao/DynamicAny/DynStruct_i.h"
#include "tao/DynamicAny/DynSequence_i.h"
#include "tao/DynamicAny/DynEnum_i.h"
#include "tao/DynamicAny/DynArray_i.h"
#include "tao/DynamicAny/DynUnion_i.h"
#include "tao/DynamicAny/DynAnyUtils_T.h"
#include "ace/Auto_Ptr.h"
ACE_RCSID (DynamicAny,
DynAnyFactory,
"$Id$")
TAO_BEGIN_VERSIONED_NAMESPACE_DECL
// Constructor from typecode
TAO_DynAnyFactory::TAO_DynAnyFactory (void)
{
}
DynamicAny::DynAny_ptr
TAO_DynAnyFactory::create_dyn_any (
const CORBA::Any & value
ACE_ENV_ARG_DECL
)
ACE_THROW_SPEC ((
CORBA::SystemException,
DynamicAny::DynAnyFactory::InconsistentTypeCode
))
{
return
TAO::MakeDynAnyUtils<const CORBA::Any&>::make_dyn_any_t (
value._tao_get_typecode (),
value);
}
DynamicAny::DynAny_ptr
TAO_DynAnyFactory::create_dyn_any_from_type_code (
CORBA::TypeCode_ptr type
ACE_ENV_ARG_DECL
)
ACE_THROW_SPEC ((
CORBA::SystemException,
DynamicAny::DynAnyFactory::InconsistentTypeCode
))
{
// Second arg is typed in the template parameter, repeating it
// this way allows cleaner template code.
return
TAO::MakeDynAnyUtils<CORBA::TypeCode_ptr>::make_dyn_any_t (
type,
type);
}
DynamicAny::DynAny_ptr
TAO_DynAnyFactory::create_dyn_any_without_truncation (
const CORBA::Any & /* value */
ACE_ENV_ARG_DECL
)
ACE_THROW_SPEC ((
CORBA::SystemException,
DynamicAny::DynAnyFactory::InconsistentTypeCode,
DynamicAny::MustTruncate
))
{
ACE_THROW_RETURN (CORBA::NO_IMPLEMENT (),
DynamicAny::DynAny::_nil ());
}
DynamicAny::DynAnySeq *
TAO_DynAnyFactory::create_multiple_dyn_anys (
const DynamicAny::AnySeq & /* values */,
::CORBA::Boolean /* allow_truncate */
ACE_ENV_ARG_DECL
)
ACE_THROW_SPEC ((
CORBA::SystemException,
DynamicAny::DynAnyFactory::InconsistentTypeCode,
DynamicAny::MustTruncate
))
{
ACE_THROW_RETURN (CORBA::NO_IMPLEMENT (), 0);
}
DynamicAny::AnySeq *
TAO_DynAnyFactory::create_multiple_anys (
const DynamicAny::DynAnySeq & /* values */
ACE_ENV_ARG_DECL
)
ACE_THROW_SPEC ((
CORBA::SystemException
))
{
ACE_THROW_RETURN (CORBA::NO_IMPLEMENT (), 0);
}
// Utility function called by all the DynAny classes
// to extract the TCKind of possibly aliased types.
CORBA::TCKind
TAO_DynAnyFactory::unalias (CORBA::TypeCode_ptr tc
ACE_ENV_ARG_DECL)
{
CORBA::TCKind tck = tc->kind (ACE_ENV_SINGLE_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::tk_null);
while (tck == CORBA::tk_alias)
{
CORBA::TypeCode_var temp =
tc->content_type (ACE_ENV_SINGLE_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::tk_null);
tck = TAO_DynAnyFactory::unalias (temp.in ()
ACE_ENV_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::tk_null);
}
return tck;
}
// Same as above, but returns the type code.
CORBA::TypeCode_ptr
TAO_DynAnyFactory::strip_alias (CORBA::TypeCode_ptr tc
ACE_ENV_ARG_DECL)
{
CORBA::TypeCode_var retval = CORBA::TypeCode::_duplicate (tc);
CORBA::TCKind tck = retval->kind (ACE_ENV_SINGLE_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::TypeCode::_nil ());
while (tck == CORBA::tk_alias)
{
retval = retval->content_type (ACE_ENV_SINGLE_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::TypeCode::_nil ());
tck = retval->kind (ACE_ENV_SINGLE_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::TypeCode::_nil ());
}
return retval._retn ();
}
TAO_END_VERSIONED_NAMESPACE_DECL
|
