diff options
Diffstat (limited to 'TAO/examples/POA/Forwarding/client.cpp')
-rw-r--r-- | TAO/examples/POA/Forwarding/client.cpp | 165 |
1 files changed, 0 insertions, 165 deletions
diff --git a/TAO/examples/POA/Forwarding/client.cpp b/TAO/examples/POA/Forwarding/client.cpp deleted file mode 100644 index b77c7f2b645..00000000000 --- a/TAO/examples/POA/Forwarding/client.cpp +++ /dev/null @@ -1,165 +0,0 @@ -// $Id$ - -//========================================================================== -// -// -// = FILENAME -// client.cpp -// -// = DESCRIPTION -// -// This is a simple foo client implementation. Also looks out for -// forwarding exceptions -// -// = AUTHOR -// Irfan Pyarali -// -//========================================================================== - -#include "tao/corba.h" -#include "ace/streams.h" -#include "ace/Get_Opt.h" -#include "ace/Read_Buffer.h" -#include "FooC.h" - -ACE_RCSID(Forwarding, client, "$Id$") - -static char *server_IOR_ = 0; - -static int iterations = 6; - -static int -read_ior (char *filename) -{ - // Open the file for reading. - ACE_HANDLE f_handle_ = ACE_OS::open (filename,0); - - if (f_handle_ == ACE_INVALID_HANDLE) - ACE_ERROR_RETURN ((LM_ERROR, - "Unable to open %s for reading: %p\n", - filename, - "ACE_OS::open"), - -1); - ACE_Read_Buffer ior_buffer (f_handle_); - server_IOR_ = ior_buffer.read (); - - if (server_IOR_ == 0) - ACE_ERROR_RETURN ((LM_ERROR, - "Unable to allocate memory to read ior: %p\n", - "ACE_Read_Buffer::read"), - -1); - return 0; -} - -static int -parse_args (int argc, char **argv) -{ - ACE_Get_Opt get_opts (argc, argv, "f:i:k:O:"); - int c; - int result; - - while ((c = get_opts ()) != -1) - switch (c) - { - case 'f': // read the IOR from the file. - result = read_ior (get_opts.optarg); - if (result < 0) - ACE_ERROR_RETURN ((LM_ERROR, - "Unable to read ior from %s : %p\n", - get_opts.optarg, - "read_ior"), - -1); - break; - case 'k': - server_IOR_ = get_opts.optarg; - break; - case 'i': - iterations = ::atoi (get_opts.optarg); - break; - case '?': - default: - ACE_ERROR_RETURN ((LM_ERROR, - "usage: %s" - "-f server_IOR_file" - "\n", - argv [0]), - -1); - } - - if (server_IOR_ == 0) - ACE_ERROR_RETURN ((LM_ERROR, - "Please specify the IOR for the servant\n"), -1); - - // Indicates successful parsing of command line. - return 0; -} - -void -do_calls (Foo_ptr foo_ptr, - CORBA::Environment &ACE_TRY_ENV) -{ - for (int i = 1; i <= iterations; i++) - { - // About half way through - if (i % 3 == 0) - { - foo_ptr->forward (ACE_TRY_ENV); - ACE_CHECK; - } - else - { - // Invoke the doit() method of the foo reference. - CORBA::Long result = foo_ptr->doit (ACE_TRY_ENV); - ACE_CHECK; - - // Print the result of doit () method of the foo reference. - ACE_DEBUG ((LM_DEBUG, - "doit() returned %d \n", - result)); - } - } -} - - -int -main (int argc, char **argv) -{ - ACE_DECLARE_NEW_CORBA_ENV; - - ACE_TRY - { - // Initialize the ORB - CORBA::ORB_var orb = CORBA::ORB_init (argc, argv, 0, ACE_TRY_ENV); - ACE_TRY_CHECK; - - // Initialize options based on command-line arguments. - int parse_args_result = parse_args (argc, argv); - if (parse_args_result != 0) - return parse_args_result; - - // Get an object reference from the argument string. - CORBA::Object_var object = orb->string_to_object (server_IOR_, ACE_TRY_ENV); - ACE_TRY_CHECK; - - // Try to narrow the object reference to a Foo reference. - Foo_var foo_var = Foo::_narrow (object.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - CORBA::String_var original_location = - orb->object_to_string (foo_var.in (), ACE_TRY_ENV); - ACE_TRY_CHECK; - - do_calls (foo_var.in (), - ACE_TRY_ENV); - ACE_TRY_CHECK; - } - ACE_CATCHANY - { - ACE_PRINT_EXCEPTION (ACE_ANY_EXCEPTION, "Exception caught"); - return -1; - } - ACE_ENDTRY; - ACE_CHECK_RETURN (-1); - - return 0; -} |