summaryrefslogtreecommitdiff
path: root/test/correctness/routines/xsyrk.cc
diff options
context:
space:
mode:
Diffstat (limited to 'test/correctness/routines/xsyrk.cc')
-rw-r--r--test/correctness/routines/xsyrk.cc114
1 files changed, 56 insertions, 58 deletions
diff --git a/test/correctness/routines/xsyrk.cc b/test/correctness/routines/xsyrk.cc
index 8d3bd82e..899d3b77 100644
--- a/test/correctness/routines/xsyrk.cc
+++ b/test/correctness/routines/xsyrk.cc
@@ -7,75 +7,73 @@
// Author(s):
// Cedric Nugteren <www.cedricnugteren.nl>
//
-// This file implements the tests for the Xsyrk routine. It is based on the TestAC class.
+// This file implements the tests for the Xsyrk routine.
//
// =================================================================================================
-#include "wrapper_clblas.h"
-#include "correctness/testac.h"
+#include "correctness/testblas.h"
+#include "routines/xsyrk.h"
namespace clblast {
// =================================================================================================
-// The correctness tester, containing the function calls to CLBlast and to clBLAS for comparison.
+// The correctness tester
template <typename T>
-void XsyrkTest(int argc, char *argv[], const bool silent, const std::string &name) {
+void RunTest(int argc, char *argv[], const bool silent, const std::string &name) {
- // Creates the CLBlast lambda
- auto clblast_lambda = [](const Arguments<T> &args,
- const Buffer &a_mat, const Buffer &c_mat,
- CommandQueue &queue) -> StatusCode {
- auto queue_plain = queue();
- auto event = cl_event{};
- return Syrk(args.layout, args.triangle, args.a_transpose,
- args.n, args.k,
- args.alpha,
- a_mat(), args.a_offset, args.a_ld,
- args.beta,
- c_mat(), args.c_offset, args.c_ld,
- &queue_plain, &event);
- };
-
- // Creates the clBLAS lambda (for comparison)
- auto clblas_lambda = [](const Arguments<T> &args,
- const Buffer &a_mat, const Buffer &c_mat,
- CommandQueue &queue) -> StatusCode {
- auto queue_plain = queue();
- auto event = cl_event{};
- auto status = clblasXsyrk(static_cast<clblasOrder>(args.layout),
- static_cast<clblasUplo>(args.triangle),
- static_cast<clblasTranspose>(args.a_transpose),
- args.n, args.k,
- args.alpha,
- a_mat(), args.a_offset, args.a_ld,
- args.beta,
- c_mat(), args.c_offset, args.c_ld,
- 1, &queue_plain, 0, nullptr, &event);
- return static_cast<StatusCode>(status);
- };
+ // Creates a tester
+ TestBlas<T> tester{argc, argv, silent, name, TestXsyrk<T>::GetOptions(),
+ TestXsyrk<T>::RunRoutine, TestXsyrk<T>::RunReference,
+ TestXsyrk<T>::DownloadResult, TestXsyrk<T>::GetResultIndex,
+ TestXsyrk<T>::ResultID1, TestXsyrk<T>::ResultID2};
- // Initializes the arguments relevant for this routine
+ // This variable holds the arguments relevant for this routine
auto args = Arguments<T>{};
- const auto options = std::vector<std::string>{kArgN, kArgK, kArgLayout,
- kArgTriangle, kArgATransp,
- kArgALeadDim, kArgCLeadDim,
- kArgAOffset, kArgCOffset};
-
- // Creates a tester
- TestAC<T> tester{argc, argv, silent, name, options, clblast_lambda, clblas_lambda};
// Loops over the test-cases from a data-layout point of view
- for (auto &layout: tester.kLayouts) {
- args.layout = layout;
- for (auto &triangle: {Triangle::kUpper, Triangle::kLower}) {
- args.triangle = triangle;
- for (auto &a_transpose: {Transpose::kNo, Transpose::kYes}) { // No conjugate here since it is
- args.a_transpose = a_transpose; // not supported by clBLAS
- const auto case_name = ToString(layout)+" "+ToString(triangle)+" "+ToString(a_transpose);
+ for (auto &layout: tester.kLayouts) { args.layout = layout;
+ for (auto &triangle: tester.kTriangles) { args.triangle = triangle;
+ for (auto &a_transpose: {Transpose::kNo, Transpose::kYes}) { // No conjugate here since it
+ args.a_transpose = a_transpose; // is not supported by clBLAS
+
+ // Creates the arguments vector for the regular tests
+ auto regular_test_vector = std::vector<Arguments<T>>{};
+ for (auto &n: tester.kMatrixDims) { args.n = n;
+ for (auto &k: tester.kMatrixDims) { args.k = k;
+ for (auto &a_ld: tester.kMatrixDims) { args.a_ld = a_ld;
+ for (auto &a_offset: tester.kOffsets) { args.a_offset = a_offset;
+ for (auto &c_ld: tester.kMatrixDims) { args.c_ld = c_ld;
+ for (auto &c_offset: tester.kOffsets) { args.c_offset = c_offset;
+ for (auto &alpha: tester.kAlphaValues) { args.alpha = alpha;
+ for (auto &beta: tester.kBetaValues) { args.beta = beta;
+ args.a_size = TestXsyrk<T>::GetSizeA(args);
+ args.c_size = TestXsyrk<T>::GetSizeC(args);
+ if (args.a_size<1 || args.c_size<1) { continue; }
+ regular_test_vector.push_back(args);
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+
+ // Creates the arguments vector for the invalid-buffer tests
+ auto invalid_test_vector = std::vector<Arguments<T>>{};
+ args.n = args.k = tester.kBufferSize;
+ args.a_ld = args.c_ld = tester.kBufferSize;
+ args.a_offset = args.c_offset = 0;
+ for (auto &a_size: tester.kMatSizes) { args.a_size = a_size;
+ for (auto &c_size: tester.kMatSizes) { args.c_size = c_size;
+ invalid_test_vector.push_back(args);
+ }
+ }
// Runs the tests
- tester.TestRegular(args, case_name);
- tester.TestInvalidBufferSizes(args, case_name);
+ const auto case_name = ToString(layout)+" "+ToString(triangle)+" "+ToString(a_transpose);
+ tester.TestRegular(regular_test_vector, case_name);
+ tester.TestInvalid(invalid_test_vector, case_name);
}
}
}
@@ -86,10 +84,10 @@ void XsyrkTest(int argc, char *argv[], const bool silent, const std::string &nam
// Main function (not within the clblast namespace)
int main(int argc, char *argv[]) {
- clblast::XsyrkTest<float>(argc, argv, false, "SSYRK");
- clblast::XsyrkTest<double>(argc, argv, true, "DSYRK");
- clblast::XsyrkTest<clblast::float2>(argc, argv, true, "CSYRK");
- clblast::XsyrkTest<clblast::double2>(argc, argv, true, "ZSYRK");
+ clblast::RunTest<float>(argc, argv, false, "SSYRK");
+ clblast::RunTest<double>(argc, argv, true, "DSYRK");
+ clblast::RunTest<clblast::float2>(argc, argv, true, "CSYRK");
+ clblast::RunTest<clblast::double2>(argc, argv, true, "ZSYRK");
return 0;
}