// $Id$

// ============================================================================
//
// = LIBRARY
//    tests
//
// = FILENAME
//    Atomic_Op_Test.cpp
//
// = DESCRIPTION
//      This is a simple test of the Atomic Operations Class in ACE.
//      On platforms like Win32, ACE uses template specialization to
//      use native implementations provided by the OS to accelarate
//      these operations.
//
// = AUTHOR
//    Irfan Pyarali <irfan@cs.wustl.edu>
//
// ============================================================================

#include "tests/test_config.h"

ACE_RCSID(tests, Atomic_Op_Test, "$Id$")

#include "ace/Atomic_Op.h"
#include "ace/Synch_Traits.h"

enum { TEST_ITERATIONS = 1000000 };

int
run_main (int, ACE_TCHAR *[])
{
  ACE_START_TEST (ACE_TEXT ("Atomic_Op_Test"));

  ACE_Atomic_Op <ACE_SYNCH_MUTEX, long> foo (5);

  ACE_ASSERT (foo == 5);

  long result = ++foo;
  ACE_ASSERT (foo == 6);
  ACE_ASSERT (result == 6);

  result = --foo;
  ACE_ASSERT (foo == 5);
  ACE_ASSERT (result == 5);

  result = foo++;
  ACE_ASSERT (foo == 6);
  ACE_ASSERT (result == 5);

  result = foo--;
  ACE_ASSERT (foo == 5);
  ACE_ASSERT (result == 6);

  result = foo += 10;
  ACE_ASSERT (foo == 15);
  ACE_ASSERT (result == 15);

  result = foo -= 10;
  ACE_ASSERT (foo == 5);
  ACE_ASSERT (result == 5);

  foo = 7;
  ACE_ASSERT (foo == 7);

  ACE_Atomic_Op <ACE_SYNCH_MUTEX, long> foo2 (5);
  foo2 = foo;
  ACE_ASSERT (foo == 7);
  ACE_ASSERT (foo2 == 7);

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <long> assignment %D\n")));
  int i;
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      foo = 1;
      foo = 2;
      foo = 3;
      foo = 4;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <long> assignment %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <long> increment %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      ++foo;
      ++foo;
      ++foo;
      ++foo;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <long> increment %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <long> decrement %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      --foo;
      --foo;
      --foo;
      --foo;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <long> decrement %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <long> addition %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      foo += 5;
      foo += 5;
      foo += 5;
      foo += 5;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <long> addition %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <long> subtraction %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      foo -= 5;
      foo -= 5;
      foo -= 5;
      foo -= 5;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <long> subtraction %D\n")));

  ACE_Atomic_Op <ACE_SYNCH_MUTEX, unsigned long> foo_unsigned (5);

  ACE_ASSERT (foo_unsigned == 5);

  unsigned long ul_result = ++foo_unsigned;
  ACE_ASSERT (foo_unsigned == 6);
  ACE_ASSERT (ul_result == 6);

  ul_result = --foo_unsigned;
  ACE_ASSERT (foo_unsigned == 5);
  ACE_ASSERT (ul_result == 5);

  ul_result = foo_unsigned++;
  ACE_ASSERT (foo_unsigned == 6);
  ACE_ASSERT (ul_result == 5);

  ul_result = foo_unsigned--;
  ACE_ASSERT (foo_unsigned == 5);
  ACE_ASSERT (ul_result == 6);

  ul_result = foo_unsigned += 10;
  ACE_ASSERT (foo_unsigned == 15);
  ACE_ASSERT (ul_result == 15);

  ul_result = foo_unsigned -= 10;
  ACE_ASSERT (foo_unsigned == 5);
  ACE_ASSERT (ul_result == 5);

  foo_unsigned = 7;
  ACE_ASSERT (foo_unsigned == 7);

  ACE_Atomic_Op <ACE_SYNCH_MUTEX, unsigned long> foo_unsigned2 (5);
  foo_unsigned2 = foo_unsigned;
  ACE_ASSERT (foo_unsigned == 7);
  ACE_ASSERT (foo_unsigned2 == 7);

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned long> assignment %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      foo_unsigned = 1;
      foo_unsigned = 2;
      foo_unsigned = 3;
      foo_unsigned = 4;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned long> assignment %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned long> increment %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      ++foo_unsigned;
      ++foo_unsigned;
      ++foo_unsigned;
      ++foo_unsigned;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned long> increment %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned long> decrement %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      --foo_unsigned;
      --foo_unsigned;
      --foo_unsigned;
      --foo_unsigned;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned long> decrement %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned long> addition %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      foo_unsigned += 5;
      foo_unsigned += 5;
      foo_unsigned += 5;
      foo_unsigned += 5;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned long> addition %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned long> subtraction %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      foo_unsigned -= 5;
      foo_unsigned -= 5;
      foo_unsigned -= 5;
      foo_unsigned -= 5;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned long> subtraction %D\n")));

  ACE_Atomic_Op <ACE_SYNCH_MUTEX, int> bar (5);

  ACE_ASSERT (bar == 5);

  result = ++bar;
  ACE_ASSERT (bar == 6);
  ACE_ASSERT (result == 6);

  result = --bar;
  ACE_ASSERT (bar == 5);
  ACE_ASSERT (result == 5);

  result = bar++;
  ACE_ASSERT (bar == 6);
  ACE_ASSERT (result == 5);

  result = bar--;
  ACE_ASSERT (bar == 5);
  ACE_ASSERT (result == 6);

  result = bar += 10;
  ACE_ASSERT (bar == 15);
  ACE_ASSERT (result == 15);

  result = bar -= 10;
  ACE_ASSERT (bar == 5);
  ACE_ASSERT (result == 5);

  bar = 7L;
  ACE_ASSERT (bar == 7);

  ACE_Atomic_Op <ACE_SYNCH_MUTEX, int> bar2 (5L);
  bar2 = bar;
  ACE_ASSERT (bar == 7);
  ACE_ASSERT (bar2 == 7);

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <int> assignment %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      bar = 1;
      bar = 2;
      bar = 3;
      bar = 4;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <int> assignment %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <int> increment %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      ++bar;
      ++bar;
      ++bar;
      ++bar;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <int> increment %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <int> decrement %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      --bar;
      --bar;
      --bar;
      --bar;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <int> decrement %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <int> addition %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      bar += 5;
      bar += 5;
      bar += 5;
      bar += 5;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <int> addition %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <int> subtraction %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      bar -= 5;
      bar -= 5;
      bar -= 5;
      bar -= 5;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <int> subtraction %D\n")));

  ACE_Atomic_Op <ACE_SYNCH_MUTEX, unsigned int> unsigned_bar (5);

  ACE_ASSERT (unsigned_bar == 5);

  unsigned int ui_result = ++unsigned_bar;
  ACE_ASSERT (unsigned_bar == 6);
  ACE_ASSERT (ui_result == 6);

  ui_result = --unsigned_bar;
  ACE_ASSERT (unsigned_bar == 5);
  ACE_ASSERT (ui_result == 5);

  ui_result = unsigned_bar++;
  ACE_ASSERT (unsigned_bar == 6);
  ACE_ASSERT (ui_result == 5);

  ui_result = unsigned_bar--;
  ACE_ASSERT (unsigned_bar == 5);
  ACE_ASSERT (ui_result == 6);

  ui_result = unsigned_bar += 10;
  ACE_ASSERT (unsigned_bar == 15);
  ACE_ASSERT (ui_result == 15);

  ui_result = unsigned_bar -= 10;
  ACE_ASSERT (unsigned_bar == 5);
  ACE_ASSERT (ui_result == 5);

  unsigned_bar = 7L;
  ACE_ASSERT (unsigned_bar == 7);

  ACE_Atomic_Op <ACE_SYNCH_MUTEX, unsigned int> unsigned_bar2 (5L);
  unsigned_bar2 = unsigned_bar;
  ACE_ASSERT (unsigned_bar == 7);
  ACE_ASSERT (unsigned_bar2 == 7);

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned int> assignment %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      unsigned_bar = 1;
      unsigned_bar = 2;
      unsigned_bar = 3;
      unsigned_bar = 4;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned int> assignment %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned int> increment %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      ++unsigned_bar;
      ++unsigned_bar;
      ++unsigned_bar;
      ++unsigned_bar;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned int> increment %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned int> decrement %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      --unsigned_bar;
      --unsigned_bar;
      --unsigned_bar;
      --unsigned_bar;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned int> decrement %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned int> addition %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      unsigned_bar += 5;
      unsigned_bar += 5;
      unsigned_bar += 5;
      unsigned_bar += 5;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned int> addition %D\n")));

  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Starting <unsigned int> subtraction %D\n")));
  for (i = 0; i < TEST_ITERATIONS; ++i)
    {
      unsigned_bar -= 5;
      unsigned_bar -= 5;
      unsigned_bar -= 5;
      unsigned_bar -= 5;
    }
  ACE_DEBUG ((LM_DEBUG, ACE_TEXT ("Ending <unsigned int> subtraction %D\n")));


  ACE_END_TEST;
  return 0;
}