//============================================================================
//  Copyright (c) Kitware, Inc.
//  All rights reserved.
//  See LICENSE.txt for details.
//  This software is distributed WITHOUT ANY WARRANTY; without even
//  the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
//  PURPOSE.  See the above copyright notice for more information.
//
//  Copyright 2014 National Technology & Engineering Solutions of Sandia, LLC (NTESS).
//  Copyright 2014 UT-Battelle, LLC.
//  Copyright 2014 Los Alamos National Security.
//
//  Under the terms of Contract DE-NA0003525 with NTESS,
//  the U.S. Government retains certain rights in this software.
//
//  Under the terms of Contract DE-AC52-06NA25396 with Los Alamos National
//  Laboratory (LANL), the U.S. Government retains certain rights in
//  this software.
//============================================================================

#include <vtkm/BinaryPredicates.h>

#include <vtkm/testing/Testing.h>

namespace
{

//general pair test
template <typename T>
void BinaryPredicateTest(){

  //Not using TestValue method as it causes roll-over to occur with
  //uint8 and int8 leading to unexpected comparisons.

  //test Equal
  { vtkm::Equal is_equal;
VTKM_TEST_ASSERT(is_equal(vtkm::TypeTraits<T>::ZeroInitialization(),
                          vtkm::TypeTraits<T>::ZeroInitialization()),
                 "Equal wrong.");

VTKM_TEST_ASSERT(is_equal(T(1), T(2)) == false, "Equal wrong.");
}

//test NotEqual
{
  vtkm::NotEqual not_equal;
  VTKM_TEST_ASSERT(not_equal(vtkm::TypeTraits<T>::ZeroInitialization(), T(1)), "NotEqual wrong.");

  VTKM_TEST_ASSERT(not_equal(T(1), T(1)) == false, "NotEqual wrong.");
}

//test SortLess
{
  vtkm::SortLess sort_less;
  VTKM_TEST_ASSERT(sort_less(T(1), T(2)) == true, "SortLess wrong.");
  VTKM_TEST_ASSERT(sort_less(T(2), T(2)) == false, "SortLess wrong.");
  VTKM_TEST_ASSERT(sort_less(T(2), T(1)) == false, "SortLess wrong.");
}

//test SortGreater
{
  vtkm::SortGreater sort_greater;
  VTKM_TEST_ASSERT(sort_greater(T(1), T(2)) == false, "SortGreater wrong.");
  VTKM_TEST_ASSERT(sort_greater(T(1), T(1)) == false, "SortGreater wrong.");
  VTKM_TEST_ASSERT(sort_greater(T(3), T(2)) == true, "SortGreater wrong.");
}
}
;

struct BinaryPredicateTestFunctor
{
  template <typename T>
  void operator()(const T&) const
  {
    BinaryPredicateTest<T>();
  }
};

void TestBinaryPredicates()
{
  vtkm::testing::Testing::TryTypes(BinaryPredicateTestFunctor());

  //test LogicalAnd
  {
    vtkm::LogicalAnd logical_and;
    VTKM_TEST_ASSERT(logical_and(true, true) == true, "logical_and true wrong.");
    VTKM_TEST_ASSERT(logical_and(true, false) == false, "logical_and true wrong.");
    VTKM_TEST_ASSERT(logical_and(false, true) == false, "logical_and true wrong.");
    VTKM_TEST_ASSERT(logical_and(false, false) == false, "logical_and true wrong.");
  }

  //test LogicalOr
  {
    vtkm::LogicalOr logical_or;
    VTKM_TEST_ASSERT(logical_or(true, true) == true, "logical_or true wrong.");
    VTKM_TEST_ASSERT(logical_or(true, false) == true, "logical_or true wrong.");
    VTKM_TEST_ASSERT(logical_or(false, true) == true, "logical_or true wrong.");
    VTKM_TEST_ASSERT(logical_or(false, false) == false, "logical_or true wrong.");
  }
}

} // anonymous namespace

int UnitTestBinaryPredicates(int argc, char* argv[])
{
  return vtkm::testing::Testing::Run(TestBinaryPredicates, argc, argv);
}
