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
|
/* -*- C++ -*- */
// $Id$
#include "Repository_i.h"
#include "StringDef_i.h"
ACE_RCSID(IFR_Service, StringDef_i, "$Id$")
TAO_StringDef_i::TAO_StringDef_i (TAO_Repository_i *repo,
ACE_Configuration_Section_Key section_key)
: TAO_IRObject_i (repo, section_key),
TAO_IDLType_i (repo, section_key)
{
}
TAO_StringDef_i::~TAO_StringDef_i (void)
{
}
IR::DefinitionKind
TAO_StringDef_i::def_kind (CORBA::Environment &)
ACE_THROW_SPEC ((CORBA::SystemException))
{
return IR::dk_String;
}
void
TAO_StringDef_i::destroy (CORBA::Environment &)
ACE_THROW_SPEC ((CORBA::SystemException))
{
ACE_TString name;
this->repo_->config ()->get_string_value (this->section_key_,
"name",
name);
this->repo_->config ()->remove_section (this->repo_->strings_key (),
name.c_str (),
0);
}
CORBA::TypeCode_ptr
TAO_StringDef_i::type (CORBA::Environment &ACE_TRY_ENV)
ACE_THROW_SPEC ((CORBA::SystemException))
{
CORBA::ULong bound = this->bound (ACE_TRY_ENV);
ACE_CHECK_RETURN (CORBA::TypeCode::_nil ());
return this->repo_->tc_factory ()->create_string_tc (
bound,
ACE_TRY_ENV
);
}
CORBA::ULong
TAO_StringDef_i::bound (CORBA::Environment &)
ACE_THROW_SPEC ((CORBA::SystemException))
{
u_int retval = 0;
this->repo_->config ()->get_integer_value (this->section_key_,
"bound",
retval);
return ACE_static_cast (CORBA::ULong, retval);
}
void
TAO_StringDef_i::bound (CORBA::ULong bound,
CORBA::Environment &)
ACE_THROW_SPEC ((CORBA::SystemException))
{
this->repo_->config ()->set_integer_value (this->section_key_,
"bound",
bound);
}
|