TAO/examples/Quoter/Factory_Finder_i.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file    Factory_Finder_i.cpp
   5  *
   6  *  A Factory Finder for the Quoter example. This example conforms
   7  *  to the CosLifeCycle Factory Finder notion.
   8  *
   9  *  @author Michael Kircher (mk1@cs.wustl.edu)
  10  */
  11 //=============================================================================
  12
  13
  14 #include "Factory_Finder_i.h"
  15 #include "QuoterC.h"
  16
  17 #include "tao/ORB_Core.h"
  18
  19 #include "ace/Get_Opt.h"
  20
  21 // Constructor
  22 Quoter_Factory_Finder_i::Quoter_Factory_Finder_i (int debug_level)
  23 : debug_level_ (debug_level)
  24 {
  25   // Nothing
  26 }
  27
  28 // Destructor.
  29 Quoter_Factory_Finder_i::~Quoter_Factory_Finder_i ()
  30 {
  31   // Nothing
  32 }
  33
  34
  35 CosLifeCycle::Factories *
  36 Quoter_Factory_Finder_i::find_factories (const CosLifeCycle::Key &factory_key)
  37 {
  38   const char *exception_message = "Null Message";
  39
  40   CosLifeCycle::Factories *factories_ptr = 0;
  41
  42   try
  43   {
  44     // Get a reference to the ORB.
  45     CORBA::ORB_ptr orb_ptr = TAO_ORB_Core_instance ()->orb ();
  46
  47     // Get the Naming Service object reference.
  48     exception_message = "While resolving the Name Service";
  49     CORBA::Object_var namingObj_var =
  50       orb_ptr->resolve_initial_references ("NameService");
  51
  52     if (CORBA::is_nil (namingObj_var.in ()))
  53       ACE_ERROR ((LM_ERROR,
  54                   " (%P|%t) Unable get the Naming Service.\n"));
  55
  56     // Narrow the object reference to a Naming Context.
  57     exception_message = "While narrowing the Naming Context";
  58     CosNaming::NamingContext_var namingContext_var =
  59       CosNaming::NamingContext::_narrow (namingObj_var.in ());
  60
  61     // Take the key supplied to search for a Quoter Factory
  62     CosNaming::Name factoryName = (CosNaming::Name) factory_key;
  63
  64     // Try to get a reference to a Quoter Factory
  65     exception_message = "While resolving the Factory Object";
  66     CORBA::Object_var quoterFactoryObject_var =
  67       namingContext_var->resolve (factoryName);
  68
  69     // Check if it is a valid Quoter Factory reference
  70     if (CORBA::is_nil (quoterFactoryObject_var.in()))
  71       throw CosLifeCycle::NoFactory (factory_key);
  72
  73     // create a sequence of factories object
  74     factories_ptr = new CosLifeCycle::Factories (1);
  75
  76     // using the Naming Service only one reference is available
  77     factories_ptr->length (1);
  78
  79     // Check if it is a valid Quoter Factory reference.
  80     if (CORBA::is_nil (quoterFactoryObject_var.in ())) // throw a NoFactory exception.
  81       throw CosLifeCycle::NoFactory (factory_key);
  82
  83     // insert the object reference
  84     (*factories_ptr)[0] = CORBA::Object::_duplicate (quoterFactoryObject_var.in());
  85
  86     if (this->debug_level_ > 1)
  87       ACE_DEBUG ((LM_DEBUG,
  88                   "Factory Finder: Have reference to a Quoter Factory.\n"));
  89   }
  90   catch (const CORBA::Exception&)
  91     {
  92       ACE_ERROR ((LM_ERROR, "Quoter_Factory_Finder::find_factories - %C\n", exception_message));
  93       throw CosLifeCycle::NoFactory (factory_key);
  94     }
  95
  96   return factories_ptr;
  97 }