ChangeLogTag: Mon Jan 8 13:55:00 UTC 2007 Simon Massey <sma@prismtech.com>

2 files changed, 29 insertions, 13 deletions

diff --git a/TAO/ChangeLog b/TAO/ChangeLog
index 7c891f9b9c0..074c2392d8b 100644
--- a/TAO/ChangeLog
+++ b/TAO/ChangeLog
@@ -1,3 +1,9 @@
+Mon Jan  8 13:55:00 UTC 2007  Simon Massey  <sma@prismtech.com>
+
+        * orbsvcs/tests/Bug_1630_Regression/testclient.cpp:
+
+          Add some debug output to trace code flow for remote systems.
+
 Mon Jan  8 13:50:31 UTC 2007  Chad Elliott  <elliott_c@ociweb.com>
 
         * tests/OBV/Truncatable/client.cpp:
diff --git a/TAO/orbsvcs/tests/Bug_1630_Regression/testclient.cpp b/TAO/orbsvcs/tests/Bug_1630_Regression/testclient.cpp
index 360999cdb28..fffe62a0cba 100644
--- a/TAO/orbsvcs/tests/Bug_1630_Regression/testclient.cpp
+++ b/TAO/orbsvcs/tests/Bug_1630_Regression/testclient.cpp
@@ -15,6 +15,7 @@ int main (int argc, char* argv[])
    {
       int failed = 0;
 
+      ACE_DEBUG((LM_DEBUG, "Start of Client\n"));
       // Initialise ORB.
       //
       CORBA::ORB_var orb = CORBA::ORB_init( argc, argv, "" ACE_ENV_ARG_PARAMETER);
@@ -22,9 +23,11 @@ int main (int argc, char* argv[])
 
       // Find the Interface Repository.
       //
+      ACE_DEBUG((LM_DEBUG, ". Find IFR\n"));
       CORBA::Object_var ifr_obj = orb->resolve_initial_references( "InterfaceRepository" ACE_ENV_ARG_PARAMETER);
       ACE_TRY_CHECK;
 
+      ACE_DEBUG((LM_DEBUG, ". Narrow IFR\n"));
       CORBA::Repository_var ifr = CORBA::Repository::_narrow( ifr_obj.in() ACE_ENV_ARG_PARAMETER);
       ACE_TRY_CHECK;
 
@@ -34,6 +37,7 @@ int main (int argc, char* argv[])
          return 1;
       }
 
+      ACE_DEBUG((LM_DEBUG, ". Construct interface\n"));
       // Add an interface to the repository.
       //
       CORBA::InterfaceDefSeq baseInterfaces(1) ;
@@ -48,19 +52,24 @@ int main (int argc, char* argv[])
       // Add an operation to the interface.
       // First get some useful things.
       //
+      ACE_DEBUG((LM_DEBUG, ". Get primitive (void)\n"));
       CORBA::PrimitiveDef_var voidPrimitive =
          ifr->get_primitive( CORBA::pk_void ACE_ENV_ARG_PARAMETER) ;
       ACE_TRY_CHECK;
+      ACE_DEBUG((LM_DEBUG, ". Get primitive (char)\n"));
       CORBA::PrimitiveDef_var charPrimitive =
          ifr->get_primitive( CORBA::pk_char ACE_ENV_ARG_PARAMETER) ;
       ACE_TRY_CHECK;
+      ACE_DEBUG((LM_DEBUG, ". Get primitive (long)\n"));
       CORBA::PrimitiveDef_var longPrimitive =
          ifr->get_primitive( CORBA::pk_long ACE_ENV_ARG_PARAMETER) ;
       ACE_TRY_CHECK;
+      ACE_DEBUG((LM_DEBUG, ". Get primitive (short)\n"));
       CORBA::PrimitiveDef_var shortPrimitive =
          ifr->get_primitive( CORBA::pk_short ACE_ENV_ARG_PARAMETER) ;
       ACE_TRY_CHECK;
 
+      ACE_DEBUG((LM_DEBUG, ". create 3 parameters\n"));
       // The operation has three parameters...
       //
       CORBA::ULong numParams = 3 ;
@@ -93,16 +102,19 @@ int main (int argc, char* argv[])
 
       // ...and no exceptions...
       //
+      ACE_DEBUG((LM_DEBUG, ". create 0 excepts\n"));
       CORBA::ExceptionDefSeq exceptions( 1 ) ;
       exceptions.length( 0 ) ;
 
       // ...and no context ids
       //
+      ACE_DEBUG((LM_DEBUG, ". create 0 cids\n"));
       CORBA::ContextIdSeq contextIds( 1 ) ;
       contextIds.length( 0 ) ;
 
       // Create the operation, called "f".
       //
+      ACE_DEBUG((LM_DEBUG, ". create_operation\n"));
       CORBA::OperationDef_var operation =
          interface->create_operation( "IDL:interface865/f:1.0",
                                       "f",
@@ -121,14 +133,12 @@ int main (int argc, char* argv[])
       CORBA::NVList_var opList ;
 
       ACE_DEBUG((LM_DEBUG, "About to call create_operation_list\n"));
-
       orb->create_operation_list(operation.in (),
 		                 opList.out()
 				 ACE_ENV_ARG_PARAMETER) ;
       ACE_TRY_CHECK;
 
       ACE_DEBUG((LM_DEBUG, "Call to create_operation_list succeeded\n"));
-
       CORBA::ULong count = opList->count() ;
       ACE_TRY_CHECK;
 
@@ -143,7 +153,7 @@ int main (int argc, char* argv[])
       {
          ACE_DEBUG((LM_DEBUG, "Test failed: param 1 wrong name\n"));
          failed = 1 ;
-      };
+      }
 
       CORBA::Boolean const eq_char =
         nv->value()->type()->equal (CORBA::_tc_char
@@ -154,19 +164,19 @@ int main (int argc, char* argv[])
       {
          ACE_DEBUG((LM_DEBUG, "Test failed: param 1 wrong type\n"));
          failed = 1 ;
-      };
+      }
       if( nv->flags() != CORBA::ARG_IN )
       {
          ACE_DEBUG((LM_DEBUG, "Test failed: param 1 wrong mode\n"));
          failed = 1 ;
-      };
+      }
 
       nv = opList->item( 1 ) ;
       if(ACE_OS::strcmp( nv->name(), "p2") != 0 )
       {
          ACE_DEBUG((LM_DEBUG, "Test failed: param 2 wrong name\n"));
          failed = 1 ;
-      };
+      }
 
       CORBA::Boolean const eq_long =
         nv->value()->type()->equal (CORBA::_tc_long
@@ -177,19 +187,19 @@ int main (int argc, char* argv[])
       {
          ACE_DEBUG((LM_DEBUG, "Test failed: param 2 wrong type\n"));
          failed = 1 ;
-      };
+      }
       if( nv->flags() != CORBA::ARG_OUT )
       {
          ACE_DEBUG((LM_DEBUG, "Test failed: param 2 wrong mode\n"));
          failed = 1 ;
-      };
+      }
 
       nv = opList->item( 2 ) ;
       if(ACE_OS::strcmp( nv->name(), "p3") != 0 )
       {
          ACE_DEBUG((LM_DEBUG, "Test failed: param 3 wrong name\n"));
          failed = 1 ;
-      };
+      }
 
       CORBA::Boolean const eq_short =
         nv->value()->type()->equal (CORBA::_tc_short
@@ -200,15 +210,14 @@ int main (int argc, char* argv[])
       {
          ACE_DEBUG((LM_DEBUG, "Test failed: param 3 wrong type\n"));
          failed = 1 ;
-      };
+      }
       if( nv->flags() != CORBA::ARG_INOUT )
       {
          ACE_DEBUG((LM_DEBUG, "Test failed: param 3 wrong mode\n"));
          failed = 1 ;
-      };
-
+      }
 
-     // opList->free();
+      // opList->free();
       //operation->destroy();
 
       // Finally destroy the interface.
@@ -221,6 +230,7 @@ int main (int argc, char* argv[])
       {
          return 1 ;
       }
+      ACE_DEBUG((LM_DEBUG, ". seems OK\n"));
    }
    ACE_CATCHANY
    {