// ================================================================================================= // This file is part of the CLBlast project. The project is licensed under Apache Version 2.0. This // project loosely follows the Google C++ styleguide and uses a tab-size of two spaces and a max- // width of 100 characters per line. // // Author(s): // Cedric Nugteren // // This file uses the CLTune auto-tuner to tune the xger OpenCL kernels. // // ================================================================================================= #include #include #include "utilities/utilities.hpp" #include "tuning/tuning.hpp" namespace clblast { // ================================================================================================= // See comment at top of file for a description of the class template class TuneXger { public: // Settings for this kernel (default command-line arguments) static TunerDefaults GetTunerDefaults() { auto settings = TunerDefaults(); settings.options = {kArgM, kArgN, kArgAlpha}; settings.default_m = 1024; settings.default_n = 1024; return settings; } // Settings for this kernel (general) static TunerSettings GetTunerSettings(const Arguments &args) { auto settings = TunerSettings(); // Identification of the kernel settings.kernel_family = "xger"; settings.kernel_name = "Xger"; settings.sources = #include "../src/kernels/common.opencl" #include "../src/kernels/level2/level2.opencl" #include "../src/kernels/level2/xger.opencl" ; // Buffer sizes settings.size_x = args.m; settings.size_y = args.n; settings.size_a = args.m * args.n; // Sets the base thread configuration settings.global_size = {args.m, args.n}; settings.global_size_ref = settings.global_size; settings.local_size = {1, 1}; settings.local_size_ref = {8, 8}; // Transforms the thread configuration based on the parameters settings.mul_local = {{"WGS1", "WGS2"}}; settings.div_global = {{"WPT", "WPT"}}; // Sets the tuning parameters and their possible values settings.parameters = { {"WGS1", {4, 8, 16, 32, 64, 128, 256, 512}}, {"WGS2", {1, 2, 4, 8, 16, 32, 64, 128, 256}}, {"WPT", {1, 2, 4}}, }; // Describes how to compute the performance metrics settings.metric_amount = (2*args.m*args.n + args.m + args.n) * GetBytes(args.precision); settings.performance_unit = "GB/s"; return settings; } // Tests for valid arguments static void TestValidArguments(const Arguments &) { } // Sets the constraints and local memory size static void SetConstraints(cltune::Tuner &, const size_t) { } static void SetLocalMemorySize(cltune::Tuner &, const size_t, const Arguments &) { } // Sets the kernel's arguments static void SetArguments(cltune::Tuner &tuner, const Arguments &args, std::vector &x_vec, std::vector &y_vec, std::vector &a_mat, std::vector &, std::vector &, std::vector &) { tuner.AddArgumentScalar(static_cast(args.m)); tuner.AddArgumentScalar(static_cast(args.n)); tuner.AddArgumentScalar(GetRealArg(args.alpha)); tuner.AddArgumentInput(x_vec); tuner.AddArgumentScalar(0); // x_offset tuner.AddArgumentScalar(1); // x_increment tuner.AddArgumentInput(y_vec); tuner.AddArgumentScalar(0); // y_offset tuner.AddArgumentScalar(1); // y_increment tuner.AddArgumentOutput(a_mat); tuner.AddArgumentScalar(0); // a_offset tuner.AddArgumentScalar(static_cast(args.m)); // a_ld tuner.AddArgumentScalar(0); // a_is_rowmajor } }; // ================================================================================================= } // namespace clblast // Shortcuts to the clblast namespace using half = clblast::half; using float2 = clblast::float2; using double2 = clblast::double2; // Main function (not within the clblast namespace) int main(int argc, char *argv[]) { const auto command_line_args = clblast::RetrieveCommandLineArguments(argc, argv); switch(clblast::GetPrecision(command_line_args)) { case clblast::Precision::kHalf: clblast::Tuner, half>(argc, argv); break; case clblast::Precision::kSingle: clblast::Tuner, float>(argc, argv); break; case clblast::Precision::kDouble: clblast::Tuner, double>(argc, argv); break; case clblast::Precision::kComplexSingle: clblast::Tuner, float2>(argc, argv); break; case clblast::Precision::kComplexDouble: clblast::Tuner, double2>(argc, argv); break; } return 0; } // =================================================================================================