Enable ssliop collocated invocation support

    * TAO/orbsvcs/tests/Security/ssliop_corbaloc/client.cpp:

1 files changed, 16 insertions, 3 deletions

diff --git a/TAO/orbsvcs/tests/Security/ssliop_corbaloc/client.cpp b/TAO/orbsvcs/tests/Security/ssliop_corbaloc/client.cpp
index d697299e37b..bce3bba7b98 100644
--- a/TAO/orbsvcs/tests/Security/ssliop_corbaloc/client.cpp
+++ b/TAO/orbsvcs/tests/Security/ssliop_corbaloc/client.cpp
@@ -12,12 +12,10 @@
  */
 //=============================================================================
 
-
 #include "client.h"
 #include "tao/debug.h"
 #include "ace/Get_Opt.h"
-
-
+#include <orbsvcs/SecurityLevel2C.h>
 
 #if defined (_MSC_VER)
 # pragma warning (disable : 4250)
@@ -216,6 +214,21 @@ CosNaming_Client::init (int argc, ACE_TCHAR **argv)
         return -1;
 
       CORBA::ORB_var orb = this->orbmgr_.orb ();
+
+      // In order to allow collocated invocations we need to allow unsecured
+      // collocated invocations to the object else our security manager will
+      // block the collocated invocation unless you explicitly allow it
+      CORBA::Object_var sec_man =
+        orb->resolve_initial_references ("SecurityLevel2:SecurityManager");
+      SecurityLevel2::SecurityManager_var sec2manager =
+        SecurityLevel2::SecurityManager::_narrow (sec_man.in ());
+      SecurityLevel2::AccessDecision_var ad_tmp =
+        sec2manager->access_decision ();
+      TAO::SL2::AccessDecision_var ad =
+        TAO::SL2::AccessDecision::_narrow (ad_tmp.in ());
+      // Allow unsecured collocated invocations
+      ad->default_collocated_decision (true);
+
       return this->naming_client_.init (orb.in ());
     }
   catch (const CORBA::Exception& ex)