TAO/examples/Quoter/Generic_Factory_i.cpp

   1
   2 //=============================================================================
   3 /**
   4  *  @file    Generic_Factory_i.cpp
   5  *
   6  *  The implementation of a LifeCycle Service GenericFactory for the
   7  *  Quoter example.
   8  *
   9  *  @author Michael Kircher (mk1@cs.wustl.edu)
  10  */
  11 //=============================================================================
  12
  13
  14 #include "Generic_Factory_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_Generic_Factory_i::Quoter_Generic_Factory_i (int debug_level)
  23 : debug_level_ (debug_level)
  24 {
  25 }
  26
  27 // Destructor.
  28 Quoter_Generic_Factory_i::~Quoter_Generic_Factory_i (void)
  29 {
  30 }
  31
  32 CORBA::Boolean
  33 Quoter_Generic_Factory_i::supports (const CosLifeCycle::Key &)
  34 {
  35   return 0;
  36 }
  37
  38
  39
  40 CosNaming::NamingContext_ptr
  41 Quoter_Generic_Factory_i::get_naming_context (const CosLifeCycle::Key &factory_key)
  42 {
  43   CosNaming::NamingContext_var quoterNamingContext_var;
  44   try
  45     {
  46       // @@ FIXME Get a reference to the ORB.
  47       CORBA::ORB_ptr orb_ptr =
  48         TAO_ORB_Core_instance ()->orb ();
  49
  50       // Get the Naming Service object reference.
  51       CORBA::Object_var namingObj_var =
  52         orb_ptr->resolve_initial_references ("NameService");
  53
  54       if (CORBA::is_nil (namingObj_var.in ()))
  55         ACE_ERROR ((LM_ERROR,
  56                     "(%P|%t) Unable get the Naming Service.\n"));
  57
  58       // Narrow the object reference to a Naming Context.
  59       CosNaming::NamingContext_var namingContext_var =
  60         CosNaming::NamingContext::_narrow (namingObj_var.in ());
  61
  62       CosNaming::Name quoterContextName (1);  // max = 1
  63       quoterContextName.length (1);
  64       quoterContextName[0].id = CORBA::string_dup ("IDL_Quoter");
  65
  66       // Get the IDL_Quoter naming context.
  67       CORBA::Object_var quoterNamingObj_var =
  68         namingContext_var->resolve (quoterContextName);
  69
  70       quoterNamingContext_var =
  71         CosNaming::NamingContext::_narrow (quoterNamingObj_var.in ());
  72     }
  73   catch (const CORBA::Exception&)
  74     {
  75       throw CosLifeCycle::NoFactory (factory_key);
  76     }
  77   return quoterNamingContext_var._retn ();
  78 }
  79
  80
  81
  82 CORBA::Object_ptr
  83 Quoter_Generic_Factory_i::create_object (const CosLifeCycle::Key &factory_key,
  84                                          const CosLifeCycle::Criteria &)
  85 {
  86   Stock::Quoter_var quoter_var;
  87   try
  88     {
  89       CosNaming::NamingContext_var quoterNamingContext_var =
  90         this->get_naming_context (factory_key);
  91
  92       // ** now a proper reference to the quoter naming context is
  93       // available
  94
  95       // Fill in the name of the Quoter Factory.
  96       // Take the key supplied to search for a Quoter Factory
  97       CosNaming::Name factory_Name = (CosNaming::Name) factory_key;
  98
  99       // Try to get a reference to a Quoter Factory
 100       CORBA::Object_var quoterFactoryObject_var =
 101         quoterNamingContext_var->resolve (factory_Name);
 102
 103       // We were able to get a reference to Quoter Factory.
 104       // Check if it is a valid Quoter Factory reference
 105       if (CORBA::is_nil (quoterFactoryObject_var.in()))
 106         { // throw a NoFactory exception
 107           throw CosLifeCycle::NoFactory (factory_key);
 108         }
 109
 110       Stock::Quoter_Factory_var factory_var =
 111         Stock::Quoter_Factory::_narrow (quoterFactoryObject_var.in ());
 112
 113       if (CORBA::is_nil (factory_var.in ()))
 114         {
 115           ACE_ERROR ((LM_ERROR,
 116                       "invalid factory.\n"));
 117           return CORBA::Object::_nil ();
 118         }
 119
 120       if (this->debug_level_ > 1)
 121         ACE_DEBUG ((LM_DEBUG, "Generic Factory: Factory reference OK.\n"));
 122
 123       // Now retrieve the Quoter obj ref corresponding to the key.
 124       quoter_var =
 125         factory_var->create_quoter ("test");
 126
 127       if (this->debug_level_ > 1)
 128         ACE_DEBUG ((LM_DEBUG, "Generic_Factory: Quoter Created\n"));
 129
 130       if (CORBA::is_nil (quoter_var.in ()))
 131         {
 132           ACE_ERROR ((LM_ERROR,
 133                       "null quoter objref returned by factory\n"));
 134           return CORBA::Object::_nil ();
 135         }
 136
 137       if (this->debug_level_ > 1)
 138         ACE_DEBUG ((LM_DEBUG, "Generic_Factory: Return an object reference to a new object.\n"));
 139
 140     }
 141   catch (const CORBA::Exception&)
 142     {
 143       throw CosLifeCycle::NoFactory (factory_key);
 144     }
 145   return quoter_var._retn ();
 146 }