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
|
//
// $Id$
//
// ============================================================================
//
// = LIBRARY
// TAO IDL
//
// = FILENAME
// ami_handler_operation_ch.cpp
//
// = DESCRIPTION
// Visitor generating code for AMI Handler call back operation in
// the client header.
//
// = AUTHOR
// Aniruddha Gokhale and Alexander Babu Arulanthu
// <alex@cs.wustl.edu>
//
// ============================================================================
#include "idl.h"
#include "idl_extern.h"
#include "be.h"
#include "be_visitor_operation.h"
ACE_RCSID(be_visitor_operation, ami_handler_operation_ch, "$Id$")
// ************************************************************
// Operation visitor for server header
// ************************************************************
be_visitor_operation_ami_handler_operation_ch::be_visitor_operation_ami_handler_operation_ch (be_visitor_context *ctx)
: be_visitor_operation (ctx)
{
}
be_visitor_operation_ami_handler_operation_ch::~be_visitor_operation_ami_handler_operation_ch (void)
{
}
int
be_visitor_operation_ami_handler_operation_ch::visit_operation (be_operation *node)
{
TAO_OutStream *os; // output stream
os = this->ctx_->stream ();
this->ctx_->node (node); // save the node
os->indent (); // start with the current indentation level
// every operation is declared virtual in the client code
*os << "virtual ";
// STEP I: generate the return type. Return type is simpy void.
*os << "void ";
// STEP 2: generate the operation name.
*os << " " << node->local_name ();
// STEP 3: generate the argument list with the appropriate
// mapping. For these we grab a visitor that generates the
// parameter listing.
be_visitor_context ctx (*this->ctx_);
ctx.state (TAO_CodeGen::TAO_AMI_HANDLER_OPERATION_ARGLIST_CH);
be_visitor *visitor = tao_cg->make_visitor (&ctx);
if (!visitor)
{
ACE_ERROR_RETURN ((LM_ERROR,
"be_visitor_operation_ami_handler_operation_ch::"
"visit_operation - "
"Bad visitor to return type\n"),
-1);
}
if (node->accept (visitor) == -1)
{
delete visitor;
ACE_ERROR_RETURN ((LM_ERROR,
"(%N:%l) be_visitor_operation_ami_handler_operation_ch::"
"visit_operation - "
"codegen for argument list failed\n"),
-1);
}
delete visitor;
// Generating the skeleton method.
// Skeleton not necessary for collocated class.
if (this->ctx_->state () == TAO_CodeGen::TAO_COLLOCATED_AMI_HANDLER_OPERATION_CH)
{
return 0;
/* NOT REACHED */
}
// Generate the corresponding static skeleton method for this
// operation only if there was no "native" type.
if (!node->has_native ())
{
// Next line.
*os << be_nl;
// Indent.
os->indent ();
*os << "static void ";
// Check if we are an attribute node in disguise
if (this->ctx_->attribute ())
{
// now check if we are a "get" or "set" operation
if (node->nmembers () == 1) // set
*os << "_set_";
else
*os << "_get_";
}
*os << node->local_name () <<
"_skel (" << be_idt << be_idt_nl;
// Different skeletons for the AMI Handler class and the servant
// class.
switch (this->ctx_->state ())
{
case TAO_CodeGen::TAO_AMI_HANDLER_SERVANT_OPERATION_CH:
*os << "CORBA::ServerRequest &_tao_req, " << be_nl
<< "void *_tao_obj, " << be_nl
<< "void *_tao_context, " << be_nl
<< "CORBA::Environment &ACE_TRY_ENV = " << be_idt_nl
<< "TAO_default_environment ()"
<< be_uidt << be_uidt_nl
<< ");" << be_uidt << "\n\n";
break;
case TAO_CodeGen::TAO_AMI_HANDLER_STUB_OPERATION_CH:
*os << "TAO_InputCDR &_tao_reply_cdr, " << be_nl
<< "Messaging::ReplyHandler_ptr _tao_reply_handler, " << be_nl
<< "CORBA::Environment &ACE_TRY_ENV = " << be_idt_nl
<< "TAO_default_environment ()"
<< be_uidt << be_uidt_nl
<< ");" << be_uidt << "\n\n";
break;
default:
ACE_ERROR_RETURN ((LM_ERROR,
"(%N:%l) be_visitor_operation_ami_handler_operation_ch::"
"visit_operation - "
"Unknown state\n"),
-1);
}
}
return 0;
}
|
