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
|
#include "orbsvcs/IFRService/AliasDef_i.h"
#include "orbsvcs/IFRService/Repository_i.h"
#include "orbsvcs/IFRService/IFR_Service_Utils.h"
#include "ace/Auto_Ptr.h"
#include "ace/SString.h"
TAO_BEGIN_VERSIONED_NAMESPACE_DECL
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 (void)
{
return CORBA::dk_Alias;
}
CORBA::TypeCode_ptr
TAO_AliasDef_i::type (void)
{
TAO_IFR_READ_GUARD_RETURN (CORBA::TypeCode::_nil ());
this->update_key ();
return this->type_i ();
}
CORBA::TypeCode_ptr
TAO_AliasDef_i::type_i (void)
{
ACE_TString id;
this->repo_->config ()->get_string_value (this->section_key_,
ACE_TEXT("id"),
id);
ACE_TString name;
this->repo_->config ()->get_string_value (this->section_key_,
ACE_TEXT("name"),
name);
ACE_TString original_type;
this->repo_->config ()->get_string_value (this->section_key_,
ACE_TEXT("original_type"),
original_type);
TAO_IDLType_i *impl =
TAO_IFR_Service_Utils::path_to_idltype (original_type,
this->repo_);
if (0 == impl)
{
throw CORBA::OBJECT_NOT_EXIST();
}
CORBA::TypeCode_var tc = impl->type_i ();
return this->repo_->tc_factory ()->create_alias_tc (ACE_TEXT_ALWAYS_CHAR (id.c_str ()),
ACE_TEXT_ALWAYS_CHAR (name.c_str ()),
tc.in ());
}
CORBA::IDLType_ptr
TAO_AliasDef_i::original_type_def (void)
{
TAO_IFR_READ_GUARD_RETURN (CORBA::IDLType::_nil ());
this->update_key ();
return this->original_type_def_i ();
}
CORBA::IDLType_ptr
TAO_AliasDef_i::original_type_def_i (void)
{
ACE_TString original_type;
this->repo_->config ()->get_string_value (this->section_key_,
ACE_TEXT("original_type"),
original_type);
CORBA::Object_var obj =
TAO_IFR_Service_Utils::path_to_ir_object (original_type,
this->repo_);
return CORBA::IDLType::_narrow (obj.in ());
}
void
TAO_AliasDef_i::original_type_def (CORBA::IDLType_ptr original_type_def)
{
TAO_IFR_WRITE_GUARD;
this->update_key ();
this->original_type_def_i (original_type_def);
}
void
TAO_AliasDef_i::original_type_def_i (CORBA::IDLType_ptr original_type_def)
{
char *original_type =
TAO_IFR_Service_Utils::reference_to_path (original_type_def);
this->repo_->config ()->set_string_value (this->section_key_,
ACE_TEXT("original_type"),
ACE_TEXT_CHAR_TO_TCHAR(original_type));
}
TAO_END_VERSIONED_NAMESPACE_DECL
|
