LGTM, pushed, thanks.
On Mon, Mar 24, 2014 at 03:34:43PM +0800, [email protected] wrote: > From: Junyan He <[email protected]> > > Signed-off-by: Junyan He <[email protected]> > --- > utests/CMakeLists.txt | 1 + > utests/profiling_exec.cpp | 101 > ++++++++++++++++++++++++++++++++++++++++++++++ > 2 files changed, 102 insertions(+) > create mode 100644 utests/profiling_exec.cpp > > diff --git a/utests/CMakeLists.txt b/utests/CMakeLists.txt > index 0488578..49bcf62 100644 > --- a/utests/CMakeLists.txt > +++ b/utests/CMakeLists.txt > @@ -169,6 +169,7 @@ set (utests_sources > compiler_private_data_overflow.cpp > compiler_getelementptr_bitcast.cpp > load_program_from_bin.cpp > + profiling_exec.cpp > enqueue_copy_buf.cpp > utest_assert.cpp > utest.cpp > diff --git a/utests/profiling_exec.cpp b/utests/profiling_exec.cpp > new file mode 100644 > index 0000000..4d005a2 > --- /dev/null > +++ b/utests/profiling_exec.cpp > @@ -0,0 +1,101 @@ > +#include "utest_helper.hpp" > +#include "string.h" > + > +static void cpu_exec (int n, float* src, float* dst) > +{ > + int i = 0; > + for (; i < n; i++) { > + float f = src[i]; > + f = f < 0 ? -f : f; > + dst[i] = f; > + } > +} > + > +#define QUEUE_SECONDS_LIMIT 10 > +#define SUBMIT_SECONDS_LIMIT 20 > +#define COMMAND_SECONDS_LIMIT 10 > + > +static void check_profiling_time(cl_ulong queued, cl_ulong submit, cl_ulong > start, cl_ulong end) > +{ > + size_t profiling_resolution = 0; > + OCL_CALL(clGetDeviceInfo, device, CL_DEVICE_PROFILING_TIMER_RESOLUTION, > + sizeof(profiling_resolution), &profiling_resolution, NULL); > + > + /* Convert the time to second. */ > + double queue_to_submit = (double)(submit - queued)*1e-9; > + double submit_to_start = (double)(start - submit)*1e-9; > + double start_to_end = (double)(end - start)*1e-9; > + > + //printf("Profiling info:\n"); > + //printf("Time from queue to submit : %fms\n", (double)(queue_to_submit) > * 1000.f ); > + //printf( "Time from submit to start : %fms\n", > (double)(submit_to_start) * 1000.f ); > + //printf( "Time from start to end: %fms\n", (double)(start_to_end) * > 1000.f ); > + > + OCL_ASSERTM(queued <= submit, "Enqueue time is later than submit time, > invalid\n"); > + OCL_ASSERTM(submit <= start, "Submit time is later than start time, > invalid\n"); > + OCL_ASSERTM(start <= end, "Start time is later than end time, > invalid\n"); > + > + OCL_ASSERTM(queue_to_submit <= QUEUE_SECONDS_LIMIT, "Too large time from > queue to submit\n"); > + OCL_ASSERTM(submit_to_start <= QUEUE_SECONDS_LIMIT, "Too large time from > submit to start\n"); > + OCL_ASSERTM(start_to_end <= QUEUE_SECONDS_LIMIT, "Too large time from > start to end\n"); > +} > + > +static void profiling_exec(void) > +{ > + const size_t n = 512; > + cl_int status = CL_SUCCESS; > + cl_command_queue profiling_queue = NULL; > + cl_command_queue tmp_queue = NULL; > + float* cpu_src = (float *)malloc(n*sizeof(float)); > + float* cpu_dst = (float *)malloc(n*sizeof(float)); > + cl_event exec_event; > + cl_ulong time_queue, time_submit, time_start, time_end; > + > + > + /* Because the profiling prop, we can not use default queue. */ > + profiling_queue = clCreateCommandQueue(ctx, device, > CL_QUEUE_PROFILING_ENABLE, &status); > + OCL_ASSERT(status == CL_SUCCESS); > + > + /* save the default queue. */ > + tmp_queue = queue; > + queue = profiling_queue; > + > + OCL_CREATE_KERNEL("compiler_fabs"); > + > + OCL_CREATE_BUFFER(buf[0], 0, n * sizeof(float), NULL); > + OCL_CREATE_BUFFER(buf[1], 0, n * sizeof(float), NULL); > + OCL_SET_ARG(0, sizeof(cl_mem), &buf[0]); > + OCL_SET_ARG(1, sizeof(cl_mem), &buf[1]); > + globals[0] = locals[0] = n; > + > + OCL_MAP_BUFFER(0); > + for (int32_t i = 0; i < (int32_t) n; ++i) > + cpu_src[i] = ((float*)buf_data[0])[i] = .1f * (rand() & 15) - .75f; > + OCL_UNMAP_BUFFER(0); > + > + cpu_exec(n, cpu_src, cpu_dst); > + > + // Run the kernel on GPU > + OCL_CALL(clEnqueueNDRangeKernel, queue, kernel, 1, NULL, globals, > locals, 0, NULL, &exec_event); > + OCL_CALL(clWaitForEvents, 1, &exec_event); > + > + OCL_CALL(clGetEventProfilingInfo, exec_event, > CL_PROFILING_COMMAND_QUEUED, sizeof(cl_ulong), &time_queue, NULL); > + OCL_CALL(clGetEventProfilingInfo, exec_event, > CL_PROFILING_COMMAND_SUBMIT, sizeof(cl_ulong), &time_submit, NULL); > + OCL_CALL(clGetEventProfilingInfo, exec_event, > CL_PROFILING_COMMAND_START, sizeof(cl_ulong), &time_start, NULL); > + OCL_CALL(clGetEventProfilingInfo, exec_event, CL_PROFILING_COMMAND_END, > sizeof(cl_ulong), &time_end, NULL); > + > + check_profiling_time(time_queue, time_submit, time_start, time_end); > + > + // Compare > + OCL_MAP_BUFFER(1); > + for (int32_t i = 0; i < (int32_t) n; ++i) > + OCL_ASSERT(((float *)buf_data[1])[i] == cpu_dst[i]); > + OCL_UNMAP_BUFFER(1); > + > + queue = tmp_queue; > + clReleaseCommandQueue(profiling_queue); > + free(cpu_dst); > + free(cpu_src); > +} > + > +MAKE_UTEST_FROM_FUNCTION(profiling_exec); > -- > 1.8.3.2 > > _______________________________________________ > Beignet mailing list > [email protected] > http://lists.freedesktop.org/mailman/listinfo/beignet _______________________________________________ Beignet mailing list [email protected] http://lists.freedesktop.org/mailman/listinfo/beignet
