TAO/TAO_IDL/be/be_visitor_interface/facet_svth.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file    facet_svth.cpp
   5  *
   6  *  Visitor generating code for a facet servant class in the
   7  *  servant header.
   8  *
   9  *  @author Jeff Parsons
  10  */
  11 //=============================================================================
  12
  13 #include "interface.h"
  14
  15 be_visitor_facet_svth::be_visitor_facet_svth (be_visitor_context *ctx)
  16   : be_visitor_interface (ctx)
  17 {
  18 }
  19
  20 be_visitor_facet_svth::~be_visitor_facet_svth ()
  21 {
  22 }
  23
  24 int
  25 be_visitor_facet_svth::visit_interface (be_interface *node)
  26 {
  27   if (node->imported () ||
  28       node->svnt_src_facet_gen () ||
  29       idl_global->ami_connector_seen_ ||
  30       node->original_interface () ||
  31       node->is_local ())
  32     {
  33       return 0;
  34     }
  35
  36   const char *lname = node->local_name ();
  37
  38   be_decl *scope =
  39     dynamic_cast<be_scope*> (node->defined_in ())->decl ();
  40   ACE_CString suffix (scope->flat_name ());
  41
  42   if (suffix != "")
  43     {
  44       suffix = ACE_CString ("_") + suffix;
  45     }
  46
  47   os_ << be_nl_2
  48       << "namespace CIAO_FACET" << suffix.c_str () <<  be_nl
  49       << "{" << be_idt_nl;
  50
  51   bool is_intf = node->node_type () == AST_Decl::NT_interface;
  52
  53   os_ << "template <typename BASE, typename EXEC, typename CONTEXT>" << be_nl
  54       << "class " << lname << "_Servant_T" << be_idt_nl
  55       << ": public ::CIAO::Facet_Servant_Base_T<BASE, EXEC, "
  56       << "CONTEXT>" << be_uidt_nl << "{" << be_nl
  57       << "public:" << be_idt_nl;
  58
  59   AST_Decl *s = ScopeAsDecl (node->defined_in ());
  60   ACE_CString sname_str (s->full_name ());
  61
  62   os_ << lname << "_Servant_T (" << be_idt_nl
  63       << "typename EXEC::_ptr_type executor," << be_nl
  64       << "::Components::CCMContext_ptr ctx);" << be_uidt_nl << be_nl;
  65
  66   os_ << "virtual ~" << lname << "_Servant_T ();";
  67
  68   if (is_intf)
  69     {
  70       be_interface *intf =
  71         dynamic_cast<be_interface*> (node);
  72
  73       be_global->in_facet_servant (true);
  74
  75       int status =
  76         intf->traverse_inheritance_graph (
  77           be_interface::op_attr_decl_helper,
  78           &os_);
  79
  80       be_global->in_facet_servant (false);
  81
  82       if (status == -1)
  83         {
  84           ACE_ERROR_RETURN ((LM_ERROR,
  85                              ACE_TEXT ("be_provides::gen_facet - ")
  86                              ACE_TEXT ("traverse_inheritance_graph()")
  87                              ACE_TEXT (" failed\n")),
  88                             -1);
  89         }
  90     }
  91
  92   os_ << be_uidt_nl << "};" << be_nl << be_uidt_nl;
  93
  94   os_ << "}";
  95
  96   node->svnt_hdr_facet_gen (true);
  97   return 0;
  98 }