// =================================================================================================
// 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 <www.cedricnugteren.nl>
//
// This file implements an auto-tuner to tune the pad-copy OpenCL kernels. It uses CLTune.
//
// =================================================================================================

#include <string>
#include <vector>
#include <stdexcept>

#include "internal/utilities.h"
#include "internal/tuning.h"

namespace clblast {
// =================================================================================================

// The pad auto-tuner
template <typename T>
void PadTune(const Arguments<T> &args,
              const std::vector<T> &a_mat, std::vector<T> &b_mat,
              cltune::Tuner &tuner) {

  // This points to the PadMatrix kernel as found in the CLBlast library. This is just one
  // example of a pad kernel. However, all pad-kernels use the same tuning parameters, so one has
  // to be chosen as a representative.
  std::string sources =
    #include "../src/kernels/common.opencl"
    #include "../src/kernels/pad.opencl"
  ;
  auto id = tuner.AddKernelFromString(sources, "PadMatrix", {args.m, args.n}, {1, 1});
  tuner.SetReferenceFromString(sources, "PadMatrix", {args.m, args.n}, {8, 8});

  // Sets the tunable parameters and their possible values
  tuner.AddParameter(id, "PAD_DIMX", {8, 16, 32});
  tuner.AddParameter(id, "PAD_DIMY", {8, 16, 32});
  tuner.AddParameter(id, "PAD_WPTX", {1, 2, 4});
  tuner.AddParameter(id, "PAD_WPTY", {1, 2, 4});

  // Tests for a specific precision
  tuner.AddParameter(id, "PRECISION", {static_cast<size_t>(args.precision)});
  tuner.AddParameterReference("PRECISION", static_cast<size_t>(args.precision));

  // Modifies the thread-sizes (both global and local) based on the parameters
  tuner.MulLocalSize(id, {"PAD_DIMX", "PAD_DIMY"});
  tuner.DivGlobalSize(id, {"PAD_WPTX", "PAD_WPTY"});

  // Sets the function's arguments
  tuner.AddArgumentScalar(static_cast<int>(args.m));
  tuner.AddArgumentScalar(static_cast<int>(args.n));
  tuner.AddArgumentScalar(static_cast<int>(args.m));
  tuner.AddArgumentScalar(0);
  tuner.AddArgumentInput(a_mat);
  tuner.AddArgumentScalar(static_cast<int>(args.m));
  tuner.AddArgumentScalar(static_cast<int>(args.n));
  tuner.AddArgumentScalar(static_cast<int>(args.m));
  tuner.AddArgumentScalar(0);
  tuner.AddArgumentOutput(b_mat);
  tuner.AddArgumentScalar(0);
}

// =================================================================================================

// Main function which calls the common client code with the routine-specific function as argument.
void TunerPad(int argc, char *argv[]) {
  switch(GetPrecision(argc, argv)) {
    case Precision::kHalf: throw std::runtime_error("Unsupported precision mode");
    case Precision::kSingle: TunerAB<float>(argc, argv, PadTune<float>); break;
    case Precision::kDouble: TunerAB<double>(argc, argv, PadTune<double>); break;
    case Precision::kComplexSingle: TunerAB<float2>(argc, argv, PadTune<float2>); break;
    case Precision::kComplexDouble: TunerAB<double2>(argc, argv, PadTune<double2>); break;
  }
}

// =================================================================================================
} // namespace clblast

// Main function (not within the clblast namespace)
int main(int argc, char *argv[]) {
  clblast::TunerPad(argc, argv);
  return 0;
}

// =================================================================================================