1 files changed, 87 insertions, 0 deletions
diff --git a/TAO/tests/MProfile_Forwarding/Servant_Locator.cpp b/TAO/tests/MProfile_Forwarding/Servant_Locator.cpp
new file mode 100644
index 00000000000..275d0c7f0a4
--- /dev/null
+++ b/TAO/tests/MProfile_Forwarding/Servant_Locator.cpp
@@ -0,0 +1,87 @@
+// $Id$
+
+// ============================================================================
+//
+// = LIBRARY
+//     TAO/tests/POA/Forwarding/Servant_Locator
+//
+// = FILENAME
+//     Servant_Locator.cpp
+//
+// = DESCRIPTION
+//     Implementation of MyFooServantLocator class , used with a POA
+//     having a NON_RETAIN policy.
+//
+// = AUTHOR
+//     Irfan Pyarali
+//     Michael Kircher
+//
+// ============================================================================
+
+#include "Servant_Locator.h"
+#include "ace/Log_Msg.h"
+#include "testC.h"
+#include "ace/OS_NS_string.h"
+
+
+ACE_RCSID(Forwarding, Servant_Locator, "$Id$")
+
+Servant_Locator::Servant_Locator (CORBA::ORB_ptr orb_ptr)
+
+  : orb_var_ (CORBA::ORB::_duplicate (orb_ptr))
+{
+  // no-op
+}
+
+Servant_Locator::~Servant_Locator ()
+{
+  //delete servant_ptr_;
+}
+
+
+PortableServer::Servant
+Servant_Locator::preinvoke (const PortableServer::ObjectId &oid,
+                            PortableServer::POA_ptr /* poa_ptr */,
+                            const char * /*operation*/,
+                            PortableServer::ServantLocator::Cookie & /* cookie */)
+{
+
+  CORBA::String_var s = PortableServer::ObjectId_to_string (oid);
+
+  ACE_DEBUG ((LM_DEBUG,
+              "The OID is <%s> \n", s.in ()));
+  if (ACE_OS::strstr (s.in (), "Simple_Server") == 0)
+    {
+      throw CORBA::OBJECT_NOT_EXIST ();
+    }
+
+  // Combined IOR stuff
+  Simple_Server_var server =
+    Simple_Server::_narrow (this->objref_.in ());
+
+  ACE_DEBUG ((LM_DEBUG,
+              "Got the narrowed secondary server too... \n"));
+
+  ACE_DEBUG ((LM_DEBUG,
+              "About to throw exception.. \n"));
+
+  throw PortableServer::ForwardRequest (
+    CORBA::Object::_duplicate (
+      server.in ()));
+
+}
+
+void
+Servant_Locator::postinvoke (const PortableServer::ObjectId &,
+                             PortableServer::POA_ptr ,
+                             const char *,
+                             PortableServer::ServantLocator::Cookie ,
+                             PortableServer::Servant)
+{
+}
+
+void
+Servant_Locator::set (CORBA::Object_var objref)
+{
+  this->objref_ = CORBA::Object::_duplicate (objref.in ());
+}