diff options
Diffstat (limited to 'tests/Future_Test.cpp')
| -rw-r--r-- | tests/Future_Test.cpp | 516 |
1 files changed, 0 insertions, 516 deletions
diff --git a/tests/Future_Test.cpp b/tests/Future_Test.cpp deleted file mode 100644 index 5af6cc97a6f..00000000000 --- a/tests/Future_Test.cpp +++ /dev/null @@ -1,516 +0,0 @@ -// $Id$ - -// ============================================================================ -// -// = LIBRARY -// tests -// -// = FILENAME -// Future_Test.cpp -// -// = DESCRIPTION -// This example tests the ACE Future. -// -// = AUTHOR -// Andres Kruse <Andres.Kruse@cern.ch>, Douglas C. Schmidt -// <schmidt@cs.wustl.edu> and Per Andersson <pera@ipso.se> -// -// ============================================================================ - -#include "test_config.h" -#include "ace/ACE.h" -#include "ace/Task.h" -#include "ace/Synch.h" -#include "ace/Message_Queue.h" -#include "ace/Future.h" -#include "ace/Method_Object.h" -#include "ace/Activation_Queue.h" -#include "ace/Auto_Ptr.h" - -#if defined (ACE_HAS_THREADS) - -typedef ACE_Atomic_Op<ACE_Thread_Mutex, int> ATOMIC_INT; - -// a counter for the tasks.. -static ATOMIC_INT task_count (0); - -// a counter for the futures.. -static ATOMIC_INT future_count (0); - -// a counter for the capsules.. -static ATOMIC_INT capsule_count (0); - -// a counter for the method objects... -static ATOMIC_INT methodobject_count (0); - -class Scheduler : public ACE_Task_Base - // = TITLE - // Active Object Scheduler. -{ -public: - Scheduler (const ASYS_TCHAR *, Scheduler * = 0); - virtual ~Scheduler (void); - - virtual int open (void *args = 0); - virtual int close (u_long flags = 0); - virtual int svc (void); - - ACE_Future<u_long> work (u_long param, int count = 1); - ACE_Future<const ASYS_TCHAR*> name (void); - void end (void); - - u_long work_i (u_long, int); - const ASYS_TCHAR *name_i (void); - -private: - ASYS_TCHAR *name_; - ACE_Activation_Queue activation_queue_; - Scheduler *scheduler_; -}; - -class Method_Object_work : public ACE_Method_Object - // = TITLE - // Reification of the <work> method. -{ -public: - Method_Object_work (Scheduler *, u_long, int, ACE_Future<u_long> &); - virtual ~Method_Object_work (void); - virtual int call (void); - -private: - Scheduler *scheduler_; - u_long param_; - int count_; - ACE_Future<u_long> future_result_; -}; - -Method_Object_work::Method_Object_work (Scheduler* new_Scheduler, - u_long new_param, - int new_count, - ACE_Future<u_long> &new_result) - : scheduler_ (new_Scheduler), - param_ (new_param), - count_ (new_count), - future_result_ (new_result) -{ - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) Method_Object_work created\n"))); -} - -Method_Object_work::~Method_Object_work (void) -{ - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) Method_Object_work will be deleted.\n"))); -} - - -int -Method_Object_work::call (void) -{ - return this->future_result_.set - (this->scheduler_->work_i (this->param_, - this->count_)); -} - -class Method_Object_name : public ACE_Method_Object - // = TITLE - // Reification of the <name> method. -{ -public: - Method_Object_name (Scheduler *, - ACE_Future<const ASYS_TCHAR*> &); - virtual ~Method_Object_name (void); - virtual int call (void); - -private: - Scheduler *scheduler_; - ACE_Future<const ASYS_TCHAR*> future_result_; -}; - -Method_Object_name::Method_Object_name (Scheduler *new_scheduler, - ACE_Future<const ASYS_TCHAR*> &new_result) - : scheduler_ (new_scheduler), - future_result_ (new_result) -{ - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) Method_Object_name created\n"))); -} - -Method_Object_name::~Method_Object_name (void) -{ - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) Method_Object_name will be deleted.\n"))); -} - -int -Method_Object_name::call (void) -{ - return future_result_.set (scheduler_->name_i ()); -} - -class Method_Object_end : public ACE_Method_Object - // = TITLE - // Reification of the <end> method. -{ -public: - Method_Object_end (Scheduler *new_Scheduler) - : scheduler_ (new_Scheduler) {} - virtual ~Method_Object_end (void) {} - virtual int call (void) { - this->scheduler_->close (); - return -1; - } - -private: - Scheduler *scheduler_; -}; - -// constructor -Scheduler::Scheduler (const ASYS_TCHAR *newname, - Scheduler *new_Scheduler) -{ - ACE_NEW (this->name_, ASYS_TCHAR[ACE_OS::strlen (newname) + 1]); - ACE_OS::strcpy ((ASYS_TCHAR *) this->name_, newname); - this->scheduler_ = new_Scheduler; - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) Scheduler %s created\n"), - this->name_)); -} - -// Destructor -Scheduler::~Scheduler (void) -{ - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) Scheduler %s will be destroyed\n"), - this->name_)); - delete[] this->name_; -} - -// open -int -Scheduler::open (void *) -{ - task_count++; - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) Scheduler %s open\n"), - this->name_)); - // Become an Active Object. - return this->activate (THR_BOUND | THR_DETACHED); -} - -// close -int -Scheduler::close (u_long) -{ - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) Scheduler %s close\n"), - this->name_)); - task_count--; - return 0; -} - -// service.. -int -Scheduler::svc (void) -{ - for (;;) - { - // Dequeue the next method object (we use an auto pointer in - // case an exception is thrown in the <call>). - auto_ptr<ACE_Method_Object> mo (this->activation_queue_.dequeue ()); - - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("(%t) calling method object\n"))); - // Call it. - if (mo->call () == -1) - break; - // Destructor automatically deletes it. - } - - /* NOTREACHED */ - return 0; -} - -void -Scheduler::end (void) -{ - this->activation_queue_.enqueue (new Method_Object_end (this)); -} - - -// Here's where the Work takes place. -u_long -Scheduler::work_i (u_long param, - int count) -{ - ACE_UNUSED_ARG (count); - - return ACE::is_prime (param, 2, param / 2); -} - -const ASYS_TCHAR * -Scheduler::name_i (void) -{ - return this->name_; -} - -ACE_Future<const ASYS_TCHAR *> -Scheduler::name (void) -{ - if (this->scheduler_) - // Delegate to the Scheduler. - return this->scheduler_->name (); - else - { - ACE_Future<const ASYS_TCHAR*> new_future; - - // @@ What happens if new fails here? - this->activation_queue_.enqueue - (new Method_Object_name (this, new_future)); - - return new_future; - } -} - -ACE_Future<u_long> -Scheduler::work (u_long newparam, int newcount) -{ - if (this->scheduler_) { - return this->scheduler_->work (newparam, newcount); - } - else { - ACE_Future<u_long> new_future; - - this->activation_queue_.enqueue - (new Method_Object_work (this, newparam, - newcount, new_future)); - return new_future; - } -} - -// @@ These values should be set by the command line options! - -// Total number of loops. -static int n_loops = 100; - -#if defined (ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION) -template class ACE_Atomic_Op<ACE_Thread_Mutex, int>; -template class ACE_Future<const ASYS_TCHAR *>; -template class ACE_Future<int>; -template class ACE_Future<u_long>; -template class ACE_Future_Rep<ASYS_TCHAR const *>; -template class ACE_Future_Rep<int>; -template class ACE_Future_Rep<u_long>; -template class auto_ptr<ACE_Method_Object>; -template class ACE_Auto_Basic_Ptr<ACE_Method_Object>; -#elif defined (ACE_HAS_TEMPLATE_INSTANTIATION_PRAGMA) -#pragma instantiate ACE_Atomic_Op<ACE_Thread_Mutex, int> -#pragma instantiate ACE_Future<const ASYS_TCHAR *> -#pragma instantiate ACE_Future<int> -#pragma instantiate ACE_Future<u_long> -#pragma instantiate ACE_Future_Rep<ASYS_TCHAR const *> -#pragma instantiate ACE_Future_Rep<int> -#pragma instantiate ACE_Future_Rep<u_long> -#pragma instantiate auto_ptr<ACE_Method_Object> -#pragma instantiate ACE_Auto_Basic_Ptr<ACE_Method_Object> -#endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */ - -#endif /* ACE_HAS_THREADS */ - -int -main (int, ASYS_TCHAR *[]) -{ - ACE_START_TEST (ASYS_TEXT ("Future_Test")); - -#if defined (ACE_HAS_THREADS) - Scheduler *andres = 0, *peter = 0, *helmut = 0, *matias = 0; - - // Create active objects.. - // @@ Should "open" be subsumed within the constructor of - // Scheduler()? - ACE_NEW_RETURN (andres, Scheduler (ASYS_TEXT ("andres")), -1); - andres->open (); - ACE_NEW_RETURN (peter, Scheduler (ASYS_TEXT ("peter")), -1); - peter->open (); - ACE_NEW_RETURN (helmut, Scheduler (ASYS_TEXT ("helmut")), -1); - helmut->open (); - - // Matias passes all asynchronous method calls on to Andres... - ACE_NEW_RETURN (matias, Scheduler (ASYS_TEXT ("matias"), andres), -1); - matias->open (); - - for (int i = 0; i < n_loops; i++) - { - { - ACE_Future<u_long> fresulta, fresultb, fresultc, fresultd, fresulte; - ACE_Future<const ASYS_TCHAR*> fname; - - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) going to do a non-blocking call\n"))); - - fresulta = andres->work (9013); - fresultb = peter->work (9013); - fresultc = helmut->work (9013); - fresultd = matias->work (9013); - fname = andres->name (); - - // see if the result is available... - if (fresulta.ready ()) - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) wow.. work is ready.....\n"))); - - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) non-blocking call done... now blocking...\n"))); - - // Save the result of fresulta. - - fresulte = fresulta; - - if (i % 3 == 0) - { - // Every 3rd time... disconnect the futures... - // but "fresulte" should still contain the result... - fresulta.cancel (10ul); - fresultb.cancel (20ul); - fresultc.cancel (30ul); - fresultd.cancel (40ul); - } - - u_long resulta = 0, resultb = 0, resultc = 0, resultd = 0, resulte = 0; - - fresulta.get (resulta); - fresultb.get (resultb); - fresultc.get (resultc); - fresultd.get (resultd); - fresulte.get (resulte); - - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("(%t) result a %u\n"), (u_int) resulte)); - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("(%t) result b %u\n"), (u_int) resulta)); - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("(%t) result c %u\n"), (u_int) resultb)); - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("(%t) result d %u\n"), (u_int) resultc)); - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("(%t) result e %u\n"), (u_int) resultd)); - - const ASYS_TCHAR *name; - - fname.get (name); - - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("(%t) name %s\n"), name)); - - } - - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) task_count %d future_count %d capsule_count %d methodobject_count %d\n"), - task_count.value (), - future_count.value (), - capsule_count.value (), - methodobject_count.value ())); - } - - // Close things down. - andres->end (); - peter->end (); - helmut->end (); - matias->end (); - - ACE_OS::sleep (2); - - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("(%t) task_count %d future_count %d capsule_count %d methodobject_count %d\n"), - task_count.value (), - future_count.value (), - capsule_count.value (), - methodobject_count.value ())); - - { - // Check if set then get works, older versions of ACE_Future - // will lock forever (or until the timer expires), will use a small - // timer value to avoid blocking the process. - - ACE_Future<int> f1; - f1.set(100); - - ACE_Time_Value timeout(1); - int value = 0; - - if (f1.get (value, &timeout) == 0 && value == 100) - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("Ace_Future<T>::Set followed by Ace_Future<T>::Get works.\n"))); - else - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("ACE_Future<T>::Set followed by Ace_Future<T>::Get does ") - ASYS_TEXT ("not work, broken Ace_Future<> implementation.\n"))); - } - { - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("Checking if Ace_Future<T>::operator= is implemented ") - ASYS_TEXT ("incorrectly this might crash the program.\n"))); - - ACE_Future<int> f1; - { - ACE_Future<int> f2 (f1); // To ensure that a rep object is created - } - // Now it is one ACE_Future<int> referencing the rep instance - - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("0.\n"))); - //check that self assignment works - f1 = f1; - // Is there any repesentation left, and if so what is the ref - // count older ACE_Future<> implementations have deleted the rep - // instance at this moment - - // The stuff below might crash the process if the op= - // implementation was bad - int value = 0; - ACE_Time_Value timeout (1); - - f1.set (100); - f1.get (value, &timeout); - - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("1.\n"))); - { // Might delete the same data a couple of times - ACE_Future<int> f2 (f1); - f1.set (100); - f1.get (value, &timeout); - } - - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("2.\n"))); - { - ACE_Future<int> f2 (f1); - f1.set (100); - f1.get (value, &timeout); - } - - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("3.\n"))); - { - ACE_Future<int> f2 (f1); - f1.set (100); - f1.get (value, &timeout); - } - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("4.\n"))); - { - ACE_Future<int> f2 (f1); - f1.set (100); - f1.get (value, &timeout); - } - ACE_DEBUG ((LM_DEBUG, ASYS_TEXT ("5.\n"))); - { - ACE_Future<int> f2 (90); - f2.get (value, &timeout); - f1.get (value, &timeout); - } - } - ACE_DEBUG ((LM_DEBUG, - ASYS_TEXT ("No it did not crash the program.\n"))); - - ACE_OS::sleep (5); - - delete andres; - delete peter; - delete helmut; - delete matias; - -#else - ACE_ERROR ((LM_ERROR, ASYS_TEXT ("threads not supported on this platform\n"))); -#endif /* ACE_HAS_THREADS */ - ACE_END_TEST; - return 0; -} |