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
|
//
// $Id$
//
// ============================================================================
//
// = LIBRARY
// TAO IDL
//
// = FILENAME
// any_op_cs.cpp
//
// = DESCRIPTION
// Visitor for code generation of Arrays for the Any operators in the client
// stubs.
//
// = AUTHOR
// Aniruddha Gokhale
//
// ============================================================================
ACE_RCSID (be_visitor_array,
any_op_cs,
"$Id$")
// ***************************************************************************
// Array visitor for generating Any operator declarations in the client
// stubs file
// ***************************************************************************
be_visitor_array_any_op_cs::be_visitor_array_any_op_cs (
be_visitor_context *ctx
)
: be_visitor_decl (ctx)
{
}
be_visitor_array_any_op_cs::~be_visitor_array_any_op_cs (void)
{
}
int
be_visitor_array_any_op_cs::visit_array (be_array *node)
{
if (node->cli_stub_any_op_gen () || node->imported ())
{
return 0;
}
TAO_OutStream *os = this->ctx_->stream ();
*os << be_nl << be_nl
<< "// TAO_IDL - Generated from " << be_nl
<< "// " << __FILE__ << ":" << __LINE__ << be_nl << be_nl;
// Since we don't generate CDR stream operators for types that
// explicitly contain a local interface (at some level), we
// must override these Any template class methods to avoid
// calling the non-existent operators. The zero return value
// will eventually cause CORBA::MARSHAL to be raised if this
// type is inserted into an Any and then marshaled.
if (node->is_local ())
{
*os << be_nl << be_nl
<< "ACE_TEMPLATE_SPECIALIZATION" << be_nl
<< "CORBA::Boolean" << be_nl
<< "TAO::Any_Array_Impl_T<" << be_idt << be_idt_nl
<< node->name () << "_slice," << be_nl
<< node->name () << "_forany" << be_uidt_nl
<< ">::marshal_value (TAO_OutputCDR &)" << be_uidt_nl
<< "{" << be_idt_nl
<< "return false;" << be_uidt_nl
<< "}";
*os << be_nl << be_nl
<< "ACE_TEMPLATE_SPECIALIZATION" << be_nl
<< "CORBA::Boolean" << be_nl
<< "TAO::Any_Array_Impl_T<" << be_idt << be_idt_nl
<< node->name () << "_slice," << be_nl
<< node->name () << "_forany" << be_uidt_nl
<< ">::demarshal_value (TAO_OutputCDR &)" << be_uidt_nl
<< "{" << be_idt_nl
<< "return false;" << be_uidt_nl
<< "}";
}
*os << "void operator<<= (" << be_idt << be_idt_nl
<< "CORBA::Any &_tao_any," << be_nl
<< "const " << node->name () << "_forany &_tao_elem" << be_uidt_nl
<< ")" << be_uidt_nl
<< "{" << be_idt_nl
<< "TAO::Any_Array_Impl_T<" << be_idt << be_idt_nl
<< node->name () << "_slice," << be_nl
<< node->name () << "_forany" << be_uidt_nl
<< ">::insert ("
<< be_idt << be_idt_nl
<< "_tao_any," << be_nl
<< node->name () << "_forany::_tao_any_destructor," << be_nl
<< node->tc_name () << "," << be_nl
<< "_tao_elem.nocopy ()" << be_idt_nl
<< "? _tao_elem.ptr ()" << be_nl
<< ": "
<< node->name () << "_dup (_tao_elem.in ())" << be_uidt << be_uidt_nl
<< ");" << be_uidt << be_uidt << be_uidt_nl
<< "}" << be_nl << be_nl;
*os << "CORBA::Boolean operator>>= (" << be_idt << be_idt_nl
<< "const CORBA::Any &_tao_any," << be_nl
<< node->name () << "_forany &_tao_elem" << be_uidt_nl
<< ")" << be_uidt_nl
<< "{" << be_idt_nl
<< "return" << be_idt_nl
<< "TAO::Any_Array_Impl_T<" << be_idt << be_idt_nl
<< node->name () << "_slice," << be_nl
<< node->name () << "_forany" << be_uidt_nl
<< ">::extract (" << be_idt << be_idt_nl
<< "_tao_any," << be_nl
<< node->name () << "_forany::_tao_any_destructor," << be_nl
<< node->tc_name () << "," << be_nl
<< "_tao_elem.out ()" << be_uidt_nl
<< ");" << be_uidt << be_uidt << be_uidt << be_uidt_nl
<< "}";
node->cli_stub_any_op_gen (1);
return 0;
}
|
