mirror of
https://github.com/KhronosGroup/OpenCL-CTS.git
synced 2026-03-19 06:09:01 +00:00
d8733efc0f
The maintenance of the conformance tests is moving to Github. This commit contains all the changes that have been done in Gitlab since the first public release of the conformance tests. Signed-off-by: Kevin Petit <kevin.petit@arm.com>
127 lines
3.1 KiB
C
127 lines
3.1 KiB
C
//
|
|
// Copyright (c) 2017 The Khronos Group 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 <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <math.h>
|
|
#include <string.h>
|
|
|
|
#if !defined(_WIN32)
|
|
#include <stdbool.h>
|
|
#endif
|
|
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
|
|
|
|
#include "procs.h"
|
|
|
|
const char *sample_single_kernel = {
|
|
"__kernel void sample_test(__global float *src, __global int *dst)\n"
|
|
"{\n"
|
|
" int tid = get_global_id(0);\n"
|
|
"\n"
|
|
" dst[tid] = (int)src[tid];\n"
|
|
"\n"
|
|
"}\n"};
|
|
|
|
const char *sample_double_kernel = {
|
|
"__kernel void sample_test(__global float *src, __global int *dst)\n"
|
|
"{\n"
|
|
" int tid = get_global_id(0);\n"
|
|
"\n"
|
|
" dst[tid] = (int)src[tid];\n"
|
|
"\n"
|
|
"}\n"
|
|
"__kernel void sample_test2(__global float *src, __global int *dst)\n"
|
|
"{\n"
|
|
" int tid = get_global_id(0);\n"
|
|
"\n"
|
|
" dst[tid] = (int)src[tid];\n"
|
|
"\n"
|
|
"}\n"};
|
|
|
|
|
|
int
|
|
test_createkernelsinprogram(cl_device_id device, cl_context context, cl_command_queue queue, int num_elements)
|
|
{
|
|
cl_program program;
|
|
cl_kernel kernel[2];
|
|
unsigned int num_kernels;
|
|
size_t lengths[2];
|
|
int err;
|
|
|
|
lengths[0] = strlen(sample_single_kernel);
|
|
program = clCreateProgramWithSource(context, 1, &sample_single_kernel, lengths, NULL);
|
|
if (!program)
|
|
{
|
|
log_error("clCreateProgramWithSource failed\n");
|
|
return -1;
|
|
}
|
|
|
|
err = clBuildProgram(program, 0, NULL, NULL, NULL, NULL);
|
|
if (err != CL_SUCCESS)
|
|
{
|
|
log_error("clBuildProgramExecutable failed\n");
|
|
return -1;
|
|
}
|
|
|
|
err = clCreateKernelsInProgram(program, 1, kernel, &num_kernels);
|
|
if ( (err != CL_SUCCESS) || (num_kernels != 1) )
|
|
{
|
|
log_error("clCreateKernelsInProgram test failed for a single kernel\n");
|
|
return -1;
|
|
}
|
|
|
|
clReleaseKernel(kernel[0]);
|
|
clReleaseProgram(program);
|
|
|
|
lengths[0] = strlen(sample_double_kernel);
|
|
program = clCreateProgramWithSource(context, 1, &sample_double_kernel, lengths, NULL);
|
|
if (!program)
|
|
{
|
|
log_error("clCreateProgramWithSource failed\n");
|
|
return -1;
|
|
}
|
|
|
|
err = clBuildProgram(program, 0, NULL, NULL, NULL, NULL);
|
|
if (err != CL_SUCCESS)
|
|
{
|
|
log_error("clBuildProgramExecutable failed\n");
|
|
return -1;
|
|
}
|
|
|
|
err = clCreateKernelsInProgram(program, 2, kernel, &num_kernels);
|
|
if ( (err != CL_SUCCESS) || (num_kernels != 2) )
|
|
{
|
|
log_error("clCreateKernelsInProgram test failed for two kernels\n");
|
|
return -1;
|
|
}
|
|
|
|
log_info("clCreateKernelsInProgram test passed\n");
|
|
|
|
clReleaseKernel(kernel[0]);
|
|
clReleaseKernel(kernel[1]);
|
|
clReleaseProgram(program);
|
|
|
|
|
|
return err;
|
|
}
|
|
|
|
|
|
|
|
|
|
|