TAO/tao/Parser_Registry.cpp

   1 // -*- C++ -*-
   2 #include "tao/Parser_Registry.h"
   3 #include "tao/IOR_Parser.h"
   4 #include "tao/ORB_Core.h"
   5
   6 #include "ace/Dynamic_Service.h"
   7
   8 #if !defined(__ACE_INLINE__)
   9 #include "tao/Parser_Registry.inl"
  10 #endif /* __ACE_INLINE__ */
  11
  12 TAO_BEGIN_VERSIONED_NAMESPACE_DECL
  13
  14 TAO_Parser_Registry::TAO_Parser_Registry ()
  15   : parsers_ (nullptr),
  16     size_ (0)
  17 {
  18 }
  19
  20 TAO_Parser_Registry::~TAO_Parser_Registry ()
  21 {
  22   delete [] this->parsers_;
  23 }
  24
  25 int
  26 TAO_Parser_Registry::open (TAO_ORB_Core *orb_core)
  27 {
  28   char **names = nullptr;
  29   int number_of_names = 0;
  30
  31   if (orb_core->resource_factory () == nullptr)
  32     {
  33       return -1;
  34     }
  35
  36   orb_core->resource_factory ()->get_parser_names (names, number_of_names);
  37
  38   if (number_of_names == 0)
  39     {
  40       return -1;
  41     }
  42
  43   this->size_ = number_of_names;
  44   ACE_NEW_RETURN (this->parsers_,
  45                   TAO_IOR_Parser*[this->size_],
  46                   -1);
  47
  48   for (size_t i = 0, index = 0; i != this->size_; ++i)
  49     {
  50       this->parsers_[index] =
  51         ACE_Dynamic_Service<TAO_IOR_Parser>::instance (orb_core->configuration (),
  52                                                        names [i]);
  53
  54       if (this->parsers_[index] == nullptr)
  55         {
  56           --number_of_names;
  57           if (TAO_debug_level >= 1)
  58             {
  59               TAOLIB_DEBUG ((LM_DEBUG, "TAO (%P|%t) Failed to find Service Object"
  60                           " for %C.\n", names[i]));
  61             }
  62         }
  63       else
  64         {
  65           ++index;
  66         }
  67     }
  68
  69   this->size_ = number_of_names;
  70   return 0;
  71 }
  72
  73 TAO_IOR_Parser *
  74 TAO_Parser_Registry::match_parser (const char *ior_string)
  75 {
  76   for (Parser_Iterator i = this->begin (); i != this->end (); ++i)
  77     {
  78       if ((*i)->match_prefix (ior_string))
  79         {
  80           return *i;
  81         }
  82     }
  83
  84   return nullptr;
  85 }
  86
  87 TAO_END_VERSIONED_NAMESPACE_DECL