TAO/TAO_IDL/be/be_visitor_root/root_sh.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file    root_sh.cpp
   5  *
   6  *  Visitor generating code for Root in the server header
   7  *
   8  *  @author Aniruddha Gokhale
   9  */
  10 //=============================================================================
  11
  12 #include "root.h"
  13
  14 be_visitor_root_sh::be_visitor_root_sh (be_visitor_context *ctx)
  15   : be_visitor_root (ctx)
  16 {
  17 }
  18
  19 be_visitor_root_sh::~be_visitor_root_sh ()
  20 {
  21 }
  22
  23 int
  24 be_visitor_root_sh::visit_root (be_root *node)
  25 {
  26   if (this->init () == -1)
  27     {
  28       ACE_ERROR_RETURN ((LM_ERROR,
  29                          ACE_TEXT ("be_visitor_root_sh::init - ")
  30                          ACE_TEXT ("failed to initialize\n")),
  31                         -1);
  32     }
  33
  34   if (be_global->gen_arg_traits ())
  35     {
  36       if (this->gen_arg_traits (node) == -1)
  37         {
  38           /// Error message already output.
  39           return -1;
  40         }
  41     }
  42
  43   /// The SI and SS cases are caught in BE_produce(). We
  44   /// want to generate an empty skeleton header file, which
  45   /// has been done, so -SS can flag a skip of the scope
  46   /// traversal, but we want to generate the skeleton
  47   /// end-of-header file stuff, so we don't bail completely.
  48   if (be_global->gen_skel_files ())
  49     {
  50       if (this->visit_scope (node) == -1)
  51         {
  52           ACE_ERROR_RETURN ((LM_ERROR,
  53                              ACE_TEXT ("be_visitor_root_sh::visit_root - ")
  54                              ACE_TEXT ("codegen for scope failed\n")),
  55                             -1);
  56         }
  57     }
  58
  59   (void) tao_cg->end_server_header ();
  60
  61   return 0;
  62 }
  63
  64 int
  65 be_visitor_root_sh::init ()
  66 {
  67   /// First open the server-side file for writing
  68   int status =
  69     tao_cg->start_server_header (
  70       be_global->be_get_server_hdr_fname ());
  71
  72   if (status == -1)
  73     {
  74       ACE_ERROR_RETURN ((LM_ERROR,
  75                          ACE_TEXT ("be_visitor_root_sh::init - ")
  76                          ACE_TEXT ("Error opening server header file\n")),
  77                         -1);
  78     }
  79
  80   /// Initialize the stream.
  81   this->ctx_->stream (tao_cg->server_header ());
  82   return 0;
  83 }
  84
  85 int
  86 be_visitor_root_sh::gen_arg_traits (be_root *node)
  87 {
  88   be_visitor_context ctx = *this->ctx_;
  89   be_visitor_arg_traits arg_visitor ("S", &ctx);
  90   int status = node->accept (&arg_visitor);
  91
  92   if (status == -1)
  93     {
  94       ACE_ERROR_RETURN ((LM_ERROR,
  95                          ACE_TEXT ("be_visitor_root_sh::")
  96                          ACE_TEXT ("gen_arg_traits - failed to ")
  97                          ACE_TEXT ("generate skeleton arg traits\n")),
  98                         -1);
  99     }
 100
 101   return 0;
 102 }
 103