xref: /aosp_15_r20/external/OpenCL-CTS/test_conformance/profiling/main.cpp (revision 6467f958c7de8070b317fc65bcb0f6472e388d82)
1*6467f958SSadaf Ebrahimi //
2*6467f958SSadaf Ebrahimi // Copyright (c) 2017 The Khronos Group Inc.
3*6467f958SSadaf Ebrahimi //
4*6467f958SSadaf Ebrahimi // Licensed under the Apache License, Version 2.0 (the "License");
5*6467f958SSadaf Ebrahimi // you may not use this file except in compliance with the License.
6*6467f958SSadaf Ebrahimi // You may obtain a copy of the License at
7*6467f958SSadaf Ebrahimi //
8*6467f958SSadaf Ebrahimi //    http://www.apache.org/licenses/LICENSE-2.0
9*6467f958SSadaf Ebrahimi //
10*6467f958SSadaf Ebrahimi // Unless required by applicable law or agreed to in writing, software
11*6467f958SSadaf Ebrahimi // distributed under the License is distributed on an "AS IS" BASIS,
12*6467f958SSadaf Ebrahimi // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13*6467f958SSadaf Ebrahimi // See the License for the specific language governing permissions and
14*6467f958SSadaf Ebrahimi // limitations under the License.
15*6467f958SSadaf Ebrahimi //
16*6467f958SSadaf Ebrahimi #include "harness/compat.h"
17*6467f958SSadaf Ebrahimi 
18*6467f958SSadaf Ebrahimi #include <stdio.h>
19*6467f958SSadaf Ebrahimi #include <string.h>
20*6467f958SSadaf Ebrahimi #include "procs.h"
21*6467f958SSadaf Ebrahimi #include "harness/testHarness.h"
22*6467f958SSadaf Ebrahimi 
23*6467f958SSadaf Ebrahimi // FIXME: To use certain functions in harness/imageHelpers.h
24*6467f958SSadaf Ebrahimi // (for example, generate_random_image_data()), the tests are required to declare
25*6467f958SSadaf Ebrahimi // the following variables (<rdar://problem/11111245>):
26*6467f958SSadaf Ebrahimi 
27*6467f958SSadaf Ebrahimi test_definition test_list[] = {
28*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_int ),
29*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_uint ),
30*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_long ),
31*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_ulong ),
32*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_short ),
33*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_ushort ),
34*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_float ),
35*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_char ),
36*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_uchar ),
37*6467f958SSadaf Ebrahimi     ADD_TEST( read_array_struct ),
38*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_int ),
39*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_uint ),
40*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_long ),
41*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_ulong ),
42*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_short ),
43*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_ushort ),
44*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_float ),
45*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_char ),
46*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_uchar ),
47*6467f958SSadaf Ebrahimi     ADD_TEST( write_array_struct ),
48*6467f958SSadaf Ebrahimi     ADD_TEST( read_image_float ),
49*6467f958SSadaf Ebrahimi     ADD_TEST( read_image_char ),
50*6467f958SSadaf Ebrahimi     ADD_TEST( read_image_uchar ),
51*6467f958SSadaf Ebrahimi     ADD_TEST( write_image_float ),
52*6467f958SSadaf Ebrahimi     ADD_TEST( write_image_char ),
53*6467f958SSadaf Ebrahimi     ADD_TEST( write_image_uchar ),
54*6467f958SSadaf Ebrahimi     ADD_TEST( copy_array ),
55*6467f958SSadaf Ebrahimi     ADD_TEST( copy_partial_array ),
56*6467f958SSadaf Ebrahimi     ADD_TEST( copy_image ),
57*6467f958SSadaf Ebrahimi     ADD_TEST( copy_array_to_image ),
58*6467f958SSadaf Ebrahimi     ADD_TEST( execute ),
59*6467f958SSadaf Ebrahimi };
60*6467f958SSadaf Ebrahimi 
61*6467f958SSadaf Ebrahimi const int test_num = ARRAY_SIZE( test_list );
62*6467f958SSadaf Ebrahimi 
63*6467f958SSadaf Ebrahimi // FIXME: use timer resolution rather than hardcoding 1µs per tick.
64*6467f958SSadaf Ebrahimi 
65*6467f958SSadaf Ebrahimi #define QUEUE_SECONDS_LIMIT 30
66*6467f958SSadaf Ebrahimi #define SUBMIT_SECONDS_LIMIT 30
67*6467f958SSadaf Ebrahimi #define COMMAND_SECONDS_LIMIT 30
check_times(cl_ulong queueStart,cl_ulong commandSubmit,cl_ulong commandStart,cl_ulong commandEnd,cl_device_id device)68*6467f958SSadaf Ebrahimi int check_times(cl_ulong queueStart, cl_ulong commandSubmit, cl_ulong commandStart, cl_ulong commandEnd, cl_device_id device) {
69*6467f958SSadaf Ebrahimi   int err = 0;
70*6467f958SSadaf Ebrahimi 
71*6467f958SSadaf Ebrahimi   size_t profiling_resolution = 0;
72*6467f958SSadaf Ebrahimi   err = clGetDeviceInfo(device, CL_DEVICE_PROFILING_TIMER_RESOLUTION, sizeof(profiling_resolution), &profiling_resolution, NULL);
73*6467f958SSadaf Ebrahimi     test_error(err, "clGetDeviceInfo for CL_DEVICE_PROFILING_TIMER_RESOLUTION failed.\n");
74*6467f958SSadaf Ebrahimi 
75*6467f958SSadaf Ebrahimi   log_info("CL_PROFILING_COMMAND_QUEUED: %llu CL_PROFILING_COMMAND_SUBMIT: %llu CL_PROFILING_COMMAND_START: %llu CL_PROFILING_COMMAND_END: %llu CL_DEVICE_PROFILING_TIMER_RESOLUTION: %ld\n",
76*6467f958SSadaf Ebrahimi            queueStart, commandSubmit, commandStart, commandEnd, profiling_resolution);
77*6467f958SSadaf Ebrahimi 
78*6467f958SSadaf Ebrahimi   double queueTosubmitTimeS = (double)(commandSubmit - queueStart)*1e-9;
79*6467f958SSadaf Ebrahimi   double submitToStartTimeS = (double)(commandStart - commandSubmit)*1e-9;
80*6467f958SSadaf Ebrahimi   double startToEndTimeS = (double)(commandEnd - commandStart)*1e-9;
81*6467f958SSadaf Ebrahimi 
82*6467f958SSadaf Ebrahimi     log_info( "Profiling info:\n" );
83*6467f958SSadaf Ebrahimi     log_info( "Time from queue to submit : %fms\n", (double)(queueTosubmitTimeS) * 1000.f );
84*6467f958SSadaf Ebrahimi     log_info( "Time from submit to start : %fms\n", (double)(submitToStartTimeS) * 1000.f );
85*6467f958SSadaf Ebrahimi     log_info( "Time from start to end: %fms\n", (double)(startToEndTimeS) * 1000.f );
86*6467f958SSadaf Ebrahimi 
87*6467f958SSadaf Ebrahimi   if(queueStart > commandSubmit) {
88*6467f958SSadaf Ebrahimi     log_error("CL_PROFILING_COMMAND_QUEUED > CL_PROFILING_COMMAND_SUBMIT.\n");
89*6467f958SSadaf Ebrahimi     err = -1;
90*6467f958SSadaf Ebrahimi   }
91*6467f958SSadaf Ebrahimi 
92*6467f958SSadaf Ebrahimi   if (commandSubmit > commandStart) {
93*6467f958SSadaf Ebrahimi     log_error("CL_PROFILING_COMMAND_SUBMIT > CL_PROFILING_COMMAND_START.\n");
94*6467f958SSadaf Ebrahimi     err = -1;
95*6467f958SSadaf Ebrahimi   }
96*6467f958SSadaf Ebrahimi 
97*6467f958SSadaf Ebrahimi   if (commandStart > commandEnd) {
98*6467f958SSadaf Ebrahimi     log_error("CL_PROFILING_COMMAND_START > CL_PROFILING_COMMAND_END.\n");
99*6467f958SSadaf Ebrahimi     err = -1;
100*6467f958SSadaf Ebrahimi   }
101*6467f958SSadaf Ebrahimi 
102*6467f958SSadaf Ebrahimi   if (queueStart == 0 && commandStart == 0 && commandEnd == 0) {
103*6467f958SSadaf Ebrahimi     log_error("All values are 0. This is exceedingly unlikely.\n");
104*6467f958SSadaf Ebrahimi     err = -1;
105*6467f958SSadaf Ebrahimi   }
106*6467f958SSadaf Ebrahimi 
107*6467f958SSadaf Ebrahimi   if (queueTosubmitTimeS > QUEUE_SECONDS_LIMIT) {
108*6467f958SSadaf Ebrahimi     log_error("Time between queue and submit is too big: %fs, test limit: %fs.\n",
109*6467f958SSadaf Ebrahimi               queueTosubmitTimeS , (double)QUEUE_SECONDS_LIMIT);
110*6467f958SSadaf Ebrahimi     err = -1;
111*6467f958SSadaf Ebrahimi   }
112*6467f958SSadaf Ebrahimi 
113*6467f958SSadaf Ebrahimi    if (submitToStartTimeS > SUBMIT_SECONDS_LIMIT) {
114*6467f958SSadaf Ebrahimi     log_error("Time between submit and start is too big: %fs, test limit: %fs.\n",
115*6467f958SSadaf Ebrahimi               submitToStartTimeS , (double)QUEUE_SECONDS_LIMIT);
116*6467f958SSadaf Ebrahimi     err = -1;
117*6467f958SSadaf Ebrahimi   }
118*6467f958SSadaf Ebrahimi 
119*6467f958SSadaf Ebrahimi   if (startToEndTimeS > COMMAND_SECONDS_LIMIT) {
120*6467f958SSadaf Ebrahimi     log_error("Time between queue and start is too big: %fs, test limit: %fs.\n",
121*6467f958SSadaf Ebrahimi              startToEndTimeS , (double)QUEUE_SECONDS_LIMIT);
122*6467f958SSadaf Ebrahimi     err = -1;
123*6467f958SSadaf Ebrahimi   }
124*6467f958SSadaf Ebrahimi   return err;
125*6467f958SSadaf Ebrahimi }
126*6467f958SSadaf Ebrahimi 
main(int argc,const char * argv[])127*6467f958SSadaf Ebrahimi int main( int argc, const char *argv[] )
128*6467f958SSadaf Ebrahimi {
129*6467f958SSadaf Ebrahimi     return runTestHarness(argc, argv, test_num, test_list, false,
130*6467f958SSadaf Ebrahimi                           CL_QUEUE_PROFILING_ENABLE);
131*6467f958SSadaf Ebrahimi }
132*6467f958SSadaf Ebrahimi 
133