mirror of
https://github.com/KhronosGroup/OpenCL-CTS.git
synced 2026-03-19 14:09:03 +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>
88 lines
3.0 KiB
C++
88 lines
3.0 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 "allocation_utils.h"
|
|
|
|
cl_command_queue reset_queue(cl_context context, cl_device_id device_id, cl_command_queue *queue, int *error)
|
|
{
|
|
log_info("Invalid command queue. Releasing and recreating the command queue.\n");
|
|
clReleaseCommandQueue(*queue);
|
|
*queue = clCreateCommandQueue(context, device_id, 0, error);
|
|
return *queue;
|
|
}
|
|
|
|
int check_allocation_error(cl_context context, cl_device_id device_id, int error, cl_command_queue *queue) {
|
|
//log_info("check_allocation_error context=%p device_id=%p error=%d *queue=%p\n", context, device_id, error, *queue);
|
|
if ((error == CL_MEM_OBJECT_ALLOCATION_FAILURE ) || (error == CL_OUT_OF_RESOURCES ) || (error == CL_OUT_OF_HOST_MEMORY) || (error == CL_INVALID_IMAGE_SIZE)) {
|
|
return FAILED_TOO_BIG;
|
|
} else if (error == CL_INVALID_COMMAND_QUEUE) {
|
|
*queue = reset_queue(context, device_id, queue, &error);
|
|
if (CL_SUCCESS != error)
|
|
{
|
|
log_error("Failed to reset command queue after corrupted queue: %s\n", IGetErrorString(error));
|
|
return FAILED_ABORT;
|
|
}
|
|
// Try again with smaller resources.
|
|
return FAILED_TOO_BIG;
|
|
} else if (error != CL_SUCCESS) {
|
|
log_error("Allocation failed with %s.\n", IGetErrorString(error));
|
|
return FAILED_ABORT;
|
|
}
|
|
return SUCCEEDED;
|
|
}
|
|
|
|
|
|
double toMB(cl_ulong size_in) {
|
|
return (double)size_in/(1024.0*1024.0);
|
|
}
|
|
|
|
size_t get_actual_allocation_size(cl_mem mem) {
|
|
int error;
|
|
cl_mem_object_type type;
|
|
size_t size, width, height;
|
|
|
|
error = clGetMemObjectInfo(mem, CL_MEM_TYPE, sizeof(type), &type, NULL);
|
|
if (error) {
|
|
print_error(error, "clGetMemObjectInfo failed for CL_MEM_TYPE.");
|
|
return 0;
|
|
}
|
|
|
|
if (type == CL_MEM_OBJECT_BUFFER) {
|
|
error = clGetMemObjectInfo(mem, CL_MEM_SIZE, sizeof(size), &size, NULL);
|
|
if (error) {
|
|
print_error(error, "clGetMemObjectInfo failed for CL_MEM_SIZE.");
|
|
return 0;
|
|
}
|
|
return size;
|
|
} else if (type == CL_MEM_OBJECT_IMAGE2D) {
|
|
error = clGetImageInfo(mem, CL_IMAGE_WIDTH, sizeof(width), &width, NULL);
|
|
if (error) {
|
|
print_error(error, "clGetMemObjectInfo failed for CL_IMAGE_WIDTH.");
|
|
return 0;
|
|
}
|
|
error = clGetImageInfo(mem, CL_IMAGE_HEIGHT, sizeof(height), &height, NULL);
|
|
if (error) {
|
|
print_error(error, "clGetMemObjectInfo failed for CL_IMAGE_HEIGHT.");
|
|
return 0;
|
|
}
|
|
return width*height*4*sizeof(cl_uint);
|
|
}
|
|
|
|
log_error("Invalid CL_MEM_TYPE: %d\n", type);
|
|
return 0;
|
|
}
|
|
|
|
|