191 lines
7.3 KiB
C++
191 lines
7.3 KiB
C++
/***************************************************************************************************
|
|
* Copyright (c) 2018, NVIDIA CORPORATION. All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without modification, are permitted
|
|
* provided that the following conditions are met:
|
|
* * Redistributions of source code must retain the above copyright notice, this list of
|
|
* conditions and the following disclaimer.
|
|
* * Redistributions in binary form must reproduce the above copyright notice, this list of
|
|
* conditions and the following disclaimer in the documentation and/or other materials
|
|
* provided with the distribution.
|
|
* * Neither the name of the NVIDIA CORPORATION nor the names of its contributors may be used
|
|
* to endorse or promote products derived from this software without specific prior written
|
|
* permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
|
|
* FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL NVIDIA CORPORATION BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
|
|
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
|
|
* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
|
|
* STRICT LIABILITY, OR TOR (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
|
|
* OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
**************************************************************************************************/
|
|
|
|
#define NVRTC_GET_TYPE_NAME 1
|
|
|
|
#include "cutlass/cutlass.h"
|
|
|
|
#include <nvrtc.h>
|
|
#include "tools/nvrtc/cutlass/nvrtc/environment.h"
|
|
#include <string>
|
|
|
|
static inline bool check_nvrtc_error(nvrtcResult error) {
|
|
if (error != NVRTC_SUCCESS) {
|
|
std::cerr << "failed to compile ";
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
/// @param gemm_traits Must be the source string to generate GemmTraits_
|
|
template <typename GemmTraits_>
|
|
static __host__ void run_gemm_nvrtc(
|
|
std::string const &gemm_traits,
|
|
int m,
|
|
int n,
|
|
int k,
|
|
typename test::GemmTestbedTraits<typename GemmTraits_::Epilogue::Scalar>::host_type alpha =
|
|
typename test::GemmTestbedTraits<typename GemmTraits_::Epilogue::Scalar>::host_type(1),
|
|
typename test::GemmTestbedTraits<typename GemmTraits_::Epilogue::Scalar>::host_type beta =
|
|
typename test::GemmTestbedTraits<typename GemmTraits_::Epilogue::Scalar>::host_type(0)) {
|
|
typedef cutlass::gemm::Gemm<GemmTraits_> Gemm;
|
|
typename Gemm::Params params;
|
|
|
|
test::GemmTestbed<
|
|
typename test::GemmTestbedTraits<
|
|
typename GemmTraits_::GemmConfig::ScalarA>::host_type, // AType
|
|
typename test::GemmTestbedTraits<
|
|
typename GemmTraits_::GemmConfig::ScalarB>::host_type, // BType
|
|
typename test::GemmTestbedTraits<
|
|
typename GemmTraits_::Epilogue::ScalarC>::host_type, // CType
|
|
typename test::GemmTestbedTraits<
|
|
typename GemmTraits_::Epilogue::Accumulators::Element>::host_type, // Accumulator
|
|
typename test::GemmTestbedTraits<typename GemmTraits_::Epilogue::Scalar>::host_type // Scalar
|
|
>
|
|
testbed(m,
|
|
n,
|
|
k,
|
|
cutlass::convert(GemmTraits_::kLayoutA),
|
|
cutlass::convert(GemmTraits_::kLayoutB),
|
|
alpha,
|
|
beta);
|
|
|
|
// Instantiate gemm_kernel
|
|
nvrtcResult result_nvrtc;
|
|
nvrtcProgram program;
|
|
static char const *src =
|
|
"#include "cutlass/gemm/gemm.h"\n"
|
|
"#include "cutlass/gemm/sgemm_traits.h"\n"
|
|
"#include "cutlass/gemm/dgemm_traits.h"\n"
|
|
"#include "cutlass/gemm/igemm_traits.h"\n"
|
|
#if defined(CUTLASS_NVRTC_HAS_FP16)
|
|
"#include "cutlass/gemm/hgemm_traits.h"\n"
|
|
"#include "cutlass/gemm/wmma_gemm_traits.h"\n"
|
|
#endif
|
|
;
|
|
|
|
std::string type_name;
|
|
#if 0
|
|
// TODO Ideally we'd use nvrtcGetTypeName to determine the type, but it cannot resolve enum symbol names
|
|
// As altername solution we might want to implement to_string<GemmTraits>() to get the traits string.
|
|
nvrtcGetTypeName<typename GemmTraits_>(&type_name);
|
|
#else
|
|
type_name = gemm_traits;
|
|
#endif
|
|
|
|
result_nvrtc = nvrtcCreateProgram(&program,
|
|
src,
|
|
NULL,
|
|
(int)cutlass::nvrtc::kCutlassHeaderCount,
|
|
cutlass::nvrtc::kCutlassHeaders,
|
|
cutlass::nvrtc::kCutlassHeaderNames);
|
|
check_nvrtc_error(result_nvrtc);
|
|
|
|
std::string gemm_kernel_instantiation =
|
|
"cutlass::gemm::gemm_kernel<cutlass::gemm::Gemm< " + type_name + " > >";
|
|
nvrtcAddNameExpression(program, gemm_kernel_instantiation.c_str());
|
|
|
|
result_nvrtc = nvrtcCompileProgram(program, 0, NULL);
|
|
if (result_nvrtc != NVRTC_SUCCESS) {
|
|
size_t logSize;
|
|
nvrtcGetProgramLogSize(program, &logSize);
|
|
std::vector<char> log(logSize);
|
|
nvrtcGetProgramLog(program, log.data());
|
|
std::cout << "Compile log:" << std::endl << log.data() << std::endl;
|
|
}
|
|
if (!check_nvrtc_error(result_nvrtc)) {
|
|
ASSERT_TRUE(false);
|
|
}
|
|
|
|
// The lowered name is the name of the template instantiation in the generated PTX code.
|
|
char const *gemm_kernel_lowered_name;
|
|
nvrtcGetLoweredName(program, gemm_kernel_instantiation.c_str(), &gemm_kernel_lowered_name);
|
|
if (!check_nvrtc_error(result_nvrtc)) {
|
|
ASSERT_TRUE(false);
|
|
}
|
|
|
|
// Query the size of the genereated PTX so that we can allocate storage and retrieve it afterwards
|
|
size_t ptx_size;
|
|
result_nvrtc = nvrtcGetPTXSize(program, &ptx_size);
|
|
if (!check_nvrtc_error(result_nvrtc)) {
|
|
ASSERT_TRUE(false);
|
|
}
|
|
|
|
std::vector<char> ptx(ptx_size);
|
|
result_nvrtc = nvrtcGetPTX(program, ptx.data());
|
|
if (!check_nvrtc_error(result_nvrtc)) {
|
|
ASSERT_TRUE(false);
|
|
}
|
|
|
|
// we do not need the nvrtc program anymore
|
|
nvrtcDestroyProgram(&program);
|
|
|
|
CUmodule module;
|
|
CUresult result_cuda;
|
|
result_cuda = cuModuleLoadDataEx(&module, ptx.data(), 0, 0, 0);
|
|
if (result_cuda != CUDA_SUCCESS) {
|
|
ASSERT_TRUE(false);
|
|
}
|
|
|
|
CUfunction kernel;
|
|
result_cuda = cuModuleGetFunction(&kernel, module, gemm_kernel_lowered_name);
|
|
if (result_cuda != CUDA_SUCCESS) {
|
|
ASSERT_TRUE(false);
|
|
}
|
|
|
|
testbed.initialize();
|
|
|
|
if (testbed.has_cublas_support()) {
|
|
EXPECT_TRUE(testbed.verify_host_with_cublas());
|
|
}
|
|
|
|
params.initialize(testbed.M(),
|
|
testbed.N(),
|
|
testbed.K(),
|
|
testbed.alpha,
|
|
testbed.ptr_A(),
|
|
testbed.lda(),
|
|
testbed.ptr_B(),
|
|
testbed.ldb(),
|
|
testbed.beta,
|
|
testbed.ptr_C_initial(),
|
|
testbed.ldc(),
|
|
testbed.ptr_computed(),
|
|
testbed.ldc());
|
|
|
|
// Gemm::launch(params);
|
|
Gemm::launch(kernel, params);
|
|
|
|
cudaError_t result = cudaDeviceSynchronize();
|
|
ASSERT_EQ(result, cudaSuccess) << "\nCUDA kernel launch error: " << cudaGetErrorString(result)
|
|
<< "\n";
|
|
|
|
if (testbed.has_cublas_support()) {
|
|
ASSERT_TRUE(testbed.verify_with_cublas());
|
|
} else {
|
|
ASSERT_TRUE(testbed.verify_with_host());
|
|
}
|
|
}
|