blob: 10db08a89e377f49c78917a391d115a86f519e2c (
plain)
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
|
//=============================================================================
/**
* @file interface_ci.cpp
*
* Visitor generating code for Interfaces in the client inline file
*
* @author Aniruddha Gokhale
*/
//=============================================================================
#include "interface.h"
be_visitor_interface_ci::be_visitor_interface_ci (be_visitor_context *ctx)
: be_visitor_interface (ctx)
{
}
be_visitor_interface_ci::~be_visitor_interface_ci ()
{
}
int
be_visitor_interface_ci::visit_interface (be_interface *node)
{
if (node->imported ())
{
return 0;
}
// Generate inline methods for elements of our scope.
// This will always be done here for any non-imported node,
// whether the _var and _out code has been generated already
// at a forward declaration or not.
if (this->visit_scope (node) == -1)
{
ACE_ERROR_RETURN ((LM_ERROR,
"(%N:%l) be_visitor_interface_ci::"
"visit_interface - "
"codegen for scope failed\n"), -1);
}
// Nothing to generate for a local interface except from it scope.
if (node->is_local ())
{
node->cli_inline_gen (true);
return 0;
}
// A forward declared interface may have set this flag.
if (node->cli_inline_gen ())
{
return 0;
}
TAO_OutStream *os = this->ctx_->stream ();
TAO_INSERT_COMMENT (os);
if (node->is_abstract ())
{
*os << be_nl_2
<< "ACE_INLINE" << be_nl
<< node->name () << "::" << node->local_name ()
<< " ()" << be_nl
<< "{}" << be_nl_2;
*os << "ACE_INLINE" << be_nl
<< node->name () << "::" << node->local_name ()
<< " (const " << node->local_name () << " &rhs)" << be_idt_nl
<< ": ::CORBA::AbstractBase (rhs)" << be_uidt_nl
<< "{}";
}
// Generate the constructor from stub and servant.
node->gen_stub_ctor (os);
if (!node->is_local () && !node->is_abstract ())
{
*os << be_nl_2
<< "ACE_INLINE" << be_nl;
*os << node->name () << "::"
<< node->local_name () << " ("
<< be_idt << be_idt_nl
<< "::IOP::IOR *ior," << be_nl
<< "TAO_ORB_Core *oc)" << be_uidt_nl;
*os << ": ::CORBA::Object (ior, oc)";
*os << be_uidt_nl
<< "{" << be_nl
<< "}" ;
}
node->cli_inline_gen (true);
return 0;
}
int
be_visitor_interface_ci::visit_component (be_component *node)
{
return this->visit_interface (node);
}
int
be_visitor_interface_ci::visit_connector (be_connector *node)
{
return this->visit_interface (node);
}
|
