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
|
// $Id$
// ============================================================================
//
// = LIBRARY
// TAO/tests/Param_Test
//
// = FILENAME
// short.cpp
//
// = DESCRIPTION
// tests shorts
//
// = AUTHORS
// Aniruddha Gokhale
//
// ============================================================================
#include "helper.h"
#include "short.h"
// ************************************************************************
// Test_Short
// ************************************************************************
Test_Short::Test_Short (void)
: opname_ (CORBA::string_dup ("test_short"))
{
}
Test_Short::~Test_Short (void)
{
CORBA::string_free (this->opname_);
this->opname_ = 0;
}
const char *
Test_Short::opname (void) const
{
return this->opname_;
}
int
Test_Short::init_parameters (Param_Test_ptr objref,
CORBA::Environment &env)
{
Generator *gen = GENERATOR::instance (); // value generator
ACE_UNUSED_ARG (objref);
ACE_UNUSED_ARG (env);
this->in_ = gen->gen_short ();
this->inout_ = 0;
return 0;
}
int
Test_Short::reset_parameters (void)
{
this->inout_ = 0;
this->out_ = 0;
this->ret_ = 0;
return 0;
}
int
Test_Short::run_sii_test (Param_Test_ptr objref,
CORBA::Environment &env)
{
this->ret_ = objref->test_short (this->in_, this->inout_, this->out_, env);
return (env.exception () ? -1:0);
}
int
Test_Short::add_args (CORBA::NVList_ptr ¶m_list,
CORBA::NVList_ptr &retval,
CORBA::Environment &env)
{
// we provide top level memory to the ORB to retrieve the data
CORBA::Any in_arg (CORBA::_tc_short, &this->in_, 0);
CORBA::Any inout_arg (CORBA::_tc_short, &this->inout_, 0);
CORBA::Any out_arg (CORBA::_tc_short, &this->out_, 0);
// add parameters
(void)param_list->add_value ("s1", in_arg, CORBA::ARG_IN, env);
(void)param_list->add_value ("s2", inout_arg, CORBA::ARG_INOUT, env);
(void)param_list->add_value ("s3", out_arg, CORBA::ARG_OUT, env);
// add return value. Let the ORB allocate storage. We simply tell the ORB
// what type we are expecting.
(void)retval->item (0, env)->value ()->replace (CORBA::_tc_short,
0, // no value
0, // does not own
env);
return 0;
}
CORBA::Boolean
Test_Short::check_validity (void)
{
if (this->inout_ == this->in_*2 &&
this->out_ == this->in_*3 &&
this->ret_ == this->in_*4)
return 1; // success
else
return 0;
}
CORBA::Boolean
Test_Short::check_validity (CORBA::Request_ptr req)
{
CORBA::Environment env;
#if 0
// commented out since we really don't need to this as we have provided the
// ORB with the memory
*req->arguments ()->item (1, env)->value () >>= this->inout_;
*req->arguments ()->item (2, env)->value () >>= this->out_;
#endif
// we must retrieve the return value since we aske dthe ORB to allocate the
// memory.
*req->result ()->value () >>= this->ret_;
return this->check_validity ();
}
void
Test_Short::print_values (void)
{
ACE_DEBUG ((LM_DEBUG,
"\n=*=*=*=*=*=*\n"
"in = %d, "
"inout = %d, "
"out = %d, "
"ret = %d\n"
"\n=*=*=*=*=*=*\n",
this->in_,
this->inout_,
this->out_,
this->ret_));
}
|
