// @HEADER
// *****************************************************************************
//           Galeri: Finite Element and Matrix Generation Package
//
// Copyright 2006 ETHZ/NTESS and the Galeri contributors.
// SPDX-License-Identifier: BSD-3-Clause
// *****************************************************************************
// @HEADER

#ifndef GALERI_MAPTRAITS_HPP
#define GALERI_MAPTRAITS_HPP

#include <Teuchos_RCP.hpp>
#include <Teuchos_Comm.hpp>
#include <Teuchos_ArrayView.hpp>

#include "Galeri_ConfigDefs.h"

#ifdef HAVE_GALERI_TPETRA
#include <Tpetra_Map.hpp>
#endif

#ifdef HAVE_GALERI_XPETRA
#include <Xpetra_MapFactory.hpp>
#include <Xpetra_ConfigDefs.hpp>
#include <Xpetra_Exceptions.hpp>
#include <Xpetra_TpetraMap.hpp>
#endif  // HAVE_GALERI_XPETRA

namespace Galeri {

namespace Xpetra {

typedef size_t global_size_t;

template <typename T>
struct UndefinedMapTraits {
  static inline T notDefined() { return T::this_type_is_missing_a_specialization(); }
};

/* Default traits (not implemented) */
template <class GlobalOrdinal, class Map>
class MapTraits {
 public:
  static Teuchos::RCP<Map> Build(global_size_t numGlobalElements, const Teuchos::ArrayView<const GlobalOrdinal> &elementList, GlobalOrdinal indexBase, const Teuchos::RCP<const Teuchos::Comm<int>> &comm) { return UndefinedMapTraits<Map>::notDefined(); }

  static Teuchos::RCP<Map> Build(global_size_t numGlobalElements, const Kokkos::View<const GlobalOrdinal> &elementList, GlobalOrdinal indexBase, const Teuchos::RCP<const Teuchos::Comm<int>> &comm) { return UndefinedMapTraits<Map>::notDefined(); }

  static Teuchos::RCP<Map> Build(global_size_t numGlobalElements, global_size_t numLocalElements, GlobalOrdinal indexBase, const Teuchos::RCP<const Teuchos::Comm<int>> &comm) { return UndefinedMapTraits<Map>::notDefined(); }
};

#ifdef HAVE_GALERI_TPETRA
/* Specialized traits for Map = Tpetra::Map<...> */
template <class LocalOrdinal, class GlobalOrdinal, class Node>
class MapTraits<GlobalOrdinal, Tpetra::Map<LocalOrdinal, GlobalOrdinal, Node>> {
  using device_type                      = typename Tpetra::Map<LocalOrdinal, GlobalOrdinal, Node>::device_type;
  using global_indices_array_device_type = Kokkos::View<const GlobalOrdinal *, device_type>;

 public:
  static Teuchos::RCP<Tpetra::Map<LocalOrdinal, GlobalOrdinal, Node>> Build(global_size_t numGlobalElements, const Teuchos::ArrayView<const GlobalOrdinal> &elementList, GlobalOrdinal indexBase, const Teuchos::RCP<const Teuchos::Comm<int>> &comm) { return Teuchos::rcp(new Tpetra::Map<LocalOrdinal, GlobalOrdinal, Node>(numGlobalElements, elementList, indexBase, comm)); }

  static Teuchos::RCP<Tpetra::Map<LocalOrdinal, GlobalOrdinal, Node>> Build(global_size_t numGlobalElements, const global_indices_array_device_type &elementList, GlobalOrdinal indexBase, const Teuchos::RCP<const Teuchos::Comm<int>> &comm) { return Teuchos::rcp(new Tpetra::Map<LocalOrdinal, GlobalOrdinal, Node>(numGlobalElements, elementList, indexBase, comm)); }

  static Teuchos::RCP<Tpetra::Map<LocalOrdinal, GlobalOrdinal, Node>> Build(global_size_t numGlobalElements, global_size_t numLocalElements, GlobalOrdinal indexBase, const Teuchos::RCP<const Teuchos::Comm<int>> &comm) { return Teuchos::rcp(new Tpetra::Map<LocalOrdinal, GlobalOrdinal, Node>(numGlobalElements, numLocalElements, indexBase, comm)); }
};
#endif  // HAVE_GALERI_TPETRA

#ifdef HAVE_GALERI_XPETRA
/* Specialized traits for Map = Xpetra::TpetraMap<...> */
template <class LocalOrdinal, class GlobalOrdinal, class Node>
class MapTraits<GlobalOrdinal, ::Xpetra::TpetraMap<LocalOrdinal, GlobalOrdinal, Node>> {
 public:
  static Teuchos::RCP<::Xpetra::TpetraMap<LocalOrdinal, GlobalOrdinal, Node>> Build(global_size_t numGlobalElements, const Teuchos::ArrayView<const GlobalOrdinal> &elementList, GlobalOrdinal indexBase, const Teuchos::RCP<const Teuchos::Comm<int>> &comm) { return Teuchos::rcp(new ::Xpetra::TpetraMap<LocalOrdinal, GlobalOrdinal, Node>(numGlobalElements, elementList, indexBase, comm)); }

  static Teuchos::RCP<::Xpetra::TpetraMap<LocalOrdinal, GlobalOrdinal, Node>> Build(global_size_t numGlobalElements, const typename ::Xpetra::TpetraMap<LocalOrdinal, GlobalOrdinal, Node>::global_indices_array_device_type &elementList, GlobalOrdinal indexBase, const Teuchos::RCP<const Teuchos::Comm<int>> &comm) { return Teuchos::rcp(new ::Xpetra::TpetraMap<LocalOrdinal, GlobalOrdinal, Node>(numGlobalElements, elementList, indexBase, comm)); }

  static Teuchos::RCP<::Xpetra::TpetraMap<LocalOrdinal, GlobalOrdinal, Node>> Build(global_size_t numGlobalElements, global_size_t numLocalElements, GlobalOrdinal indexBase, const Teuchos::RCP<const Teuchos::Comm<int>> &comm) { return Teuchos::rcp(new ::Xpetra::TpetraMap<LocalOrdinal, GlobalOrdinal, Node>(numGlobalElements, numLocalElements, indexBase, comm)); }
};
#endif  // HAVE_GALERI_XPETRA

}  // namespace Xpetra

}  // namespace Galeri

#endif  // GALERI_MAPTRAITS_HPP
