mirror of
https://github.com/KhronosGroup/OpenCL-CTS.git
synced 2026-03-20 14:39:01 +00:00
05a11d8e49
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
326 lines
11 KiB
C++
326 lines
11 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 "../../../test_common/harness/compat.h"
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#if !defined(_WIN32)
|
|
#include <unistd.h>
|
|
#include <sys/time.h>
|
|
#endif
|
|
|
|
#include "../testBase.h"
|
|
#include "../../../test_common/harness/fpcontrol.h"
|
|
#include "../../../test_common/harness/parseParameters.h"
|
|
|
|
#if defined(__PPC__)
|
|
// Global varaiable used to hold the FPU control register state. The FPSCR register can not
|
|
// be used because not all Power implementations retain or observed the NI (non-IEEE
|
|
// mode) bit.
|
|
__thread fpu_control_t fpu_control = 0;
|
|
#endif
|
|
|
|
bool gTestReadWrite = false;
|
|
bool gDebugTrace = false;
|
|
bool gTestMaxImages = false, gTestSmallImages = false, gTestRounding = false;
|
|
int gTypesToTest = 0;
|
|
cl_channel_type gChannelTypeToUse = (cl_channel_type)-1;
|
|
cl_channel_order gChannelOrderToUse = (cl_channel_order)-1;
|
|
bool gEnablePitch = false;
|
|
cl_device_type gDeviceType = CL_DEVICE_TYPE_DEFAULT;
|
|
|
|
cl_command_queue queue;
|
|
cl_context context;
|
|
static cl_device_id device;
|
|
|
|
#define MAX_ALLOWED_STD_DEVIATION_IN_MB 8.0
|
|
|
|
static void printUsage( const char *execName );
|
|
|
|
extern int test_image_set( cl_device_id device, cl_mem_object_type imageType );
|
|
|
|
int test_1D(cl_device_id deviceID, cl_context context, cl_command_queue queue, int num_elements)
|
|
{
|
|
return test_image_set( device, CL_MEM_OBJECT_IMAGE1D ) +
|
|
test_image_set( device, CL_MEM_OBJECT_IMAGE1D_BUFFER );
|
|
}
|
|
int test_2D(cl_device_id deviceID, cl_context context, cl_command_queue queue, int num_elements)
|
|
{
|
|
return test_image_set( device, CL_MEM_OBJECT_IMAGE2D );
|
|
}
|
|
int test_3D(cl_device_id deviceID, cl_context context, cl_command_queue queue, int num_elements)
|
|
{
|
|
return test_image_set( device, CL_MEM_OBJECT_IMAGE3D );
|
|
}
|
|
int test_1Darray(cl_device_id deviceID, cl_context context, cl_command_queue queue, int num_elements)
|
|
{
|
|
return test_image_set( device, CL_MEM_OBJECT_IMAGE1D_ARRAY );
|
|
}
|
|
int test_2Darray(cl_device_id deviceID, cl_context context, cl_command_queue queue, int num_elements)
|
|
{
|
|
return test_image_set( device, CL_MEM_OBJECT_IMAGE2D_ARRAY );
|
|
}
|
|
|
|
basefn basefn_list[] = {
|
|
test_1D,
|
|
test_2D,
|
|
test_3D,
|
|
test_1Darray,
|
|
test_2Darray,
|
|
};
|
|
|
|
const char *basefn_names[] = {
|
|
"1D",
|
|
"2D",
|
|
"3D",
|
|
"1Darray",
|
|
"2Darray",
|
|
};
|
|
|
|
ct_assert((sizeof(basefn_names) / sizeof(basefn_names[0])) == (sizeof(basefn_list) / sizeof(basefn_list[0])));
|
|
|
|
int num_fns = sizeof(basefn_names) / sizeof(char *);
|
|
|
|
int main(int argc, const char *argv[])
|
|
{
|
|
cl_platform_id platform;
|
|
cl_channel_type chanType;
|
|
cl_channel_order chanOrder;
|
|
bool randomize = false;
|
|
|
|
test_start();
|
|
|
|
argc = parseCustomParam(argc, argv);
|
|
if (argc == -1)
|
|
{
|
|
test_finish();
|
|
return -1;
|
|
}
|
|
|
|
//Check CL_DEVICE_TYPE environment variable
|
|
checkDeviceTypeOverride( &gDeviceType );
|
|
|
|
const char ** argList = (const char **)calloc( argc, sizeof( char*) );
|
|
|
|
if( NULL == argList )
|
|
{
|
|
log_error( "Failed to allocate memory for argList array.\n" );
|
|
return 1;
|
|
}
|
|
|
|
argList[0] = argv[0];
|
|
size_t argCount = 1;
|
|
|
|
// Parse arguments
|
|
for ( int i = 1; i < argc; i++ )
|
|
{
|
|
if ( strcmp( argv[i], "cpu" ) == 0 || strcmp( argv[i], "CL_DEVICE_TYPE_CPU" ) == 0 )
|
|
gDeviceType = CL_DEVICE_TYPE_CPU;
|
|
else if ( strcmp( argv[i], "gpu" ) == 0 || strcmp( argv[i], "CL_DEVICE_TYPE_GPU" ) == 0 )
|
|
gDeviceType = CL_DEVICE_TYPE_GPU;
|
|
else if ( strcmp( argv[i], "accelerator" ) == 0 || strcmp( argv[i], "CL_DEVICE_TYPE_ACCELERATOR" ) == 0 )
|
|
gDeviceType = CL_DEVICE_TYPE_ACCELERATOR;
|
|
else if ( strcmp( argv[i], "CL_DEVICE_TYPE_DEFAULT" ) == 0 )
|
|
gDeviceType = CL_DEVICE_TYPE_DEFAULT;
|
|
|
|
else if ( strcmp( argv[i], "debug_trace" ) == 0 )
|
|
gDebugTrace = true;
|
|
else if ( strcmp( argv[i], "read_write" ) == 0 )
|
|
gTestReadWrite = true;
|
|
else if ( strcmp( argv[i], "small_images" ) == 0 )
|
|
gTestSmallImages = true;
|
|
else if ( strcmp( argv[i], "max_images" ) == 0 )
|
|
gTestMaxImages = true;
|
|
else if ( strcmp( argv[i], "use_pitches" ) == 0 )
|
|
gEnablePitch = true;
|
|
|
|
else if ( strcmp( argv[i], "int" ) == 0 )
|
|
gTypesToTest |= kTestInt;
|
|
else if ( strcmp( argv[i], "uint" ) == 0 )
|
|
gTypesToTest |= kTestUInt;
|
|
else if ( strcmp( argv[i], "float" ) == 0 )
|
|
gTypesToTest |= kTestFloat;
|
|
|
|
else if ( strcmp( argv[i], "randomize" ) == 0 )
|
|
randomize = true;
|
|
|
|
else if ( strcmp( argv[i], "--help" ) == 0 || strcmp( argv[i], "-h" ) == 0 )
|
|
{
|
|
printUsage( argv[ 0 ] );
|
|
return -1;
|
|
}
|
|
|
|
else if ( ( chanType = get_channel_type_from_name( argv[i] ) ) != (cl_channel_type)-1 )
|
|
gChannelTypeToUse = chanType;
|
|
|
|
else if ( ( chanOrder = get_channel_order_from_name( argv[i] ) ) != (cl_channel_order)-1 )
|
|
gChannelOrderToUse = chanOrder;
|
|
else
|
|
{
|
|
argList[argCount] = argv[i];
|
|
argCount++;
|
|
}
|
|
}
|
|
|
|
if ( gTypesToTest == 0 )
|
|
gTypesToTest = kTestAllTypes;
|
|
|
|
// Seed the random # generators
|
|
if ( randomize )
|
|
{
|
|
gRandomSeed = (cl_uint) time( NULL );
|
|
gReSeed = 1;
|
|
log_info( "Random seed: %u.\n", gRandomSeed );
|
|
}
|
|
|
|
int error;
|
|
// Get our platform
|
|
error = clGetPlatformIDs(1, &platform, NULL);
|
|
if ( error )
|
|
{
|
|
print_error( error, "Unable to get platform" );
|
|
test_finish();
|
|
return -1;
|
|
}
|
|
|
|
// Get our device
|
|
error = clGetDeviceIDs(platform, gDeviceType, 1, &device, NULL );
|
|
if ( error )
|
|
{
|
|
print_error( error, "Unable to get specified device" );
|
|
test_finish();
|
|
return -1;
|
|
}
|
|
|
|
// Get the device type so we know if it is a GPU even if default is passed in.
|
|
error = clGetDeviceInfo(device, CL_DEVICE_TYPE, sizeof(gDeviceType), &gDeviceType, NULL);
|
|
if ( error )
|
|
{
|
|
print_error( error, "Unable to get device type" );
|
|
test_finish();
|
|
return -1;
|
|
}
|
|
|
|
|
|
if ( printDeviceHeader( device ) != CL_SUCCESS )
|
|
{
|
|
test_finish();
|
|
return -1;
|
|
}
|
|
|
|
// Check for image support
|
|
if (checkForImageSupport( device ) == CL_IMAGE_FORMAT_NOT_SUPPORTED) {
|
|
log_info("Device does not support images. Skipping test.\n");
|
|
test_finish();
|
|
return 0;
|
|
}
|
|
|
|
// Create a context to test with
|
|
context = clCreateContext( NULL, 1, &device, notify_callback, NULL, &error );
|
|
if ( error != CL_SUCCESS )
|
|
{
|
|
print_error( error, "Unable to create testing context" );
|
|
test_finish();
|
|
return -1;
|
|
}
|
|
|
|
// Create a queue against the context
|
|
queue = clCreateCommandQueueWithProperties( context, device, 0, &error );
|
|
if ( error != CL_SUCCESS )
|
|
{
|
|
print_error( error, "Unable to create testing command queue" );
|
|
test_finish();
|
|
return -1;
|
|
}
|
|
|
|
if ( gTestSmallImages )
|
|
log_info( "Note: Using small test images\n" );
|
|
|
|
// On most platforms which support denorm, default is FTZ off. However,
|
|
// on some hardware where the reference is computed, default might be flush denorms to zero e.g. arm.
|
|
// This creates issues in result verification. Since spec allows the implementation to either flush or
|
|
// not flush denorms to zero, an implementation may choose not to flush i.e. return denorm result whereas
|
|
// reference result may be zero (flushed denorm). Hence we need to disable denorm flushing on host side
|
|
// where reference is being computed to make sure we get non-flushed reference result. If implementation
|
|
// returns flushed result, we correctly take care of that in verification code.
|
|
|
|
FPU_mode_type oldMode;
|
|
DisableFTZ(&oldMode);
|
|
|
|
int ret = parseAndCallCommandLineTests( argCount, argList, NULL, num_fns, basefn_list, basefn_names, true, 0, 0 );
|
|
|
|
// Restore FP state before leaving
|
|
RestoreFPState(&oldMode);
|
|
|
|
error = clFinish(queue);
|
|
if (error)
|
|
print_error(error, "clFinish failed.");
|
|
|
|
clReleaseContext(context);
|
|
clReleaseCommandQueue(queue);
|
|
|
|
if (gTestFailure == 0) {
|
|
if (gTestCount > 1)
|
|
log_info("PASSED %d of %d sub-tests.\n", gTestCount, gTestCount);
|
|
else
|
|
log_info("PASSED sub-test.\n");
|
|
}
|
|
else if (gTestFailure > 0) {
|
|
if (gTestCount > 1)
|
|
log_error("FAILED %d of %d sub-tests.\n", gTestFailure, gTestCount);
|
|
else
|
|
log_error("FAILED sub-test.\n");
|
|
}
|
|
|
|
// Clean up
|
|
free(argList);
|
|
test_finish();
|
|
|
|
return ret;
|
|
}
|
|
|
|
static void printUsage( const char *execName )
|
|
{
|
|
const char *p = strrchr( execName, '/' );
|
|
if ( p != NULL )
|
|
execName = p + 1;
|
|
|
|
log_info( "Usage: %s [options] [test_names]\n", execName );
|
|
log_info( "Options:\n" );
|
|
log_info( "\n" );
|
|
log_info( "\tThe following flags specify the types to test. They can be combined; if none are specified, all are tested:\n" );
|
|
log_info( "\t\tint - Test integer I/O (read_imagei)\n" );
|
|
log_info( "\t\tuint - Test unsigned integer I/O (read_imageui)\n" );
|
|
log_info( "\t\tfloat - Test float I/O (read_imagef)\n" );
|
|
log_info( "\n" );
|
|
log_info( "You may also use appropriate CL_ channel type and ordering constants.\n" );
|
|
log_info( "\n" );
|
|
log_info( "\tThe following modify the types of images tested:\n" );
|
|
log_info( "\t\read_write - Runs the tests with read_write images which allow a kernel do both read and write to the same image \n" );
|
|
log_info( "\t\tsmall_images - Runs every format through a loop of widths 1-13 and heights 1-9, instead of random sizes\n" );
|
|
log_info( "\t\tmax_images - Runs every format through a set of size combinations with the max values, max values - 1, and max values / 128\n" );
|
|
log_info( "\n" );
|
|
log_info( "\tdebug_trace - Enables additional debug info logging\n" );
|
|
log_info( "\tuse_pitches - Enables row and slice pitches\n" );
|
|
log_info( "\n" );
|
|
log_info( "Test names:\n" );
|
|
for( int i = 0; i < num_fns; i++ )
|
|
{
|
|
log_info( "\t%s\n", basefn_names[i] );
|
|
}
|
|
}
|