Transfer files from RAD repository

[ROCm/rocshmem commit: ea8f264a11]

projects/rocshmem/src/mpi_init_singleton.hpp

@@ -0,0 +1,96 @@
+/******************************************************************************
+ * Copyright (c) 2024 Advanced Micro Devices, Inc. All rights reserved.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to
+ * deal in the Software without restriction, including without limitation the
+ * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
+ * sell copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+ * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
+ * IN THE SOFTWARE.
+ *****************************************************************************/
+
+#ifndef LIBRARY_SRC_MPI_INIT_SINGLETON_HPP_
+#define LIBRARY_SRC_MPI_INIT_SINGLETON_HPP_
+
+#include <mpi.h>
+
+#include <memory>
+
+/**
+ * @file mpi_init_singleton.hpp
+ *
+ * @brief Contains MPI library initialization code
+ */
+
+namespace rocshmem {
+
+class MPIInitSingleton {
+ private:
+  /**
+   * @brief Primary constructor
+   */
+  MPIInitSingleton();
+
+ public:
+  /**
+   * @brief Destructor
+   */
+  ~MPIInitSingleton();
+
+  /**
+   * @brief Invoke singleton construction or return handle
+   *
+   * @return Initialized handle to singleton
+   */
+  static MPIInitSingleton* GetInstance();
+
+  /**
+   * @brief Accessor for my COMM_WORLD rank identifier
+   *
+   * @return My COMM_WORLD rank identifier
+   */
+  int get_rank();
+
+  /**
+   * @brief Accessor for number or processes in COMM_WORLD
+   *
+   * @return Number of processes in COMM_WORLD
+   */
+  int get_nprocs();
+
+ private:
+  /**
+   * @brief My MPI rank identifier
+   */
+  int my_rank_{-1};
+
+  /**
+   * @brief Number of MPI processes
+   */
+  int nprocs_{-1};
+
+  /**
+   * @brief Was MPI initialized before ROCSHMEM_init call
+   */
+  int pre_init_done{0};
+
+  /**
+   * @brief Refers to global variable
+   */
+  static MPIInitSingleton* instance;
+};
+
+}  // namespace rocshmem
+
+#endif  // LIBRARY_SRC_MPI_INIT_SINGLETON_HPP_