sorry, it took me a while to find some free time, comments inlined.

Have you tested it on any implementation that actually passes the test?

On Sun, 2014-12-28 at 14:23 +0100, EdB wrote:
> ---
>  tests/cl/api/CMakeLists.cl.txt     |   1 +
>  tests/cl/api/get-kernel-arg-info.c | 229 
> +++++++++++++++++++++++++++++++++++++
>  tests/util/piglit-util-cl-enum.c   |  11 ++
>  tests/util/piglit-util-cl-enum.h   |   1 +

you'll need to add the test to cl.py too

>  4 files changed, 242 insertions(+)
>  create mode 100644 tests/cl/api/get-kernel-arg-info.c
> 
> diff --git a/tests/cl/api/CMakeLists.cl.txt b/tests/cl/api/CMakeLists.cl.txt
> index 7e78491..3082411 100644
> --- a/tests/cl/api/CMakeLists.cl.txt
> +++ b/tests/cl/api/CMakeLists.cl.txt
> @@ -41,6 +41,7 @@ piglit_cl_add_api_test (create-kernels-in-program 
> create-kernels-in-program.c)
>  piglit_cl_add_api_test (set-kernel-arg set-kernel-arg.c)
>  piglit_cl_add_api_test (retain_release-kernel retain_release-kernel.c)
>  piglit_cl_add_api_test (get-kernel-info get-kernel-info.c)
> +piglit_cl_add_api_test (get-kernel-arg-info get-kernel-arg-info.c)
>  piglit_cl_add_api_test (get-kernel-work-group-info 
> get-kernel-work-group-info.c)
>  
>  # Events
> diff --git a/tests/cl/api/get-kernel-arg-info.c 
> b/tests/cl/api/get-kernel-arg-info.c
> new file mode 100644
> index 0000000..7e6c8df
> --- /dev/null
> +++ b/tests/cl/api/get-kernel-arg-info.c
> @@ -0,0 +1,229 @@
> +/*
> + * Copyright © 2014 EdB <[email protected]>
> + *
> + * Permission is hereby granted, free of charge, to any person obtaining a
> + * copy of this software and associated documentation files (the "Software"),
> + * to deal in the Software without restriction, including without limitation
> + * the rights to use, copy, modify, merge, publish, distribute, sublicense,
> + * and/or sell copies of the Software, and to permit persons to whom the
> + * Software is furnished to do so, subject to the following conditions:
> + *
> + * The above copyright notice and this permission notice (including the next
> + * paragraph) shall be included in all copies or substantial portions of the
> + * Software.
> + *
> + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
> + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
> + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
> + * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
> + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
> + * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
> + * DEALINGS IN THE SOFTWARE.
> + *
> + * copied from get-kernel-info.c
> + * Copyright © 2012 Blaž Tomažič <[email protected]>
> + */
> +
> +/**
> + * @file get-kernel-arg-info.c
> + *
> + * Test API function:
> + *
> + *   cl_int clGetKernelArgInfo (cl_kernel kernel,
> + *                              cl_uint arg_indx,
> + *                              cl_kernel_arg_info param_name,
> + *                              size_t param_value_size,
> + *                              void *param_value,
> + *                              size_t *param_value_size_ret)
> + */
> +
> +#include "piglit-framework-cl-api.h"
> +
> +
> +PIGLIT_CL_API_TEST_CONFIG_BEGIN
> +
> +     config.name = "clGetKernelArgInfo";
> +     config.version_min = 12;
> +
> +     config.run_per_platform = true;
> +     config.create_context = true;
> +
> +     config.program_source = "kernel void dummy_kernel(int param_1) {}";
> +     config.build_options = "-cl-kernel-arg-info";
> +
> +PIGLIT_CL_API_TEST_CONFIG_END
> +
> +
> +enum piglit_result
> +piglit_cl_test(const int argc,
> +               const char** argv,
> +               const struct piglit_cl_api_test_config* config,
> +               const struct piglit_cl_api_test_env* env)
> +{
> +#if defined(CL_VERSION_1_2)
> +     enum piglit_result result = PIGLIT_PASS;
> +
> +     int i;
> +     cl_int errNo;
> +     cl_kernel kernel;
> +
> +     size_t param_value_size;
> +     void* param_value;
> +     
> +     int num_kernel_arg_infos = PIGLIT_CL_ENUM_NUM(cl_kernel_arg_info, 
> env->version);
> +     const cl_kernel_arg_info* kernel_arg_infos = 
> PIGLIT_CL_ENUM_ARRAY(cl_kernel_arg_info);
> +     
> +     kernel = clCreateKernel(env->program,
> +                             "dummy_kernel",
> +                             &errNo);
> +     if(!piglit_cl_check_error(errNo, CL_SUCCESS)) {
> +             fprintf(stderr,
> +                     "Failed (error code: %s): Create kernel.\n",
> +                     piglit_cl_get_error_name(errNo));
> +             return PIGLIT_FAIL;
> +     }
> +
> +     /*** Normal usage ***/
> +     for(i = 0; i < num_kernel_arg_infos; ++i) {
> +             printf("%s ", piglit_cl_get_enum_name(kernel_arg_infos[i]));
> +
> +             errNo = clGetKernelArgInfo(kernel,
> +                                        0,
> +                                        kernel_arg_infos[i],
> +                                        0,
> +                                        NULL,
> +                                        &param_value_size);

we might want to check the correctness of the returned value, too.

> +             if(!piglit_cl_check_error(errNo, CL_SUCCESS)) {
> +                     fprintf(stderr,
> +                             "Failed (error code: %s): Get size of %s.\n",
> +                             piglit_cl_get_error_name(errNo),
> +                             piglit_cl_get_enum_name(kernel_arg_infos[i]));
> +                     piglit_merge_result(&result, PIGLIT_FAIL);
> +                     continue;
> +             }
> +
> +             param_value = malloc(param_value_size);
> +             errNo = clGetKernelArgInfo(kernel,
> +                                        0,
> +                                        kernel_arg_infos[i],
> +                                        param_value_size,
> +                                        param_value,
> +                                        NULL);
> +             if(!piglit_cl_check_error(errNo, CL_SUCCESS)) {
> +                     fprintf(stderr,
> +                             "Failed (error code: %s): Get value of %s.\n",
> +                             piglit_cl_get_error_name(errNo),
> +                             piglit_cl_get_enum_name(kernel_arg_infos[i]));
> +                     piglit_merge_result(&result, PIGLIT_FAIL);
> +             }
> +
> +             //TODO: test returned values
> +             printf("\n");
> +             free(param_value);
> +     }
> +
> +     /*** Errors ***/
> +
> +     /*
> +      * CL_INVALID_ARG_INDEX if arg_indx is not a valid argument index.
> +      */
> +     errNo = clGetKernelArgInfo(kernel,
> +                                99,
> +                                CL_KERNEL_ARG_NAME,
> +                                0,
> +                                NULL,
> +                                &param_value_size);
> +     if(!piglit_cl_check_error(errNo, CL_INVALID_ARG_INDEX)) {
> +             fprintf(stderr,
> +                     "Failed (error code: %s): Trigger CL_INVALID_ARG_INDEX 
> if arg_indx is not a valid argument index.\n",

linewrap

> +                     piglit_cl_get_error_name(errNo));
> +             piglit_merge_result(&result, PIGLIT_FAIL);
> +     }
> +
> +     /*
> +      * CL_INVALID_VALUE if param_name is not one of the supported
> +      * values or if size in bytes specified by param_value_size is
> +      * less than size of return type and param_value is not a NULL
> +      * value.
> +      */
> +     errNo = clGetKernelArgInfo(kernel,
> +                                0,
> +                                CL_DEVICE_NAME,
> +                                0,
> +                                NULL,
> +                                &param_value_size);
> +     if(!piglit_cl_check_error(errNo, CL_INVALID_VALUE)) {
> +             fprintf(stderr,
> +                     "Failed (error code: %s): Trigger CL_INVALID_VALUE if 
> param_name is not one of the supported values.\n",

linewrap

> +                     piglit_cl_get_error_name(errNo));
> +             piglit_merge_result(&result, PIGLIT_FAIL);
> +     }
> +
> +     errNo = clGetKernelArgInfo(kernel,
> +                                0,
> +                                CL_KERNEL_ARG_NAME,
> +                                1,
> +                                param_value,
> +                                NULL);
> +     if(!piglit_cl_check_error(errNo, CL_INVALID_VALUE)) {
> +             fprintf(stderr,
> +                     "Failed (error code: %s): Trigger CL_INVALID_VALUE if 
> size in bytes specified by param_value is less than size of return type and 
> param_value is not a NULL value.\n",

linewrap

> +                     piglit_cl_get_error_name(errNo));
> +             piglit_merge_result(&result, PIGLIT_FAIL);
> +     }
> +
> +     /*
> +      * CL_KERNEL_ARG_INFO_NOT_AVAILABLE
> +      * if the argument information is not available for kernel.
> +      */
> +{
> +     char* strings[] = { "kernel void dummy_kernel(int param_a) {}" };
> +
> +     cl_program prog = piglit_cl_build_program_with_source(env->context,
> +                                                           1,
> +                                                           strings,
> +                                                           "");
> +     cl_kernel kern = piglit_cl_create_kernel(prog, "dummy_kernel");
> +
> +     errNo = clGetKernelArgInfo(kern,
> +                                0,
> +                                CL_KERNEL_ARG_NAME,
> +                                0,
> +                                NULL,
> +                                &param_value_size);
> +     if(!piglit_cl_check_error(errNo, CL_KERNEL_ARG_INFO_NOT_AVAILABLE)) {
> +             fprintf(stderr,
> +                     "Failed (error code: %s): Trigger 
> CL_KERNEL_ARG_INFO_NOT_AVAILABLE"
> +                     " if the argument information is not available for 
> kernel.\n",
> +                     piglit_cl_get_error_name(errNo));
> +             piglit_merge_result(&result, PIGLIT_FAIL);
> +     }
> +
> +     clReleaseKernel(kern);
> +     clReleaseProgram(prog);
> +}
> +
> +     /*
> +      * CL_INVALID_KERNEL if kernel is not a valid kernel object.
> +      */
> +     errNo = clGetKernelArgInfo(NULL,
> +                                0,
> +                                CL_KERNEL_ARG_NAME,
> +                                0,
> +                                NULL,
> +                                &param_value_size);
> +     if(!piglit_cl_check_error(errNo, CL_INVALID_KERNEL)) {
> +             fprintf(stderr,
> +                     "Failed (error code: %s): Trigger CL_INVALID_KERNEL if 
> kernel is not a valid kernel object.\n",
> +                     piglit_cl_get_error_name(errNo));
> +             piglit_merge_result(&result, PIGLIT_FAIL);
> +     }
> +
> +     clReleaseKernel(kernel);
> +
> +     return result;
> +#else
> +     return PIGLIT_SKIP;
> +#endif
> +}
> +
> diff --git a/tests/util/piglit-util-cl-enum.c 
> b/tests/util/piglit-util-cl-enum.c
> index 5a38e01..3156ce2 100644
> --- a/tests/util/piglit-util-cl-enum.c
> +++ b/tests/util/piglit-util-cl-enum.c
> @@ -750,6 +750,17 @@ PIGLIT_CL_DEFINE_ENUM_2(cl_kernel_info, 5, 5, 6) = {
>  };
>  PIGLIT_CL_DEFINE_ENUM_PTR_2(cl_kernel_info);
>  
> +PIGLIT_CL_DEFINE_ENUM_2(cl_kernel_arg_info, 0, 0, 5) = {
> +#ifdef CL_VERSION_1_2
> +     CL_KERNEL_ARG_ADDRESS_QUALIFIER,
> +     CL_KERNEL_ARG_ACCESS_QUALIFIER,
> +     CL_KERNEL_ARG_TYPE_NAME,
> +     CL_KERNEL_ARG_TYPE_QUALIFIER,
> +     CL_KERNEL_ARG_NAME, //5
> +#endif //CL_VERSION_1_2
> +};
> +PIGLIT_CL_DEFINE_ENUM_PTR_2(cl_kernel_arg_info);
> +
>  PIGLIT_CL_DEFINE_ENUM_2(cl_kernel_work_group_info, 3, 5, 6) = {
>       CL_KERNEL_WORK_GROUP_SIZE,
>       CL_KERNEL_COMPILE_WORK_GROUP_SIZE,
> diff --git a/tests/util/piglit-util-cl-enum.h 
> b/tests/util/piglit-util-cl-enum.h
> index 16c8d3e..f956c8b 100644
> --- a/tests/util/piglit-util-cl-enum.h
> +++ b/tests/util/piglit-util-cl-enum.h
> @@ -81,6 +81,7 @@ PIGLIT_CL_DEFINE_ENUM_PROTOTYPE_2(cl_program_info);
>  PIGLIT_CL_DEFINE_ENUM_PROTOTYPE_2(cl_program_build_info);
>  PIGLIT_CL_DEFINE_ENUM_PROTOTYPE_2(cl_mem_info);
>  PIGLIT_CL_DEFINE_ENUM_PROTOTYPE_2(cl_kernel_info);
> +PIGLIT_CL_DEFINE_ENUM_PROTOTYPE_2(cl_kernel_arg_info);
>  PIGLIT_CL_DEFINE_ENUM_PROTOTYPE_2(cl_kernel_work_group_info);
>  PIGLIT_CL_DEFINE_ENUM_PROTOTYPE_2(cl_event_info);
>  PIGLIT_CL_DEFINE_ENUM_PROTOTYPE_2(cl_image_info);

jan

-- 
Jan Vesely <[email protected]>

Attachment: signature.asc
Description: This is a digitally signed message part

_______________________________________________
Piglit mailing list
[email protected]
http://lists.freedesktop.org/mailman/listinfo/piglit

Reply via email to