// MIT License // // Copyright (c) 2022-2025 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. #pragma once #include "core/common.hpp" #include "core/defines.hpp" #include "core/mpi.hpp" #include "core/timemory.hpp" #include namespace rocprofsys { namespace component { // this is used to wrap MPI_Init and MPI_Init_thread struct mpi_gotcha : comp::base { using comm_t = rocprofsys::mpi::comm_t; using gotcha_data_t = comp::gotcha_data; ROCPROFSYS_DEFAULT_OBJECT(mpi_gotcha) // string id for component static std::string label() { return "mpi_gotcha"; } // generate the gotcha wrappers static void configure(); static void shutdown(); // called right before MPI_Init with that functions arguments static void audit(const gotcha_data_t& _data, audit::incoming, int*, char***); // called right before MPI_Init_thread with that functions arguments static void audit(const gotcha_data_t& _data, audit::incoming, int*, char***, int, int*); // called right before MPI_Finalize static void audit(const gotcha_data_t& _data, audit::incoming); // called right before MPI_Comm_{rank,size} with that functions arguments void audit(const gotcha_data_t& _data, audit::incoming, comm_t, int*); // called right after MPI_{Init,Init_thread,Comm_rank,Comm_size} with the return value void audit(const gotcha_data_t& _data, audit::outgoing, int _retval); // without these you will get a verbosity level 1 warning static void start() {} static void stop() {} static bool update(); static uintptr_t null_comm() { return std::numeric_limits::max(); } static void disable_comm_intercept(); private: int m_rank = 0; int m_size = 1; int* m_rank_ptr = nullptr; int* m_size_ptr = nullptr; uintptr_t m_comm_val = null_comm(); }; } // namespace component using mpi_gotcha_t = comp::gotcha<10, tim::component_tuple, project::rocprofsys>; } // namespace rocprofsys