blob: 477ac4c7d37a60262742c966a4ff7e5613d1fcde (
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
|
//=============================================================================
/**
* @file cdr_op_ch.cpp
*
* Visitor generating code for CDR operators for forward
* declarations of valuetypes. This uses compiled marshaling.
*
* @author Boris Kolpackov <bosk@ipmce.ru> base on code from Torsten Kuepper based on code from Aniruddha Gokhale & Carlos O'Ryan (cdr_op_ci.cpp)
*/
//=============================================================================
#include "valuetype_fwd.h"
be_visitor_valuetype_fwd_cdr_op_ch::be_visitor_valuetype_fwd_cdr_op_ch (
be_visitor_context *ctx
)
: be_visitor_decl (ctx)
{
}
be_visitor_valuetype_fwd_cdr_op_ch::~be_visitor_valuetype_fwd_cdr_op_ch ()
{
}
int
be_visitor_valuetype_fwd_cdr_op_ch::visit_valuetype_fwd (
be_valuetype_fwd *node
)
{
AST_Interface *fd = node->full_definition ();
be_valuetype *bfd = dynamic_cast<be_valuetype*> (fd);
// If this forward declared vt is defined later in the file,
// the CDR operator declaration (along with the corresponding
// declarations for members of the interface's scope) will be
// generated then.
if (fd->is_defined ())
{
return 0;
}
// Check if it's imported vt or CDR ops already generated.
if (node->cli_hdr_cdr_op_gen () || node->imported ())
{
return 0;
}
TAO_OutStream *os = this->ctx_->stream ();
be_valuetype *fvd =
dynamic_cast<be_valuetype*> (node->full_definition ());
if (fvd->gen_helper_header () == -1)
{
ACE_ERROR_RETURN ((LM_ERROR,
"(%N:%l) be_visitor_valuetype_fwd_cdr_op_ch::"
"visit_valuetype_fwd - "
"codegen for helper functions failed\n"),
-1);
}
// generate the CDR << and >> operator declarations (prototypes)
TAO_INSERT_COMMENT (os);
*os << be_global->core_versioning_begin () << be_nl;
*os << be_global->stub_export_macro ()
<< " ::CORBA::Boolean operator<< (TAO_OutputCDR &, const "
<< node->full_name () << " *);" << be_nl;
*os << be_global->stub_export_macro ()
<< " ::CORBA::Boolean operator>> (TAO_InputCDR &, "
<< node->full_name () << " *&);" << be_nl;
*os << be_global->core_versioning_end () << be_nl;
node->cli_hdr_cdr_op_gen (true);
bfd->cli_hdr_cdr_op_gen (true);
return 0;
}
int
be_visitor_valuetype_fwd_cdr_op_ch::visit_eventtype_fwd (be_eventtype_fwd *node)
{
return this->visit_valuetype_fwd (node);
}
|