StableSortIndices.h

Go to the documentation of this file.

//============================================================================
//  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.
//============================================================================
#ifndef vtk_m_worklet_SortAndUniqueIndices_h
#define vtk_m_worklet_SortAndUniqueIndices_h
 
#include <vtkm/cont/Algorithm.h>
#include <vtkm/cont/ArrayHandle.h>
#include <vtkm/cont/ArrayHandleIndex.h>
#include <vtkm/cont/ExecutionObjectBase.h>
 
namespace vtkm
{
namespace worklet
{
 
struct StableSortIndices
{
  using IndexArrayType = vtkm::cont::ArrayHandle<vtkm::Id>;
 
  // Allows Sort to be called on an array that indexes into KeyPortal.
  // If the values compare equal, the indices are compared to stabilize the
  // result.
  template <typename KeyPortalType>
  struct IndirectSortPredicate
  {
    using KeyType = typename KeyPortalType::ValueType;
 
    const KeyPortalType KeyPortal;
 
    VTKM_CONT
    IndirectSortPredicate(const KeyPortalType& keyPortal)
      : KeyPortal(keyPortal)
    {
    }
 
    template <typename IndexType>
    VTKM_EXEC bool operator()(const IndexType& a, const IndexType& b) const
    {
      // If the values compare equal, compare the indices as well so we get
      // consistent outputs.
      const KeyType valueA = this->KeyPortal.Get(a);
      const KeyType valueB = this->KeyPortal.Get(b);
      if (valueA < valueB)
      {
        return true;
      }
      else if (valueB < valueA)
      {
        return false;
      }
      else
      {
        return a < b;
      }
    }
  };
 
  // Allows you to pass an IndirectSortPredicate to a device algorithm without knowing the device.
  template <typename KeyArrayType>
  struct IndirectSortPredicateExecObject : public vtkm::cont::ExecutionObjectBase
  {
    const KeyArrayType KeyArray;
 
    VTKM_CONT IndirectSortPredicateExecObject(const KeyArrayType& keyArray)
      : KeyArray(keyArray)
    {
    }
 
    template <typename Device>
    IndirectSortPredicate<typename KeyArrayType::ReadPortalType> PrepareForExecution(
      Device,
      vtkm::cont::Token& token) const
    {
      auto keyPortal = this->KeyArray.PrepareForInput(Device(), token);
      return IndirectSortPredicate<decltype(keyPortal)>(keyPortal);
    }
  };
 
  // Allows Unique to be called on an array that indexes into KeyPortal.
  template <typename KeyPortalType>
  struct IndirectUniquePredicate
  {
    const KeyPortalType KeyPortal;
 
    VTKM_CONT
    IndirectUniquePredicate(const KeyPortalType& keyPortal)
      : KeyPortal(keyPortal)
    {
    }
 
    template <typename IndexType>
    VTKM_EXEC bool operator()(const IndexType& a, const IndexType& b) const
    {
      return this->KeyPortal.Get(a) == this->KeyPortal.Get(b);
    }
  };
 
  // Allows you to pass an IndirectUniquePredicate to a device algorithm without knowing the device.
  template <typename KeyArrayType>
  struct IndirectUniquePredicateExecObject : public vtkm::cont::ExecutionObjectBase
  {
    const KeyArrayType KeyArray;
 
    VTKM_CONT IndirectUniquePredicateExecObject(const KeyArrayType& keyArray)
      : KeyArray(keyArray)
    {
    }
 
    template <typename Device>
    IndirectUniquePredicate<typename KeyArrayType::ReadPortalType> PrepareForExecution(
      Device,
      vtkm::cont::Token& token) const
    {
      auto keyPortal = this->KeyArray.PrepareForInput(Device(), token);
      return IndirectUniquePredicate<decltype(keyPortal)>(keyPortal);
    }
  };
 
  template <typename KeyType, typename Storage>
  VTKM_CONT static void Sort(vtkm::cont::DeviceAdapterId device,
                             const vtkm::cont::ArrayHandle<KeyType, Storage>& keys,
                             IndexArrayType& indices)
  {
    using KeyArrayType = vtkm::cont::ArrayHandle<KeyType, Storage>;
    using SortPredicate = IndirectSortPredicateExecObject<KeyArrayType>;
 
    VTKM_ASSERT(keys.GetNumberOfValues() == indices.GetNumberOfValues());
 
    vtkm::cont::Algorithm::Sort(device, indices, SortPredicate(keys));
  }
 
  template <typename KeyType, typename Storage>
  VTKM_CONT static void Sort(const vtkm::cont::ArrayHandle<KeyType, Storage>& keys,
                             IndexArrayType& indices)
  {
    StableSortIndices::Sort(vtkm::cont::DeviceAdapterTagAny(), keys, indices);
  }
 
  template <typename KeyType, typename Storage>
  VTKM_CONT static IndexArrayType Sort(vtkm::cont::DeviceAdapterId device,
                                       const vtkm::cont::ArrayHandle<KeyType, Storage>& keys)
  {
    // Generate the initial index array
    IndexArrayType indices;
    {
      vtkm::cont::ArrayHandleIndex indicesSrc(keys.GetNumberOfValues());
      vtkm::cont::Algorithm::Copy(device, indicesSrc, indices);
    }
 
    StableSortIndices::Sort(device, keys, indices);
 
    return indices;
  }
 
  template <typename KeyType, typename Storage>
  VTKM_CONT static IndexArrayType Sort(const vtkm::cont::ArrayHandle<KeyType, Storage>& keys)
  {
    return StableSortIndices::Sort(vtkm::cont::DeviceAdapterTagAny(), keys);
  }
 
  template <typename KeyType, typename Storage>
  VTKM_CONT static void Unique(vtkm::cont::DeviceAdapterId device,
                               const vtkm::cont::ArrayHandle<KeyType, Storage>& keys,
                               IndexArrayType& indices)
  {
    using KeyArrayType = vtkm::cont::ArrayHandle<KeyType, Storage>;
    using UniquePredicate = IndirectUniquePredicateExecObject<KeyArrayType>;
 
    vtkm::cont::Algorithm::Unique(device, indices, UniquePredicate(keys));
  }
 
  template <typename KeyType, typename Storage>
  VTKM_CONT static void Unique(const vtkm::cont::ArrayHandle<KeyType, Storage>& keys,
                               IndexArrayType& indices)
  {
    StableSortIndices::Unique(vtkm::cont::DeviceAdapterTagAny(), keys, indices);
  }
};
}
} // end namespace vtkm::worklet
 
#endif // vtk_m_worklet_SortAndUniqueIndices_h