summaryrefslogtreecommitdiff
path: root/external/clBLAS/src/library/tools/ktest/steps/symv.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'external/clBLAS/src/library/tools/ktest/steps/symv.cpp')
-rw-r--r--external/clBLAS/src/library/tools/ktest/steps/symv.cpp120
1 files changed, 0 insertions, 120 deletions
diff --git a/external/clBLAS/src/library/tools/ktest/steps/symv.cpp b/external/clBLAS/src/library/tools/ktest/steps/symv.cpp
deleted file mode 100644
index bfe22302..00000000
--- a/external/clBLAS/src/library/tools/ktest/steps/symv.cpp
+++ /dev/null
@@ -1,120 +0,0 @@
-/* ************************************************************************
- * Copyright 2013 Advanced Micro Devices, Inc.
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- * http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
- * ************************************************************************/
-
-
-#include <sstream>
-
-#include "symv.h"
-
-using namespace clMath;
-
-SymvStep::SymvStep(cl_device_id device) :
- Step(CLBLAS_SYMV, device)
-{
-}
-
-SymvStep::SymvStep(ListNode *node) :
- Step(node)
-{
-}
-
-void
-SymvStep::declareVars(Step *masterStep)
-{
- StepKargs args;
- MatrixVariable *A;
- VectorVariable *X, *Y, *naiveY;
-
- memset(&args, 0, sizeof(args));
- std::string type = dtypeToString(kargs().dtype);
-
- args.N = addConst("N", "cl_uint", kargs().N);
- args.K = args.N;
-
- args.lda = addConst("lda", "cl_uint", kargs().lda.matrix);
- args.ldb = addConst("incx", "cl_int", kargs().ldb.vector);
- args.ldc = addConst("incy", "cl_int", kargs().ldc.vector);
-
- args.offsetN = addConst("offsetN", "cl_uint", kargs().offsetN);
-
- args.offA = addConst("offA", "cl_uint", kargs().offA);
- args.offBX = addConst("offx", "cl_uint", kargs().offBX);
- args.offCY = addConst("offy", "cl_uint", kargs().offCY);
-
- args.alpha = addVar("alpha", type,
- multiplierToString(kargs().dtype, kargs().alpha));
- args.beta = addVar("beta", type,
- multiplierToString(kargs().dtype, kargs().beta));
-
- A = addMatrix("A", type + "*", args.N, args.N, args.lda, args.offA);
- X = addVector("X", type + "*", args.N, args.ldb, args.offBX);
- Y = addVector("Y", type + "*", args.N, args.ldc, args.offCY);
- naiveY = addVector("naiveY", type + "*", args.N, args.ldc, args.offCY);
- naiveY->setCopy(Y);
-
- std::string bufAName, bufBName, bufCName;
- if (NULL == masterStep) {
- bufAName = "bufA";
- bufBName = "bufX";
- bufCName = "bufY";
- }
- else {
- bufAName = masterStep->getBuffer((BufferID)(long)step_.args.A)->name();
- bufBName = masterStep->getBuffer((BufferID)(long)step_.args.B)->name();
- bufCName = masterStep->getBuffer((BufferID)(long)step_.args.C)->name();
- }
- args.A = addBuffer(BUFFER_A, bufAName, "cl_mem", CL_MEM_READ_ONLY, A);
- args.B = addBuffer(BUFFER_B, bufBName, "cl_mem", CL_MEM_READ_ONLY, X);
- args.C = addBuffer(BUFFER_C, bufCName, "cl_mem", CL_MEM_READ_WRITE, Y);
-
- assignKargs(args);
-
- std::stringstream ss;
- ss << getBlasFunctionName() << "(order, uplo, "
- << args.N->name() << ", "
- << args.alpha->name() << ", " << A->matrixPointer() << ", "
- << args.lda->name() << ", " << X->vectorPointer() << ", "
- << args.ldb->name() << ", " << args.beta->name() << ", "
- << naiveY->vectorPointer() << ", " << args.ldc->name() << ")";
- naiveCall_ = ss.str();
-
- ss.str("");
- ss << "compareVectors(" << args.N->name() << ", " << Y->vectorPointer()
- << ", " << naiveY->vectorPointer() << ", " << args.ldc->name() << ")";
- compareCall_ = ss.str();
-}
-
-void
-SymvStep::fixLD()
-{
- CLBlasKargs args;
-
- args = kargs();
-
- if (args.lda.matrix < args.N) {
- args.lda.matrix = args.N;
- }
-
- if (args.ldb.vector == 0) {
- args.ldb.vector = 1;
- }
- if (args.ldc.vector == 0) {
- args.ldc.vector = 1;
- }
- args.K = args.N; //store original N
-
- setKargs(args);
-}