be_produce.cpp File Reference

#include "global_extern.h"
#include "be_extern.h"
#include "dds_visitor.h"
#include "ast_root.h"
#include "utl_string.h"
#include "ace/OS_NS_strings.h"
#include "ace/OS_NS_sys_time.h"
#include "ace/OS_NS_unistd.h"
#include "../Version.h"
#include "ace/Version.h"
#include <iostream>
#include <fstream>
#include <sstream>
#include <string>
#include <limits>
#include <cassert>

Include dependency graph for be_produce.cpp:

Go to the source code of this file.

Functions
void	BE_cleanup ()
void	BE_abort ()
void	BE_produce ()

---

Function Documentation

void BE_abort

(

void

)

Definition at line 101 of file be_produce.cpp.

References ACE_TEXT(), BE_cleanup(), ACE_OS::exit(), and LM_ERROR.

Referenced by BE_produce().

{
  ACE_ERROR((LM_ERROR, ACE_TEXT("Fatal Error - Aborting\n")));
  BE_cleanup();
  ACE_OS::exit(1);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void BE_cleanup

(

void

)

Definition at line 94 of file be_produce.cpp.

Referenced by BE_abort(), and BE_produce().

{
  idl_global->destroy();
}

Here is the caller graph for this function:

void BE_produce

(

void

)

Definition at line 284 of file be_produce.cpp.

References ACE_TEXT(), BE_abort(), BE_cleanup(), be_global, ACE_String_Base< ACE_CHAR_T >::c_str(), ACE_String_Base< ACE_CHAR_T >::length(), LM_ERROR, LM_WARNING, ACE_OS::strcasecmp(), and strncmp().

{
  //search for #includes in the IDL, add them as #includes in the stubs/skels
  const char* idl_fn = idl_global->main_filename()->get_string();

  const BE_GlobalData::stream_enum_t out_stream =
    be_global->language_mapping() == BE_GlobalData::LANGMAP_NONE
    ? BE_GlobalData::STREAM_H : BE_GlobalData::STREAM_LANG_H;

  ifstream idl(idl_fn);
  const size_t buffer_sz = 512;
  char buffer[buffer_sz];

  while (idl) {
    idl.getline(buffer, buffer_sz);

    if (0 == strncmp("#include", buffer, 8)) { //FUTURE: account for comments?
      string inc(buffer + 8);
      size_t delim1 = inc.find_first_of("<\"");
      size_t delim2 = inc.find_first_of(">\"", delim1 + 1);
      string included(inc, delim1 + 1, delim2 - delim1 - 1);
      size_t len = included.size();
      string base_name;

      if (len >= 5 &&
          0 == ACE_OS::strcasecmp(included.c_str() + len - 4, ".idl")) {
        base_name.assign(included.c_str(), len - 4);

      } else if (len >= 6 &&
                 0 == ACE_OS::strcasecmp(included.c_str() + len - 5, ".pidl")) {
        base_name.assign(included.c_str(), len - 5);

      } else {
        ACE_ERROR((LM_ERROR, ACE_TEXT("(%N:%l) BE_produce - included ")
                   ACE_TEXT("file must end in .idl or .pidl\n")));
        BE_abort();
      }

      string stb_inc = base_name + "C.h";
      if (stb_inc != "tao/orbC.h") {
        be_global->add_include(stb_inc.c_str(), out_stream);
        if (stb_inc == "orbC.h" ||
            (stb_inc.size() >= 7
            && stb_inc.substr(stb_inc.size() - 7) == "/orbC.h") ) {
          ACE_DEBUG((LM_WARNING,
                     ACE_TEXT("Warning: (%s) Potential inclusion of TAO orbC.H ")
                     ACE_TEXT(" Include TAO orb.idl with path of tao/orb.idl")
                     ACE_TEXT(" to prevent compilation errors\n"), idl_fn));
        }
      }

    }
  }

  idl.close();

  be_global->open_streams(idl_fn);

  AST_Decl* d = idl_global->root();
  AST_Root* root = AST_Root::narrow_from_decl(d);

  if (root == 0) {
    ACE_ERROR((LM_ERROR,
               ACE_TEXT("(%N:%l) BE_produce - ")
               ACE_TEXT("No Root\n")));

    BE_abort();
  }

  be_global->set_inc_paths(idl_global->idl_flags());

  const bool java_ts_only = be_global->java_arg().length() > 0;

  dds_visitor visitor(d, java_ts_only);

  if (root->ast_accept(&visitor) == -1) {
    ACE_ERROR((LM_ERROR,
               ACE_TEXT("(%N:%l) BE_produce -")
               ACE_TEXT(" failed to accept adding visitor\n")));
    BE_abort();
  }

  if (!java_ts_only) {
    postprocess(be_global->header_name_.c_str(),
                be_global->header_, BE_GlobalData::STREAM_H);
    if (!be_global->suppress_idl()) {
      postprocess(be_global->idl_name_.c_str(),
                  be_global->idl_, BE_GlobalData::STREAM_IDL);
    }
  }

  postprocess(be_global->impl_name_.c_str(),
              be_global->impl_, BE_GlobalData::STREAM_CPP);

  if (be_global->generate_wireshark()) {
    postprocess(be_global->ws_config_name_.c_str(),
                be_global->ws_config_, BE_GlobalData::STREAM_WS);
  }

  if (be_global->generate_itl()) {
    if (!BE_GlobalData::writeFile(be_global->itl_name_.c_str(), be_global->itl_.str())) {
      BE_abort();  //error message already printed
    }
  }

  if (be_global->face_ts()) {
    postprocess(be_global->facets_header_name_.c_str(), be_global->facets_header_,
                BE_GlobalData::STREAM_FACETS_H);
    postprocess(be_global->facets_impl_name_.c_str(), be_global->facets_impl_,
                BE_GlobalData::STREAM_FACETS_CPP);
  }

  if (be_global->language_mapping() == BE_GlobalData::LANGMAP_FACE_CXX ||
      be_global->language_mapping() == BE_GlobalData::LANGMAP_SP_CXX) {
    postprocess(be_global->lang_header_name_.c_str(), be_global->lang_header_,
                BE_GlobalData::STREAM_LANG_H);
  }

  BE_cleanup();
}

Here is the call graph for this function: