Add 'projects/rocprofiler-sdk/' from commit 'bf0fad1d5406fbc51403ba1aa9621a9d4a9bce2b'

git-subtree-dir: projects/rocprofiler-sdk git-subtree-mainline: 50a90550e9 git-subtree-split: bf0fad1d54
2025-07-22 22:52:46 +00:00
parent 50a90550e9 bf0fad1d54
commit ad0fb25ed5
1272 changed files with 230117 additions and 0 deletions
@@ -0,0 +1,57 @@
+#
+#
+#
+cmake_minimum_required(VERSION 3.21.0 FATAL_ERROR)
+
+if(NOT CMAKE_HIP_COMPILER)
+    find_program(
+        amdclangpp_EXECUTABLE
+        NAMES amdclang++
+        HINTS ${ROCM_PATH} ENV ROCM_PATH /opt/rocm
+        PATHS ${ROCM_PATH} ENV ROCM_PATH /opt/rocm
+        PATH_SUFFIXES bin llvm/bin NO_CACHE)
+    mark_as_advanced(amdclangpp_EXECUTABLE)
+
+    if(amdclangpp_EXECUTABLE)
+        set(CMAKE_HIP_COMPILER "${amdclangpp_EXECUTABLE}")
+    endif()
+endif()
+
+project(rocprofiler-sdk-samples-code-object-isa-decode LANGUAGES CXX HIP)
+
+foreach(_TYPE DEBUG MINSIZEREL RELEASE RELWITHDEBINFO)
+    if("${CMAKE_HIP_FLAGS_${_TYPE}}" STREQUAL "")
+        set(CMAKE_HIP_FLAGS_${_TYPE} "${CMAKE_CXX_FLAGS_${_TYPE}}")
+    endif()
+endforeach()
+
+find_package(rocprofiler-sdk REQUIRED)
+find_package(
+    amd_comgr
+    REQUIRED
+    CONFIG
+    HINTS
+    ${rocm_version_DIR}
+    ${ROCM_PATH}
+    PATHS
+    ${rocm_version_DIR}
+    ${ROCM_PATH})
+
+set_source_files_properties(main.cpp PROPERTIES LANGUAGE HIP)
+set_source_files_properties(main.cpp PROPERTIES COMPILE_FLAGS "-g")
+
+add_executable(code-object-isa-decode)
+target_sources(code-object-isa-decode PRIVATE main.cpp client.cpp)
+target_link_libraries(
+    code-object-isa-decode
+    PRIVATE rocprofiler-sdk::samples-common-library rocprofiler-sdk::rocprofiler-sdk
+            amd_comgr rocprofiler-sdk::samples-build-flags)
+
+rocprofiler_samples_get_preload_env(PRELOAD_ENV)
+
+add_test(NAME code-object-isa-decode COMMAND $<TARGET_FILE:code-object-isa-decode>)
+
+set_tests_properties(
+    code-object-isa-decode
+    PROPERTIES TIMEOUT 45 LABELS "samples" ENVIRONMENT "${PRELOAD_ENV}"
+               FAIL_REGULAR_EXPRESSION "threw an exception")
@@ -0,0 +1,13 @@
+# CodeObject tracing
+
+## Services
+
+- code object tracing.
+  
+## Properties
+
+- This tool hooks into ROCProfiler's callback and buffer tracing mechanisms to:
+  - Decode and analyze GPU code objects.
+  - Three kernel variants are used in sample; simple transpose, in-place LDS swap and LDS no bank conflicts.
+  - Trace kernel symbols and instructions.
+  - Log disassembly and statistics for debugging or performance analysis.
@@ -0,0 +1,272 @@
+// MIT License
+//
+// Copyright (c) 2023-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.
+//
+// undefine NDEBUG so asserts are implemented
+#ifdef NDEBUG
+#    undef NDEBUG
+#endif
+
+#define OUTPUT_OFSTREAM "code_obj_isa_decode.log"
+
+/**
+ * @file samples/code_object_isa_decode/client.cpp
+ *
+ * @brief Example rocprofiler client (tool)
+ */
+
+#include <rocprofiler-sdk/registration.h>
+#include <rocprofiler-sdk/rocprofiler.h>
+#include <rocprofiler-sdk/cxx/codeobj/code_printing.hpp>
+
+#include "common/defines.hpp"
+#include "common/filesystem.hpp"
+
+#include <cxxabi.h>
+#include <atomic>
+#include <cassert>
+#include <chrono>
+#include <cstddef>
+#include <cstdint>
+#include <cstdio>
+#include <cstdlib>
+#include <fstream>
+#include <functional>
+#include <iomanip>
+#include <iostream>
+#include <map>
+#include <mutex>
+#include <regex>
+#include <string>
+#include <string_view>
+#include <thread>
+#include <vector>
+
+constexpr bool COPY_MEMORY_CODEOBJ = true;
+
+namespace client
+{
+std::ostream&
+output_stream()
+{
+    static std::ofstream file(OUTPUT_OFSTREAM);
+
+    static bool file_is_open_check = [&]() {
+        if(!file.is_open())
+            std::cout << "Could not open log file: " << OUTPUT_OFSTREAM << ", writing to stdout\n";
+        else
+            std::cout << "Writing code-object-isa-decode log to: " << OUTPUT_OFSTREAM << std::endl;
+        return file.is_open();
+    }();
+
+    if(!file_is_open_check) return std::cout;
+    return file;
+};
+
+namespace
+{
+using code_obj_load_data_t = rocprofiler_callback_tracing_code_object_load_data_t;
+using kernel_symbol_data_t = rocprofiler_callback_tracing_code_object_kernel_symbol_register_data_t;
+using kernel_symbol_map_t  = std::unordered_map<std::string, std::pair<uint64_t, size_t>>;
+
+using Instruction             = rocprofiler::sdk::codeobj::disassembly::Instruction;
+using CodeobjAddressTranslate = rocprofiler::sdk::codeobj::disassembly::CodeobjAddressTranslate;
+
+rocprofiler_client_id_t*      client_id          = nullptr;
+rocprofiler_client_finalize_t client_fini_func   = nullptr;
+rocprofiler_context_id_t      client_ctx         = {0};
+kernel_symbol_map_t           registered_kernels = {};
+
+CodeobjAddressTranslate codeobjTranslate;
+
+void
+tool_codeobj_tracing_callback(rocprofiler_callback_tracing_record_t record,
+                              rocprofiler_user_data_t*              user_data,
+                              void*                                 callback_data)
+{
+    if(record.kind != ROCPROFILER_CALLBACK_TRACING_CODE_OBJECT) return;
+    if(record.phase != ROCPROFILER_CALLBACK_PHASE_LOAD) return;
+
+    if(record.operation == ROCPROFILER_CODE_OBJECT_LOAD)
+    {
+        auto* data = static_cast<code_obj_load_data_t*>(record.payload);
+
+        if(std::string_view(data->uri).find("file:///") == 0)
+        {
+            codeobjTranslate.addDecoder(
+                data->uri, data->code_object_id, data->load_delta, data->load_size);
+        }
+        else if(COPY_MEMORY_CODEOBJ)
+        {
+            codeobjTranslate.addDecoder(reinterpret_cast<const void*>(data->memory_base),
+                                        data->memory_size,
+                                        data->code_object_id,
+                                        data->load_delta,
+                                        data->load_size);
+        }
+        else
+        {
+            return;
+        }
+
+        auto symbolmap = codeobjTranslate.getSymbolMap();
+        for(auto& [vaddr, symbol] : symbolmap)
+            registered_kernels.insert({symbol.name, {vaddr, vaddr + symbol.mem_size}});
+    }
+    else if(record.operation == ROCPROFILER_CODE_OBJECT_DEVICE_KERNEL_SYMBOL_REGISTER)
+    {
+        output_stream() << std::hex;
+        auto* data        = static_cast<kernel_symbol_data_t*>(record.payload);
+        auto  kernel_name = std::regex_replace(data->kernel_name, std::regex{"(\\.kd)$"}, "");
+
+        if(registered_kernels.find(kernel_name) == registered_kernels.end())
+        {
+            output_stream() << "Not Found: " << kernel_name << " in codeobj." << std::endl;
+            return;
+        }
+
+        auto& begin_end = registered_kernels.at(kernel_name);
+
+        output_stream() << std::hex << "Found: " << kernel_name << " at addr: 0x" << begin_end.first
+                        << std::dec << ". Printing first 64 bytes:" << std::endl;
+
+        std::unordered_set<std::string> references{};
+
+        int num_waitcnts = 0;
+        int num_scalar   = 0;
+        int num_vector   = 0;
+        int num_other    = 0;
+
+        size_t vaddr = begin_end.first;
+        while(vaddr < begin_end.second)
+        {
+            auto inst = codeobjTranslate.get(vaddr);
+            assert(inst != nullptr);
+            if(inst->comment.size())
+            {
+                std::string_view source = inst->comment;
+                if(source.rfind('/') < source.size()) source = source.substr(source.rfind('/'));
+                if(vaddr < begin_end.first + 64) output_stream() << '\t' << inst->inst << '\n';
+
+                if(source.rfind(':') < source.size()) source = source.substr(0, source.rfind(':'));
+
+                references.insert(std::string(source));
+            }
+            if(inst->inst.find("v_") == 0)
+                num_vector++;
+            else if(inst->inst.find("s_waitcnt") == 0)
+                num_waitcnts++;
+            else if(inst->inst.find("s_") == 0)
+                num_scalar++;
+            else
+                num_other++;
+
+            vaddr += inst->size;
+        }
+
+        output_stream() << "  --- Num Scalar: " << num_scalar
+                        << "\n  --- Num Vector: " << num_vector
+                        << "\n  --- Num Waitcnts: " << num_waitcnts
+                        << "\n  --- Other instructions: " << num_other
+                        << "\nKernel has source references to: " << std::endl;
+        for(auto& ref : references)
+            output_stream() << '\t' << ref << std::endl;
+    }
+
+    (void) user_data;
+    (void) callback_data;
+}
+
+int
+tool_init(rocprofiler_client_finalize_t fini_func, void* tool_data)
+{
+    client_fini_func = fini_func;
+
+    ROCPROFILER_CALL(rocprofiler_create_context(&client_ctx), "context creation");
+
+    ROCPROFILER_CALL(
+        rocprofiler_configure_callback_tracing_service(client_ctx,
+                                                       ROCPROFILER_CALLBACK_TRACING_CODE_OBJECT,
+                                                       nullptr,
+                                                       0,
+                                                       tool_codeobj_tracing_callback,
+                                                       tool_data),
+        "code object tracing service configure");
+
+    int valid_ctx = 0;
+    ROCPROFILER_CALL(rocprofiler_context_is_valid(client_ctx, &valid_ctx),
+                     "context validity check");
+    if(valid_ctx == 0)
+    {
+        // notify rocprofiler that initialization failed
+        // and all the contexts, buffers, etc. created
+        // should be ignored
+        return -1;
+    }
+
+    ROCPROFILER_CALL(rocprofiler_start_context(client_ctx), "context start");
+
+    // no errors
+    return 0;
+}
+
+void
+tool_fini(void* /* tool_data */)
+{}
+
+}  // namespace
+
+}  // namespace client
+
+extern "C" rocprofiler_tool_configure_result_t*
+rocprofiler_configure(uint32_t                 version,
+                      const char*              runtime_version,
+                      uint32_t                 priority,
+                      rocprofiler_client_id_t* id)
+{
+    // set the client name
+    id->name = "ExampleTool";
+
+    // store client info
+    client::client_id = id;
+
+    // compute major/minor/patch version info
+    uint32_t major = version / 10000;
+    uint32_t minor = (version % 10000) / 100;
+    uint32_t patch = version % 100;
+
+    // generate info string
+    auto info = std::stringstream{};
+    info << id->name << " (priority=" << priority << ") is using rocprofiler-sdk v" << major << "."
+         << minor << "." << patch << " (" << runtime_version << ")";
+
+    std::clog << info.str() << std::endl;
+
+    // create configure data
+    static auto cfg =
+        rocprofiler_tool_configure_result_t{sizeof(rocprofiler_tool_configure_result_t),
+                                            &client::tool_init,
+                                            &client::tool_fini,
+                                            nullptr};
+
+    // return pointer to configure data
+    return &cfg;
+}
@@ -0,0 +1,249 @@
+// MIT License
+//
+// Copyright (c) 2024-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.
+
+#include "hip/hip_runtime.h"
+
+#include <cassert>
+#include <cstdio>
+#include <cstdlib>
+#include <iomanip>
+#include <iostream>
+#include <memory>
+#include <mutex>
+#include <random>
+#include <stdexcept>
+#include <vector>
+#include "transpose_kernels.hpp"
+
+#define PRINT_ALIGN 36
+
+namespace
+{
+using lock_guard_t = std::lock_guard<std::mutex>;
+auto print_lock    = std::mutex{};
+}  // namespace
+
+enum TransposeType
+{
+    TRANSPOSE_NAIVE,
+    TRANSPOSE_INPLACE_LDS,
+    TRANSPOSE_NO_BANK_CONFLICTS
+};
+
+class ITranspose
+{
+public:
+    virtual void run(TransposeType ttype, int numThreadsY, int num_iter) = 0;
+    virtual ~ITranspose(){};
+};
+
+template <typename T>
+class Transpose : public ITranspose
+{
+public:
+    Transpose(int dev, size_t _M)
+    : devID(dev)
+    , M(_M)
+    , databytes(_M * _M * sizeof(T))
+    {
+        HIP_API_CALL(hipSetDevice(devID));
+        HIP_API_CALL(hipStreamCreate(&stream));
+
+        std::default_random_engine         _engine{std::random_device{}() * rand()};
+        std::uniform_int_distribution<int> _dist{0, 1000};
+
+        inp_matrix = new T[M * M];
+        out_matrix = new T[M * M];
+
+        for(size_t i = 0; i < M * M; i++)
+            inp_matrix[i] = static_cast<T>(_dist(_engine));
+        memset(out_matrix, 0, databytes);
+
+        HIP_API_CALL(hipMalloc(&in, databytes));
+        HIP_API_CALL(hipMalloc(&out, databytes));
+        HIP_API_CALL(hipMemsetAsync(in, 0, databytes, stream));
+        HIP_API_CALL(hipMemsetAsync(out, 0, databytes, stream));
+        HIP_API_CALL(hipMemcpyAsync(in, inp_matrix, databytes, hipMemcpyDefault, stream));
+
+        HIP_API_CALL(hipEventCreate(&start));
+        HIP_API_CALL(hipEventCreate(&stop));
+    }
+
+    void run(TransposeType ttype, int numThreadsY, int num_iter) override
+    {
+        HIP_API_CALL(hipSetDevice(devID));
+        dim3 grid(M / TILE_DIM, M / TILE_DIM, 1);
+        dim3 block(TILE_DIM, numThreadsY, 1);
+
+        auto        Kernel     = transposeNaive<T>;
+        std::string KernelName = "transposeNaive";
+        if(ttype == TransposeType::TRANSPOSE_NO_BANK_CONFLICTS)
+        {
+            Kernel     = transposeLdsNoBankConflicts<T>;
+            KernelName = "transposeLdsNoBankConflicts";
+        }
+        else if(ttype == TransposeType::TRANSPOSE_INPLACE_LDS)
+        {
+            Kernel     = transposeLdsSwapInplace<T>;
+            KernelName = "transposeLdsSwapInplace";
+        }
+
+        {
+            std::string functypeid = __PRETTY_FUNCTION__;
+            auto        it_beg     = functypeid.rfind("[T = ");
+            auto        it_end     = functypeid.rfind(']');
+
+            if(it_beg != std::string::npos) it_beg += std::string("[T = ").size();
+
+            if(it_beg < it_end && it_end != std::string::npos)
+                KernelName += '<' + functypeid.substr(it_beg, it_end - it_beg) + '>';
+        }
+
+        HIP_API_CALL(hipStreamSynchronize(stream));
+        HIP_API_CALL(hipEventRecord(start, stream));
+
+        for(int i = 0; i < num_iter; i++)
+        {
+            Kernel<<<grid, block, 0, stream>>>(out, in, M);
+            HIP_API_CALL(hipGetLastError());
+        }
+
+        HIP_API_CALL(hipEventRecord(stop, stream));
+        HIP_API_CALL(hipMemcpyAsync(out_matrix, out, databytes, hipMemcpyDefault, stream));
+        HIP_API_CALL(hipEventSynchronize(stop));
+
+        float time;
+        HIP_API_CALL(hipEventElapsedTime(&time, start, stop));
+        float GB = databytes * num_iter * 2 / float(1 << 30);
+
+        {
+            lock_guard_t _lk{print_lock};
+            std::cout << "The average performance of " << std::setw(38) << KernelName << " : "
+                      << (1000 * GB / time) << " GB/s" << std::endl;
+        }
+
+        verify();
+    }
+
+    void verify() const
+    {
+        HIP_API_CALL(hipStreamSynchronize(stream));
+        for(int i = 0; i < 10; i++)
+        {
+            int row = rand() % M;
+            int col = rand() % M;
+            if(inp_matrix[row * M + col] != out_matrix[col * M + row])
+            {
+                lock_guard_t _lk{print_lock};
+                std::cout << "mismatch: " << row << ", " << col << " : "
+                          << inp_matrix[row * M + col] << " | " << out_matrix[col * M + row]
+                          << std::endl;
+            }
+        }
+    }
+
+    virtual ~Transpose()
+    {
+        HIP_API_CALL(hipSetDevice(devID));
+        HIP_API_CALL(hipEventDestroy(start));
+        HIP_API_CALL(hipEventDestroy(stop));
+
+        HIP_API_CALL(hipFree(in));
+        HIP_API_CALL(hipFree(out));
+        HIP_API_CALL(hipStreamDestroy(stream));
+
+        delete[] inp_matrix;
+        delete[] out_matrix;
+    }
+
+    const int    devID;
+    const size_t M;
+    const size_t databytes;
+
+    hipStream_t stream;
+    hipEvent_t  start, stop;
+
+    T* inp_matrix = nullptr;
+    T* out_matrix = nullptr;
+
+    T* in  = nullptr;
+    T* out = nullptr;
+};
+
+int
+main(int argc, char** argv)
+{
+    int deviceId  = 0;
+    int blockDimY = 8;
+    int num_iter  = 3;
+    int mat_size  = 8192;
+
+    for(int i = 1; i < argc; ++i)
+    {
+        auto _arg = std::string{argv[i]};
+        if(_arg == "?" || _arg == "-h" || _arg == "--help")
+        {
+            std::cout << "usage: transpose "
+                      << "[MatrixSize (" << mat_size << ")] "
+                      << "[numIter (" << num_iter << ")] "
+                      << "[blockDimY (" << blockDimY << ")] "
+                      << "[DEVICE_ID (" << deviceId << ")] " << std::endl;
+            exit(EXIT_SUCCESS);
+        }
+    }
+    if(argc > 1) mat_size = atoll(argv[1]);
+    if(argc > 2) num_iter = atoll(argv[2]);
+    if(argc > 3) blockDimY = atoll(argv[3]);
+    if(argc > 4) deviceId = atoll(argv[4]);
+
+    printf("[transpose] Matrix size: %d, device ID: %d, num iter: %d, blockDimY: %d\n",
+           mat_size,
+           deviceId,
+           num_iter,
+           blockDimY);
+
+    int ndevice = 0;
+    HIP_API_CALL(hipGetDeviceCount(&ndevice));
+    printf("[transpose] Number of devices found: %i\n", ndevice);
+    assert(ndevice > 0);
+
+    if(deviceId >= ndevice) exit(EXIT_FAILURE);
+
+    {
+        std::vector<std::unique_ptr<ITranspose>> kernels;
+        kernels.push_back(std::make_unique<Transpose<int>>(deviceId, mat_size));
+        kernels.push_back(std::make_unique<Transpose<float>>(deviceId, mat_size));
+        kernels.push_back(std::make_unique<Transpose<double>>(deviceId, mat_size));
+
+        for(auto& kernel : kernels)
+        {
+            kernel->run(TransposeType::TRANSPOSE_NAIVE, blockDimY, num_iter);
+            kernel->run(TransposeType::TRANSPOSE_INPLACE_LDS, blockDimY, num_iter);
+            kernel->run(TransposeType::TRANSPOSE_NO_BANK_CONFLICTS, blockDimY, num_iter);
+        }
+    }
+
+    HIP_API_CALL(hipDeviceSynchronize());
+    HIP_API_CALL(hipDeviceReset());
+
+    return 0;
+}
@@ -0,0 +1,106 @@
+// MIT License
+//
+// Copyright (c) 2024-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 "hip/hip_runtime.h"
+
+#define HIP_API_CALL(CALL)                                                                         \
+    {                                                                                              \
+        hipError_t error_ = (CALL);                                                                \
+        if(error_ != hipSuccess)                                                                   \
+        {                                                                                          \
+            lock_guard_t _hip_api_print_lk{print_lock};                                            \
+            fprintf(stderr,                                                                        \
+                    "%s:%d :: HIP error : %s\n",                                                   \
+                    __FILE__,                                                                      \
+                    __LINE__,                                                                      \
+                    hipGetErrorString(error_));                                                    \
+            exit(EXIT_FAILURE);                                                                    \
+        }                                                                                          \
+    }
+
+#define TILE_DIM 64
+
+template <typename T>
+__global__ void
+transposeNaive(T* odata, const T* idata, size_t size)
+{
+    size_t idx        = blockIdx.x * TILE_DIM + threadIdx.x;
+    size_t block_posy = blockIdx.y * TILE_DIM;
+
+    for(size_t idy = threadIdx.y; idy < TILE_DIM; idy += blockDim.y)
+        odata[size * idx + block_posy + idy] = idata[idx + (block_posy + idy) * size];
+}
+
+template <typename T>
+__global__ void
+transposeLdsNoBankConflicts(T* odata, const T* idata, size_t size)
+{
+    __shared__ T tile[TILE_DIM][TILE_DIM + 1];
+
+    size_t idx_in   = blockIdx.x * TILE_DIM + threadIdx.x;
+    size_t idy_in   = blockIdx.y * TILE_DIM + threadIdx.y;
+    size_t index_in = idx_in + idy_in * size;
+
+    size_t idx_out   = blockIdx.y * TILE_DIM + threadIdx.x;
+    size_t idy_out   = blockIdx.x * TILE_DIM + threadIdx.y;
+    size_t index_out = idx_out + idy_out * size;
+
+    for(size_t y = 0; y < TILE_DIM; y += blockDim.y)
+        tile[threadIdx.y + y][threadIdx.x] = idata[index_in + y * size];
+
+    __syncthreads();
+
+    for(size_t y = 0; y < TILE_DIM; y += blockDim.y)
+        odata[index_out + y * size] = tile[threadIdx.x][threadIdx.y + y];
+}
+
+// Generates more interesting ISA
+template <typename T>
+__global__ void
+transposeLdsSwapInplace(T* odata, const T* idata, size_t size)
+{
+    __shared__ T tile[TILE_DIM][TILE_DIM];
+
+    const size_t idx_in = blockIdx.x * TILE_DIM + threadIdx.x;
+
+    for(size_t idy = threadIdx.y; idy < TILE_DIM; idy += blockDim.y)
+        tile[idy][threadIdx.x] = idata[idx_in + (idy + blockIdx.y * TILE_DIM) * size];
+
+    __syncthreads();
+
+    for(size_t idy = threadIdx.y; idy < TILE_DIM; idy += blockDim.y)
+        if(idy < threadIdx.x)
+        {
+            T temp                 = tile[idy][threadIdx.x];
+            tile[idy][threadIdx.x] = tile[threadIdx.x][idy];
+            tile[threadIdx.x][idy] = temp;
+        }
+
+    __syncthreads();
+
+    const size_t idx_out = blockIdx.y * TILE_DIM + threadIdx.x;
+
+    for(size_t idy = threadIdx.y; idy < TILE_DIM; idy += blockDim.y)
+        odata[(blockIdx.x * TILE_DIM + idy) * size + idx_out] = tile[idy][threadIdx.x];
+}