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
|
/* -*- C++ -*- */
// $Id$
#include "AliasDef_i.h"
#include "Repository_i.h"
#include "ace/Auto_Ptr.h"
ACE_RCSID (IFRService,
AliasDef_i,
"$Id$")
TAO_AliasDef_i::TAO_AliasDef_i (TAO_Repository_i *repo)
: TAO_IRObject_i (repo),
TAO_Contained_i (repo),
TAO_IDLType_i (repo),
TAO_TypedefDef_i (repo)
{
}
TAO_AliasDef_i::~TAO_AliasDef_i (void)
{
}
CORBA::DefinitionKind
TAO_AliasDef_i::def_kind (ACE_ENV_SINGLE_ARG_DECL_NOT_USED)
ACE_THROW_SPEC ((CORBA::SystemException))
{
return CORBA::dk_Alias;
}
CORBA::TypeCode_ptr
TAO_AliasDef_i::type (ACE_ENV_SINGLE_ARG_DECL)
ACE_THROW_SPEC ((CORBA::SystemException))
{
TAO_IFR_READ_GUARD_RETURN (CORBA::TypeCode::_nil ());
this->update_key (ACE_ENV_SINGLE_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::TypeCode::_nil ());
return this->type_i (ACE_ENV_SINGLE_ARG_PARAMETER);
}
CORBA::TypeCode_ptr
TAO_AliasDef_i::type_i (ACE_ENV_SINGLE_ARG_DECL)
ACE_THROW_SPEC ((CORBA::SystemException))
{
ACE_TString id;
this->repo_->config ()->get_string_value (this->section_key_,
"id",
id);
ACE_TString name;
this->repo_->config ()->get_string_value (this->section_key_,
"name",
name);
ACE_TString original_type;
this->repo_->config ()->get_string_value (this->section_key_,
"original_type",
original_type);
TAO_IDLType_i *impl = this->path_to_idltype (original_type);
CORBA::TypeCode_var tc = impl->type_i (ACE_ENV_SINGLE_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::TypeCode::_nil ());
return this->repo_->tc_factory ()->create_alias_tc (id.c_str (),
name.c_str (),
tc.in ()
ACE_ENV_ARG_PARAMETER);
}
CORBA::IDLType_ptr
TAO_AliasDef_i::original_type_def (ACE_ENV_SINGLE_ARG_DECL)
ACE_THROW_SPEC ((CORBA::SystemException))
{
TAO_IFR_READ_GUARD_RETURN (CORBA::IDLType::_nil ());
this->update_key (ACE_ENV_SINGLE_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::TypeCode::_nil ());
return this->original_type_def_i (ACE_ENV_SINGLE_ARG_PARAMETER);
}
CORBA::IDLType_ptr
TAO_AliasDef_i::original_type_def_i (ACE_ENV_SINGLE_ARG_DECL)
ACE_THROW_SPEC ((CORBA::SystemException))
{
ACE_TString original_type;
this->repo_->config ()->get_string_value (this->section_key_,
"original_type",
original_type);
CORBA::Object_var obj = this->path_to_ir_object (original_type
ACE_ENV_ARG_PARAMETER);
ACE_CHECK_RETURN (CORBA::IDLType::_nil ());
return CORBA::IDLType::_narrow (obj.in ()
ACE_ENV_ARG_PARAMETER);
}
void
TAO_AliasDef_i::original_type_def (CORBA::IDLType_ptr original_type_def
ACE_ENV_ARG_DECL)
ACE_THROW_SPEC ((CORBA::SystemException))
{
TAO_IFR_WRITE_GUARD;
this->update_key (ACE_ENV_SINGLE_ARG_PARAMETER);
ACE_CHECK;
this->original_type_def_i (original_type_def
ACE_ENV_ARG_PARAMETER);
}
void
TAO_AliasDef_i::original_type_def_i (CORBA::IDLType_ptr original_type_def
ACE_ENV_ARG_DECL)
ACE_THROW_SPEC ((CORBA::SystemException))
{
CORBA::String_var original_type =
this->reference_to_path (original_type_def);
this->repo_->config ()->set_string_value (this->section_key_,
"original_type",
original_type.in ());
}
|