// SPDX-License-Identifier: MIT
// Copyright (c) 2018-2022, Advanced Micro Devices, Inc. All rights reserved.

#include <iostream>
#include <numeric>
#include <initializer_list>
#include <cstdlib>

#include "profiler/profile_gemm_add_relu_add_layernorm_impl.hpp"
#include "profiler_operation_registry.hpp"

#define OP_NAME "gemm_add_relu_add_layernorm"
#define OP_DESC "GEMM+Add+Relu+Add+Layernorm"

int profile_gemm_add_relu_add_layernorm(int argc, char* argv[])
{
    enum struct MatrixLayout
    {
        MK_KN_MN_MN_MN, // 0
        MK_NK_MN_MN_MN, // 1
        KM_KN_MN_MN_MN, // 2
        KM_NK_MN_MN_MN, // 3
    };

    enum struct MatrixDataType
    {
        F32,  // 0
        F16,  // 1
        BF16, // 2
    };

    if(argc != 16)
    {
        // clang-format off
        printf("arg1: tensor operation (" OP_NAME ": " OP_DESC ")\n");
        printf("arg2: data type (0: fp32; 1: fp16; 2: bf16)\n");
        printf("arg3: matrix layout (0: H[m, n] = Layernorm(Relu(A[m, k] * B[k, n] + D0[m, n]) + D1[m, n]);\n");
        printf("                     1: H[m, n] = Layernorm(Relu(A[m, k] * B[n, k] + D0[m, n]) + D1[m, n]);\n");
        printf("                     2: H[m, n] = Layernorm(Relu(A[k, m] * B[k, n] + D0[m, n]) + D1[m, n]);\n");
        printf("                     3: H[m, n] = Layernorm(Relu(A[k, m] * B[n, k] + D0[m, n]) + D1[m, n]))\n");
        printf("arg4: verification (0: no; 1: yes)\n");
        printf("arg5: initialization (0: no init; 1: decimal value)\n");
        printf("arg6: print tensor value (0: no; 1: yes)\n");
        printf("arg7: time kernel (0=no, 1=yes)\n");
        printf("arg8 to 15: M, N, K, StrideA, StrideB, StrideD0, StrideD1, StrideH\n");
        // clang-format on
        exit(1);
    }

    const auto data_type       = static_cast<MatrixDataType>(std::stoi(argv[2]));
    const auto layout          = static_cast<MatrixLayout>(std::stoi(argv[3]));
    const bool do_verification = std::stoi(argv[4]);
    const int init_method      = std::stoi(argv[5]);
    const bool do_log          = std::stoi(argv[6]);
    const bool time_kernel     = std::stoi(argv[7]);

    const int M = std::stoi(argv[8]);
    const int N = std::stoi(argv[9]);
    const int K = std::stoi(argv[10]);

    const int StrideA  = std::stoi(argv[11]);
    const int StrideB  = std::stoi(argv[12]);
    const int StrideD0 = std::stoi(argv[13]);
    const int StrideD1 = std::stoi(argv[14]);
    const int StrideH  = std::stoi(argv[15]);

    using F16 = ck::half_t;
    using F32 = float;

    using Row = ck::tensor_layout::gemm::RowMajor;
    using Col = ck::tensor_layout::gemm::ColumnMajor;

    auto profile = [&](auto a_type,
                       auto b_type,
                       auto acc_type,
                       auto d0_type,
                       auto d1_type,
                       auto e_mean_var_type,
                       auto gamma_type,
                       auto beta_type,
                       auto h_type,
                       auto a_layout,
                       auto b_layout,
                       auto d0_layout,
                       auto d1_layout,
                       auto h_layout) {
        using ADataType        = decltype(a_type);
        using BDataType        = decltype(b_type);
        using AccDataType      = decltype(acc_type);
        using D0DataType       = decltype(d0_type);
        using D1DataType       = decltype(d1_type);
        using EMeanVarDataType = decltype(e_mean_var_type);
        using GammaDataType    = decltype(gamma_type);
        using BetaDataType     = decltype(beta_type);
        using HDataType        = decltype(h_type);

        using ALayout  = decltype(a_layout);
        using BLayout  = decltype(b_layout);
        using D0Layout = decltype(d0_layout);
        using D1Layout = decltype(d1_layout);
        using HLayout  = decltype(h_layout);

        const int DefaultStrideA  = ck::is_same_v<ALayout, Row> ? K : M;
        const int DefaultStrideB  = ck::is_same_v<BLayout, Row> ? N : K;
        const int DefaultStrideD0 = ck::is_same_v<D0Layout, Row> ? N : M;
        const int DefaultStrideD1 = ck::is_same_v<D1Layout, Row> ? N : M;
        const int DefaultStrideH  = ck::is_same_v<HLayout, Row> ? N : M;

        bool pass = ck::profiler::profile_gemm_add_relu_add_layernorm_impl<ADataType,
                                                                           BDataType,
                                                                           AccDataType,
                                                                           D0DataType,
                                                                           D1DataType,
                                                                           EMeanVarDataType,
                                                                           GammaDataType,
                                                                           BetaDataType,
                                                                           HDataType,
                                                                           ALayout,
                                                                           BLayout,
                                                                           D0Layout,
                                                                           D1Layout,
                                                                           HLayout>(
            do_verification,
            init_method,
            do_log,
            time_kernel,
            M,
            N,
            K,
            (StrideA < 0) ? DefaultStrideA : StrideA,
            (StrideB < 0) ? DefaultStrideB : StrideB,
            (StrideD0 < 0) ? DefaultStrideD0 : StrideD0,
            (StrideD1 < 0) ? DefaultStrideD1 : StrideD1,
            (StrideH < 0) ? DefaultStrideH : StrideH);

        return pass ? 0 : 1;
    };

    if(data_type == MatrixDataType::F16 && layout == MatrixLayout::MK_KN_MN_MN_MN)
    {
        return profile(F16{},
                       F16{},
                       F32{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       Row{},
                       Row{},
                       Row{},
                       Row{},
                       Row{});
    }
    else if(data_type == MatrixDataType::F16 && layout == MatrixLayout::MK_NK_MN_MN_MN)
    {
        return profile(F16{},
                       F16{},
                       F32{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       Row{},
                       Col{},
                       Row{},
                       Row{},
                       Row{});
    }
    else if(data_type == MatrixDataType::F16 && layout == MatrixLayout::KM_KN_MN_MN_MN)
    {
        return profile(F16{},
                       F16{},
                       F32{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       Col{},
                       Row{},
                       Row{},
                       Row{},
                       Row{});
    }
    else if(data_type == MatrixDataType::F16 && layout == MatrixLayout::KM_NK_MN_MN_MN)
    {
        return profile(F16{},
                       F16{},
                       F32{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       F16{},
                       Col{},
                       Col{},
                       Row{},
                       Row{},
                       Row{});
    }
    else
    {
        std::cout << "this data_type & layout is not implemented" << std::endl;

        return 1;
    }
}

REGISTER_PROFILER_OPERATION(OP_NAME, OP_DESC, profile_gemm_add_relu_add_layernorm);
