summaryrefslogtreecommitdiff
path: root/TAO/TAO_IDL
diff options
context:
space:
mode:
authorparsons <parsons@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2001-05-25 15:57:35 +0000
committerparsons <parsons@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2001-05-25 15:57:35 +0000
commitb8b9ba148950ec64e15df81daa0af00d4e18df83 (patch)
treea2db6dcfc11c4da3dacdc458787d115e180691a1 /TAO/TAO_IDL
parent1fb7156aa34dbd938b851791717d4d95230da5b8 (diff)
downloadATCD-b8b9ba148950ec64e15df81daa0af00d4e18df83.tar.gz
ChangeLogTag: Fri May 25 10:52:30 2001 Jeff Parsons <parsons@cs.wustl.edu>
Diffstat (limited to 'TAO/TAO_IDL')
-rw-r--r--TAO/TAO_IDL/be/be_visitor_operation/ami_arglist.cpp197
-rw-r--r--TAO/TAO_IDL/be/be_visitor_operation/ami_exception_holder_operation_ch.cpp95
-rw-r--r--TAO/TAO_IDL/be_include/be_visitor_interface/collocated_ami_handler_ch.h42
-rw-r--r--TAO/TAO_IDL/be_include/be_visitor_operation/ami_exception_holder_operation_ch.h51
4 files changed, 0 insertions, 385 deletions
diff --git a/TAO/TAO_IDL/be/be_visitor_operation/ami_arglist.cpp b/TAO/TAO_IDL/be/be_visitor_operation/ami_arglist.cpp
deleted file mode 100644
index ab945a32a60..00000000000
--- a/TAO/TAO_IDL/be/be_visitor_operation/ami_arglist.cpp
+++ /dev/null
@@ -1,197 +0,0 @@
-//
-// $Id$
-//
-
-// ============================================================================
-//
-// = LIBRARY
-// TAO IDL
-//
-// = FILENAME
-// ami_arglist.cpp
-//
-// = DESCRIPTION
-// Visitor generating code for the parameter list of the Operation signature.
-//
-// = AUTHOR
-// 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_arglist, "$Id$")
-
-
-// ************************************************************
-// operation visitor to generate the argument list for the AMI
-// stub.
-// We have separated code generation for this from the 4 main
-// visitors to avoid code duplication and tight coupling
- // ************************************************************
-
-be_visitor_operation_ami_arglist::be_visitor_operation_ami_arglist (be_visitor_context
- *ctx)
- : be_visitor_scope (ctx)
-{
-}
-
-be_visitor_operation_ami_arglist::~be_visitor_operation_ami_arglist (void)
-{
-}
-
-int
-be_visitor_operation_ami_arglist::visit_operation (be_operation *node)
-{
- TAO_OutStream *os = this->ctx_->stream ();
-
- *os << " (" << be_idt << be_idt << "\n";
-
-
- // Start with current indentation level.
- os->indent ();
-
-
- be_decl *interface =
- be_interface::narrow_from_scope (node->defined_in ())->decl ();
- if (interface == 0)
- cerr << "Invalid interface";
-
- // @@ Michael: This is not very nice, but we do not have
- // a be_interface pointer and therefor no strategy.
- {
- char *full_name = 0;
-
- interface->compute_full_name ("AMI_",
- "Handler",
- full_name);
- // Genereate scope name.
- // AMI Handler argument.
- *os << full_name
- << "_ptr "
- << "_tao_ami_handler"
- << ",\n";
-
- delete full_name;
- }
-
-
- // all we do is hand over code generation to our scope
- if (this->visit_scope (node) == -1)
- {
- ACE_ERROR_RETURN ((LM_ERROR,
- "(%N:%l) be_visitor_operation_ami_arglist::"
- "visit_operation - "
- "codegen for scope failed\n"),
- -1);
- }
-
- // Last argument - is always CORBA::Environment.
-
- os->indent ();
-
- *os << "CORBA::Environment &ACE_TRY_ENV";
-
- if (this->ctx_->state () == TAO_CodeGen::TAO_AMI_OPERATION_ARGLIST_CH)
- {
- *os << " = " << be_idt_nl
- << "TAO_default_environment ()"
- << be_uidt;
- }
-
- // Done with the argument list.
- *os << be_uidt_nl << ")" << be_uidt;
-
- if (this->ctx_->state () == TAO_CodeGen::TAO_AMI_OPERATION_ARGLIST_CH)
- *os << ";";
-
- *os << "\n";
-
- return 0;
-}
-
-int
-be_visitor_operation_ami_arglist::visit_argument (be_argument *node)
-{
- // Get the visitor that will dump the argument's mapping in the operation
- // signature.
- be_visitor_context ctx (*this->ctx_);
-
- // First grab the interface definition inside which this operation is
- // defined. We need this since argument types may very well be declared
- // inside the scope of the interface node. In such cases, we would like to
- // generate the appropriate relative scoped names.
- be_operation *op = this->ctx_->be_scope_as_operation ();
- if (!op)
- {
- ACE_ERROR_RETURN ((LM_ERROR,
- "(%N:%l) be_visitor_ami_arglist::"
- "visit_argument - "
- "Bad operation\n"),
- -1);
- }
-
- // We need the interface node in which this operation was defined. However,
- // if this operation node was an attribute node in disguise, we get this
- // information from the context
- be_interface *intf;
- intf = this->ctx_->attribute ()
- ? be_interface::narrow_from_scope (this->ctx_->attribute ()->defined_in ())
- : be_interface::narrow_from_scope (op->defined_in ());
-
- if (!intf)
- {
- ACE_ERROR_RETURN ((LM_ERROR,
- "(%N:%l) be_visitor_ami_arglist::"
- "visit_argument - "
- "Bad interface\n"),
- -1);
- }
- ctx.scope (intf); // set new scope
-
- switch (this->ctx_->state ())
- {
- case TAO_CodeGen::TAO_AMI_OPERATION_ARGLIST_CH:
- ctx.state (TAO_CodeGen::TAO_AMI_ARGUMENT_ARGLIST_CH);
- break;
-
- case TAO_CodeGen::TAO_AMI_OPERATION_ARGLIST_CS:
- ctx.state (TAO_CodeGen::TAO_AMI_ARGUMENT_ARGLIST_CS);
- break;
-
- default:
- {
- ACE_ERROR_RETURN ((LM_ERROR,
- "(%N:%l) be_visitor_ami_arglist::"
- "visit_argument - "
- "Bad context\n"),
- -1);
- }
- }
-
- // grab a visitor
- be_visitor *visitor = tao_cg->make_visitor (&ctx);
- if (!visitor)
- {
- ACE_ERROR_RETURN ((LM_ERROR,
- "(%N:%l) be_visitor_ami_arglist::"
- "visit_argument - "
- "Bad visitor\n"),
- -1);
- }
- if (node->accept (visitor) == -1)
- {
- delete visitor;
- ACE_ERROR_RETURN ((LM_ERROR,
- "(%N:%l) be_visitor_ami_arglist::"
- "visit_argument - "
- "codegen for ami_arglist failed\n"),
- -1);
- }
- delete visitor;
- return 0;
-}
diff --git a/TAO/TAO_IDL/be/be_visitor_operation/ami_exception_holder_operation_ch.cpp b/TAO/TAO_IDL/be/be_visitor_operation/ami_exception_holder_operation_ch.cpp
deleted file mode 100644
index 00aab1e66cb..00000000000
--- a/TAO/TAO_IDL/be/be_visitor_operation/ami_exception_holder_operation_ch.cpp
+++ /dev/null
@@ -1,95 +0,0 @@
-//
-// $Id$
-//
-
-// ============================================================================
-//
-// = LIBRARY
-// TAO IDL
-//
-// = FILENAME
-// ami_exception_holder_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_exception_holder_operation_ch, "$Id$")
-
-
-// ************************************************************
-// Operation visitor for server header
-// ************************************************************
-
-be_visitor_operation_ami_exception_holder_operation_ch::be_visitor_operation_ami_exception_holder_operation_ch (be_visitor_context *ctx)
- : be_visitor_operation (ctx)
-{
-}
-
-be_visitor_operation_ami_exception_holder_operation_ch::~be_visitor_operation_ami_exception_holder_operation_ch (void)
-{
-}
-
-int
-be_visitor_operation_ami_exception_holder_operation_ch::visit_operation (be_operation *node)
-{
- TAO_OutStream *os = this->ctx_->stream ();
- this->ctx_->node (node);
-
- // Every operation is declared virtual in the client code.
- *os << be_idt << "virtual ";
-
- // STEP I: Generate the return type. Return type is simpy void.
- *os << "void raise_";
-
- // 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)
- *os << "set_";
- else
- *os << "get_";
- }
-
- // Generate the operation name.
- *os << node->local_name ()
- << " (";
-
- if (!idl_global->exception_support ())
- {
- *os << "CORBA::Environment &ACE_TRY_ENV =" << be_idt << be_idt_nl
- << "TAO_default_environment ()" << be_uidt << be_uidt_nl
- << ")";
- }
- else
- {
- *os << ")";
- }
-
- // Now generate the throw specs.
- if (this->gen_throw_spec (node) == -1)
- {
- ACE_ERROR_RETURN ((LM_ERROR,
- ACE_TEXT ("(%N:%l) be_visitor_operation_ami_exception_holder_operation_ch")
- ACE_TEXT ("::visit_operation - ")
- ACE_TEXT ("Failed to generate throw spec\n")),
- -1);
- }
-
- *os << be_uidt << be_uidt_nl;
-
- return 0;
-}
diff --git a/TAO/TAO_IDL/be_include/be_visitor_interface/collocated_ami_handler_ch.h b/TAO/TAO_IDL/be_include/be_visitor_interface/collocated_ami_handler_ch.h
deleted file mode 100644
index d20938a046c..00000000000
--- a/TAO/TAO_IDL/be_include/be_visitor_interface/collocated_ami_handler_ch.h
+++ /dev/null
@@ -1,42 +0,0 @@
-//
-// $Id$
-//
-/* -*- c++ -*- */
-// ============================================================================
-//
-// = LIBRARY
-// TAO IDL
-//
-// = FILENAME
-// collocated_ami_handler_ch.h
-//
-// = DESCRIPTION
-// Concrete visitor for the Interface node.
-// This provides code generation for collocated classes in server header
-//
-// = AUTHOR
-// Aniruddha Gokhale
-//
-// ============================================================================
-
-#ifndef _BE_INTERFACE_COLLOCATED_AMI_HANDLER_CH_H_
-#define _BE_INTERFACE_COLLOCATED_AMI_HANDLER_CH_H_
-
-class be_visitor_interface_collocated_ami_handler_ch : public be_visitor_interface
-{
- // = TITLE
- // Generate the "collocated" class declaration.
-
-public:
- be_visitor_interface_collocated_ami_handler_ch (be_visitor_context *ctx);
- // constructor
-
- virtual ~be_visitor_interface_collocated_ami_handler_ch (void);
- // destructor
-
- virtual int visit_interface (be_interface *node);
- // visit an interface
-
-};
-
-#endif /* _BE_INTERFACE_COLLOCATED_AMI_HANDLER_CH_H_ */
diff --git a/TAO/TAO_IDL/be_include/be_visitor_operation/ami_exception_holder_operation_ch.h b/TAO/TAO_IDL/be_include/be_visitor_operation/ami_exception_holder_operation_ch.h
deleted file mode 100644
index 04591cfc540..00000000000
--- a/TAO/TAO_IDL/be_include/be_visitor_operation/ami_exception_holder_operation_ch.h
+++ /dev/null
@@ -1,51 +0,0 @@
-//
-// $Id$
-//
-
-// ============================================================================
-//
-// = LIBRARY
-// TAO IDL
-//
-// = FILENAME
-// ami_exception_holder_operation_ch.h
-//
-// = DESCRIPTION
-// Visitor for generating code for AMI Handler call back operations
-// in client header.
-//
-// = AUTHOR
-// Michael Kircher <Michael.Kircher@mchp.siemens.de>
-//
-// ============================================================================
-
-#ifndef _BE_VISITOR_OPERATION_AMI_EXCEPTION_HOLDER_OPERATION_CH_H_
-#define _BE_VISITOR_OPERATION_AMI_EXCEPTION_HOLDER_OPERATION_CH_H_
-
-// ************************************************************
-// Operation visitor for server header
-// ************************************************************
-
-class be_visitor_operation_ami_exception_holder_operation_ch : public be_visitor_operation
-{
- //
- // = TITLE
- // be_visitor_ami_exception_holder_operation_ch
- //
- // = DESCRIPTION
- // This is a concrete visitor to generate the server header for operation
- //
- //
-public:
- be_visitor_operation_ami_exception_holder_operation_ch (be_visitor_context *ctx);
- // constructor
-
- ~be_visitor_operation_ami_exception_holder_operation_ch (void);
- // destructor
-
- virtual int visit_operation (be_operation *node);
- // visit operation.
-
-};
-
-#endif /* _BE_VISITOR_OPERATION_AMI_EXCEPTION_HOLDER_OPERATION_CH_H_ */