TAO/TAO_IDL/be/be_visitor_enum/enum_ch.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file    enum_ch.cpp
   5  *
   6  *  Visitor generating code for Enums in the client header
   7  *
   8  *  @author Aniruddha Gokhale
   9  */
  10 //=============================================================================
  11
  12 #include "enum.h"
  13 #include "be_visitor_typecode/typecode_decl.h"
  14
  15 // ********************************************************************
  16 // Visitor implementation for the Enum type
  17 // This one for the client header file
  18 // ********************************************************************
  19
  20 be_visitor_enum_ch::be_visitor_enum_ch (be_visitor_context *ctx)
  21   : be_visitor_scope (ctx)
  22 {
  23 }
  24
  25 // Visit the enum_ch node and its scope.
  26 int
  27 be_visitor_enum_ch::visit_enum (be_enum *node)
  28 {
  29   if (node->cli_hdr_gen () || node->imported ())
  30     {
  31       return 0;
  32     }
  33
  34   TAO_OutStream *os = this->ctx_->stream ();
  35
  36   // Comma to be generated by the scope visitor.
  37   this->ctx_->comma (true);
  38
  39   TAO_INSERT_COMMENT (os);
  40
  41   *os << "enum " << node->local_name () << be_nl;
  42   *os << "{" << be_idt_nl;
  43
  44    if (this->visit_scope (node) == 1)
  45      {
  46        ACE_ERROR_RETURN ((LM_ERROR,
  47                           ACE_TEXT ("be_visitor_enum_ch::")
  48                           ACE_TEXT ("visit_enum - ")
  49                           ACE_TEXT ("scope generation failed\n")),
  50                          -1);
  51      }
  52
  53   *os << be_uidt_nl;
  54   *os << "};" << be_nl_2;
  55
  56   // As per the ORBOS spec, we need the following typedef
  57   *os << "typedef " << node->local_name () << " &" << node->local_name ()
  58       << "_out;";
  59
  60   if (be_global->tc_support ())
  61     {
  62       be_visitor_context ctx (*this->ctx_);
  63       be_visitor_typecode_decl visitor (&ctx);
  64
  65       if (node->accept (&visitor) == -1)
  66         {
  67           ACE_ERROR_RETURN ((LM_ERROR,
  68                               ACE_TEXT ("be_visitor_enum_ch::")
  69                               ACE_TEXT ("visit_enum - ")
  70                               ACE_TEXT ("TypeCode declaration failed\n" )),
  71                              -1);
  72         }
  73     }
  74
  75   node->cli_hdr_gen (true);
  76   return 0;
  77 }
  78
  79 int
  80 be_visitor_enum_ch::post_process (be_decl *bd)
  81 {
  82   TAO_OutStream *os = this->ctx_->stream ();
  83
  84   // Am I the last one?
  85   if (!this->last_node (bd))
  86     {
  87       *os << "," << be_nl;
  88     }
  89
  90   return 0;
  91 }
  92
  93 int
  94 be_visitor_enum_ch::visit_enum_val (be_enum_val *node)
  95 {
  96   TAO_OutStream *os = this->ctx_->stream ();
  97
  98   *os << node->local_name ();
  99
 100   return 0;
 101 }