int main(int argc, char* argv[]) { EchoApp_Echo echo_service = CORBA_OBJECT_NIL; CosNaming_NamingContext name_service = CORBA_OBJECT_NIL; gchar *id[] = {"EchoApp", "Echo", NULL}; CORBA_Environment ev[1]; CORBA_exception_init(ev); client_init(&argc, argv, &global_orb, ev); etk_abort_if_exception(ev, "init failed"); g_print("Resolving service reference from name-service with id\"%s\"\n", id[0]); name_service = etk_get_name_service(global_orb, ev); etk_abort_if_exception(ev, "failed resolving name-service"); echo_service = (EchoApp_Echo)etk_name_service_resolve(name_service, id, ev); etk_abort_if_exception(ev, "failed resolving name service at name-service"); client_run(echo_service, ev); etk_abort_if_exception(ev, "service not reachable"); client_cleanup(global_orb, echo_service, ev); etk_abort_if_exception(ev, "cleanup failed"); exit(0); }
int main (int argc, char *argv[]) { CORBA_Object servant = CORBA_OBJECT_NIL; CORBA_char filename[] = "/tmp/test-ldata.ior"; CORBA_Environment ev[1]; CORBA_exception_init(ev); server_init (&argc, argv, &global_orb, &root_poa, ev); etk_abort_if_exception(ev, "failed ORB init"); servant = server_activate_service (global_orb, root_poa, ev); etk_abort_if_exception(ev, "failed activating service"); g_print ("Writing service reference to: %s\n\n", filename); etk_export_object_to_file (global_orb, servant, filename, ev); etk_abort_if_exception(ev, "failed exporting IOR"); server_run (global_orb, ev); etk_abort_if_exception(ev, "failed entering main loop"); server_cleanup (global_orb, root_poa, servant, ev); etk_abort_if_exception(ev, "failed cleanup"); exit (0); }
static gpointer server_in_background (BackgroundData *data) { int argc = data->argc; char **argv = data->argv; CORBA_Object servant = CORBA_OBJECT_NIL; CORBA_char filename[] = "calculator.ref"; CORBA_Environment ev[1]; CORBA_exception_init(ev); server_init (&argc, argv, &global_orb, &default_poa, ev); etk_abort_if_exception(ev, "failed ORB init"); servant = server_activate_service (global_orb, default_poa, ev); etk_abort_if_exception(ev, "failed activating service"); g_print ("Writing service reference to: %s\n\n", filename); etk_export_object_to_file (global_orb, servant, filename, ev); etk_abort_if_exception(ev, "failed exporting IOR"); server_run (global_orb, ev); etk_abort_if_exception(ev, "failed entering main loop"); server_cleanup (global_orb, default_poa, servant, ev); etk_abort_if_exception(ev, "failed cleanup"); g_thread_exit (NULL); }
/* * main */ int main(int argc, char* argv[]) { CORBA_char filename[] = "account.ref"; CORBA_long amount=0; Account service = CORBA_OBJECT_NIL; CORBA_Environment ev[1]; CORBA_exception_init(ev); client_init (&argc, argv, &global_orb, ev); etk_abort_if_exception(ev, "init failed"); if (argc<2) g_error ("usage: %s <amount>", argv[0]); amount = atoi(argv[1]); g_print ("Reading service reference from file \"%s\"\n", filename); service = (Account) etk_import_object_from_file (global_orb, filename, ev); etk_abort_if_exception(ev, "import service failed"); client_run (service, amount, ev); etk_abort_if_exception(ev, "service not reachable"); client_cleanup (global_orb, service, ev); etk_abort_if_exception(ev, "cleanup failed"); exit (0); }
int main(int argc, char* argv[]) { CORBA_char filename[] = "/tmp/test-atspi.ior"; Accessibility_Role data; int i; struct timeval start, end; long d_secs; long d_usec; Accessibility_Accessible service = CORBA_OBJECT_NIL; CORBA_Environment ev[1]; CORBA_exception_init(ev); client_init (&argc, argv, &global_orb, ev); etk_abort_if_exception(ev, "init failed"); g_print ("Reading service reference from file \"%s\"\n", filename); service = (Accessibility_Accessible) etk_import_object_from_file (global_orb, filename, ev); etk_abort_if_exception(ev, "import service failed"); gettimeofday(&start, NULL); for (i=0; i<NUM_CALLS; i++) { data = Accessibility_Accessible_getRole(service, ev); } gettimeofday(&end, NULL); d_secs = end.tv_sec - start.tv_sec; d_usec = end.tv_usec - start.tv_usec; printf("\nGetRole : %f\n", (float) d_secs + ((float) d_usec / 1000000.0)); client_cleanup (global_orb, service, ev); etk_abort_if_exception(ev, "cleanup failed"); exit (0); }
static void client_shutdown (int sig) { CORBA_Environment local_ev[1]; CORBA_exception_init(local_ev); if (global_orb != CORBA_OBJECT_NIL) { CORBA_ORB_shutdown (global_orb, FALSE, local_ev); etk_abort_if_exception (local_ev, "caught exception"); } }