summaryrefslogtreecommitdiff
path: root/TAO/TAO_IDL/be/be_visitor_sequence/gen_bounded_sequence_cs.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/TAO_IDL/be/be_visitor_sequence/gen_bounded_sequence_cs.cpp')
-rw-r--r--TAO/TAO_IDL/be/be_visitor_sequence/gen_bounded_sequence_cs.cpp130
1 files changed, 0 insertions, 130 deletions
diff --git a/TAO/TAO_IDL/be/be_visitor_sequence/gen_bounded_sequence_cs.cpp b/TAO/TAO_IDL/be/be_visitor_sequence/gen_bounded_sequence_cs.cpp
deleted file mode 100644
index 005b454c57f..00000000000
--- a/TAO/TAO_IDL/be/be_visitor_sequence/gen_bounded_sequence_cs.cpp
+++ /dev/null
@@ -1,130 +0,0 @@
-// $Id$
-
-// ============================================================================
-//
-// = LIBRARY
-// TAO IDL
-//
-// = FILENAME
-// gen_bounded_sequence_cs.cpp
-//
-// = DESCRIPTION
-// Visitor generating code for Sequence in the client inline
-//
-// = AUTHOR
-// Michael Kircher
-//
-// Modifications by Aniruddha Gokhale
-//
-// ============================================================================
-
-//#include "idl.h"
-//#include "idl_extern.h"
-#include "be.h"
-
-#include "be_visitor_sequence.h"
-
-ACE_RCSID(be_visitor_sequence, gen_bounded_sequence_cs, "$Id$")
-
-
-int
-be_visitor_sequence_cs::gen_bounded_sequence (be_sequence *node)
-{
- TAO_OutStream *os = this->ctx_->stream ();
- be_type *bt;
-
- // retrieve the base type since we may need to do some code
- // generation for the base type.
- bt = be_type::narrow_from_decl (node->base_type ());
- if (!bt)
- {
- ACE_ERROR_RETURN ((LM_ERROR,
- "(%N:%l) be_visitor_sequence_cs::"
- "visit_sequence - "
- "Bad element type\n"), -1);
- }
-
- // generate the class name
- be_type *pt; // base types
-
- if (bt->node_type () == AST_Decl::NT_typedef)
- {
- // get the primitive base type of this typedef node
- be_typedef *t = be_typedef::narrow_from_decl (bt);
- pt = t->primitive_base_type ();
- }
- else
- pt = bt;
-
- const char * class_name = node->instance_name ();
-
- static char full_class_name [NAMEBUFSIZE];
- ACE_OS::memset (full_class_name, '\0', NAMEBUFSIZE);
-
- if (node->is_nested ())
- {
- ACE_OS::sprintf (full_class_name, "%s::%s",
- be_scope::narrow_from_scope (node->defined_in ())->decl ()->fullname (),
- class_name);
- }
- else
- {
- ACE_OS::sprintf (full_class_name, "%s",
- class_name);
- }
-
-
- be_visitor_context ctx (*this->ctx_);
- ctx.state (TAO_CodeGen::TAO_SEQUENCE_BASE_CS);
- be_visitor *visitor = tao_cg->make_visitor (&ctx);
-
- // !! branching in either compile time template instantiation
- // or manual template instatiation
- os->gen_ifdef_AHETI();
-
- os->gen_ifdef_macro (class_name);
-
- os->indent ();
-
- // allocate_buffer
- *os << "void " << be_nl
- << full_class_name << "::_allocate_buffer (CORBA::ULong length)" << be_nl
- << "// allocate a buffer of the requested length. The buffer is allocated for the" << be_nl
- << "// right type" << be_nl
- << "{" << be_idt_nl
- << "this->buffer_ = " << full_class_name << "::allocbuf ("
- << node->max_size () << ");" << be_uidt_nl
- << "}" << be_nl
- << be_nl;
-
- // deallocate_buffer
- *os << "void " << be_nl
- << full_class_name << "::_deallocate_buffer (void)" << be_nl
- << "// deallocate the buffer" << be_nl
- << "{" << be_idt_nl
- << "if (this->buffer_ == 0 || this->release_ == 0)" << be_idt_nl
- << "return;" << be_uidt_nl;
- pt->accept(visitor);
- *os <<" *tmp = ACE_reinterpret_cast (";
- pt->accept (visitor);
- *os << " *, this->buffer_);" << be_nl
- << full_class_name << "::freebuf (tmp);" << be_nl
- << "this->buffer_ = 0;" << be_uidt_nl
- << "}" << be_nl
- << be_nl;
-
- // destructor
- *os << full_class_name << "::~" << class_name << " (void) // Dtor." << be_nl
- << "{" << be_idt_nl
- << "this->_deallocate_buffer ();" << be_uidt_nl
- << "}" << be_nl
- << be_nl;
-
- os->gen_endif (); // endif macro
-
- // generate #endif for AHETI
- os->gen_endif_AHETI();
-
- delete visitor;
- return 0;
-}