1 //
2 // Copyright (c) 2017 The Khronos Group Inc.
3 //
4 // Licensed under the Apache License, Version 2.0 (the "License");
5 // you may not use this file except in compliance with the License.
6 // You may obtain a copy of the License at
7 //
8 // http://www.apache.org/licenses/LICENSE-2.0
9 //
10 // Unless required by applicable law or agreed to in writing, software
11 // distributed under the License is distributed on an "AS IS" BASIS,
12 // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 // See the License for the specific language governing permissions and
14 // limitations under the License.
15 //
16 #include "../testBase.h"
17
18 #define MAX_ERR 0.005f
19 #define MAX_HALF_LINEAR_ERR 0.3f
20
21 extern bool gDebugTrace, gDisableOffsets, gTestSmallImages, gEnablePitch, gTestMaxImages, gTestMipmaps;
22 extern cl_filter_mode gFilterModeToUse;
23 extern cl_addressing_mode gAddressModeToUse;
24 extern uint64_t gRoundingStartValue;
25
26 extern int test_copy_image_generic( cl_context context, cl_command_queue queue, image_descriptor *srcImageInfo, image_descriptor *dstImageInfo,
27 const size_t sourcePos[], const size_t destPos[], const size_t regionSize[], MTdata d );
28
test_copy_image_size_1D_array(cl_context context,cl_command_queue queue,image_descriptor * imageInfo,MTdata d)29 int test_copy_image_size_1D_array( cl_context context, cl_command_queue queue, image_descriptor *imageInfo, MTdata d )
30 {
31 size_t sourcePos[ 3 ], destPos[ 3 ], regionSize[ 3 ];
32 int ret = 0, retCode;
33 size_t src_lod = 0, src_width_lod = imageInfo->width, src_row_pitch_lod;
34 size_t dst_lod = 0, dst_width_lod = imageInfo->width, dst_row_pitch_lod;
35 size_t width_lod = imageInfo->width;
36 size_t max_mip_level;
37
38 if( gTestMipmaps )
39 {
40 max_mip_level = imageInfo->num_mip_levels;
41 // Work at a random mip level
42 src_lod = (size_t)random_in_range( 0, max_mip_level ? max_mip_level - 1 : 0, d );
43 dst_lod = (size_t)random_in_range( 0, max_mip_level ? max_mip_level - 1 : 0, d );
44 src_width_lod = ( imageInfo->width >> src_lod )? ( imageInfo->width >> src_lod ) : 1;
45 dst_width_lod = ( imageInfo->width >> dst_lod )? ( imageInfo->width >> dst_lod ) : 1;
46 width_lod = ( src_width_lod > dst_width_lod ) ? dst_width_lod : src_width_lod;
47 src_row_pitch_lod = src_width_lod * get_pixel_size( imageInfo->format );
48 dst_row_pitch_lod = dst_width_lod * get_pixel_size( imageInfo->format );
49 }
50
51 // First, try just a full covering region
52 sourcePos[ 0 ] = sourcePos[ 1 ] = sourcePos[ 2 ] = 0;
53 destPos[ 0 ] = destPos[ 1 ] = destPos[ 2 ] = 0;
54 regionSize[ 0 ] = imageInfo->width;
55 regionSize[ 1 ] = imageInfo->arraySize;
56 regionSize[ 2 ] = 1;
57
58 if(gTestMipmaps)
59 {
60 sourcePos[ 2 ] = src_lod;
61 destPos[ 2 ] = dst_lod;
62 regionSize[ 0 ] = width_lod;
63 }
64
65 retCode = test_copy_image_generic( context, queue, imageInfo, imageInfo, sourcePos, destPos, regionSize, d );
66 if( retCode < 0 )
67 return retCode;
68 else
69 ret += retCode;
70
71 // Now try a sampling of different random regions
72 for( int i = 0; i < 8; i++ )
73 {
74 if( gTestMipmaps )
75 {
76 // Work at a random mip level
77 src_lod = (size_t) ( max_mip_level > 1 )? random_in_range( 0, max_mip_level - 1 , d ) : 0;
78 dst_lod = (size_t) ( max_mip_level > 1 )? random_in_range( 0, max_mip_level - 1 , d ) : 0;
79 src_width_lod = ( imageInfo->width >> src_lod )? ( imageInfo->width >> src_lod ) : 1;
80 dst_width_lod = ( imageInfo->width >> dst_lod )? ( imageInfo->width >> dst_lod ) : 1;
81 width_lod = ( src_width_lod > dst_width_lod ) ? dst_width_lod : src_width_lod;
82 sourcePos[ 2 ] = src_lod;
83 destPos[ 2 ] = dst_lod;
84 }
85 // Pick a random size
86 regionSize[ 0 ] = ( width_lod > 8 ) ? (size_t)random_in_range( 8, (int)width_lod - 1, d ) : (int)width_lod;
87 regionSize[ 1 ] = ( imageInfo->arraySize > 8 ) ? (size_t)random_in_range( 8, (int)imageInfo->arraySize - 1, d ) : imageInfo->arraySize;
88
89 // Now pick positions within valid ranges
90 sourcePos[ 0 ] = ( width_lod > regionSize[ 0 ] ) ? (size_t)random_in_range( 0, (int)( width_lod - regionSize[ 0 ] - 1 ), d ) : 0;
91 sourcePos[ 1 ] = ( imageInfo->arraySize > regionSize[ 1 ] ) ? (size_t)random_in_range( 0, (int)( imageInfo->arraySize - regionSize[ 1 ] - 1 ), d ) : 0;
92
93
94 destPos[ 0 ] = ( width_lod > regionSize[ 0 ] ) ? (size_t)random_in_range( 0, (int)( width_lod - regionSize[ 0 ] - 1 ), d ) : 0;
95 destPos[ 1 ] = ( imageInfo->arraySize > regionSize[ 1 ] ) ? (size_t)random_in_range( 0, (int)( imageInfo->arraySize - regionSize[ 1 ] - 1 ), d ) : 0;
96
97
98 // Go for it!
99 retCode = test_copy_image_generic( context, queue, imageInfo, imageInfo, sourcePos, destPos, regionSize, d );
100 if( retCode < 0 )
101 return retCode;
102 else
103 ret += retCode;
104 }
105
106 return ret;
107 }
108
test_copy_image_set_1D_array(cl_device_id device,cl_context context,cl_command_queue queue,cl_image_format * format)109 int test_copy_image_set_1D_array( cl_device_id device, cl_context context, cl_command_queue queue, cl_image_format *format )
110 {
111 size_t maxWidth, maxArraySize;
112 cl_ulong maxAllocSize, memSize;
113 image_descriptor imageInfo = { 0 };
114 RandomSeed seed(gRandomSeed);
115 size_t pixelSize;
116
117 imageInfo.format = format;
118 imageInfo.type = CL_MEM_OBJECT_IMAGE1D_ARRAY;
119 pixelSize = get_pixel_size( imageInfo.format );
120
121 int error = clGetDeviceInfo( device, CL_DEVICE_IMAGE2D_MAX_WIDTH, sizeof( maxWidth ), &maxWidth, NULL );
122 error |= clGetDeviceInfo( device, CL_DEVICE_IMAGE_MAX_ARRAY_SIZE, sizeof( maxArraySize ), &maxArraySize, NULL );
123 error |= clGetDeviceInfo( device, CL_DEVICE_MAX_MEM_ALLOC_SIZE, sizeof( maxAllocSize ), &maxAllocSize, NULL );
124 error |= clGetDeviceInfo( device, CL_DEVICE_GLOBAL_MEM_SIZE, sizeof( memSize ), &memSize, NULL );
125 test_error( error, "Unable to get max image 1D array size from device" );
126
127 if (memSize > (cl_ulong)SIZE_MAX) {
128 memSize = (cl_ulong)SIZE_MAX;
129 }
130
131 if( gTestSmallImages )
132 {
133 for( imageInfo.width = 1; imageInfo.width < 13; imageInfo.width++ )
134 {
135 size_t rowPadding = gEnablePitch ? 48 : 0;
136
137 imageInfo.rowPitch = imageInfo.width * pixelSize + rowPadding;
138
139 if (gTestMipmaps)
140 imageInfo.num_mip_levels = (cl_uint) random_log_in_range(2, (int)compute_max_mip_levels(imageInfo.width, 0, 0), seed);
141
142 if (gEnablePitch)
143 {
144 do {
145 rowPadding++;
146 imageInfo.rowPitch = imageInfo.width * pixelSize + rowPadding;
147 } while ((imageInfo.rowPitch % pixelSize) != 0);
148 }
149
150 imageInfo.slicePitch = imageInfo.rowPitch;
151 for( imageInfo.arraySize = 2; imageInfo.arraySize < 9; imageInfo.arraySize++ )
152 {
153 if( gDebugTrace )
154 log_info( " at size %d,%d\n", (int)imageInfo.width, (int)imageInfo.arraySize );
155
156 int ret = test_copy_image_size_1D_array( context, queue, &imageInfo, seed );
157 if( ret )
158 return -1;
159 }
160 }
161 }
162 else if( gTestMaxImages )
163 {
164 // Try a specific set of maximum sizes
165 size_t numbeOfSizes;
166 size_t sizes[100][3];
167
168 get_max_sizes(&numbeOfSizes, 100, sizes, maxWidth, 1, 1, maxArraySize, maxAllocSize, memSize, CL_MEM_OBJECT_IMAGE1D_ARRAY, imageInfo.format);
169
170 for( size_t idx = 0; idx < numbeOfSizes; idx++ )
171 {
172 size_t rowPadding = gEnablePitch ? 48 : 0;
173
174 imageInfo.width = sizes[ idx ][ 0 ];
175 imageInfo.arraySize = sizes[ idx ][ 2 ];
176 imageInfo.rowPitch = imageInfo.width * pixelSize + rowPadding;
177
178 if (gTestMipmaps)
179 imageInfo.num_mip_levels = (cl_uint) random_log_in_range(2, (int)compute_max_mip_levels(imageInfo.width, 0, 0), seed);
180
181 if (gEnablePitch)
182 {
183 do {
184 rowPadding++;
185 imageInfo.rowPitch = imageInfo.width * pixelSize + rowPadding;
186 } while ((imageInfo.rowPitch % pixelSize) != 0);
187 }
188
189 imageInfo.slicePitch = imageInfo.rowPitch;
190 log_info( "Testing %d x %d\n", (int)sizes[ idx ][ 0 ], (int)sizes[ idx ][ 2 ] );
191 if( gDebugTrace )
192 log_info( " at max size %d,%d\n", (int)sizes[ idx ][ 0 ], (int)sizes[ idx ][ 2 ] );
193 if( test_copy_image_size_1D_array( context, queue, &imageInfo, seed ) )
194 return -1;
195 }
196 }
197 else
198 {
199 for( int i = 0; i < NUM_IMAGE_ITERATIONS; i++ )
200 {
201 cl_ulong size;
202 size_t rowPadding = gEnablePitch ? 48 : 0;
203 // Loop until we get a size that a) will fit in the max alloc size and b) that an allocation of that
204 // image, the result array, plus offset arrays, will fit in the global ram space
205 do
206 {
207 imageInfo.width = (size_t)random_log_in_range( 16, (int)maxWidth / 32, seed );
208 imageInfo.arraySize = (size_t)random_log_in_range( 16, (int)maxArraySize / 32, seed );
209 imageInfo.height = imageInfo.depth = 0;
210
211 if (gTestMipmaps)
212 {
213 imageInfo.num_mip_levels = (cl_uint) random_log_in_range(2, (int)compute_max_mip_levels(imageInfo.width, 0, 0), seed);
214 imageInfo.rowPitch = imageInfo.width * get_pixel_size( imageInfo.format );
215 imageInfo.slicePitch = imageInfo.rowPitch;
216 size = compute_mipmapped_image_size( imageInfo );
217 size = size*4;
218 }
219 else
220 {
221 imageInfo.rowPitch = imageInfo.width * pixelSize + rowPadding;
222
223 if (gEnablePitch)
224 {
225 do {
226 rowPadding++;
227 imageInfo.rowPitch = imageInfo.width * pixelSize + rowPadding;
228 } while ((imageInfo.rowPitch % pixelSize) != 0);
229 }
230
231 imageInfo.slicePitch = imageInfo.rowPitch;
232
233 size = (size_t)imageInfo.rowPitch * (size_t)imageInfo.arraySize * 4;
234 }
235 } while( size > maxAllocSize || ( size * 3 ) > memSize );
236
237 if( gDebugTrace )
238 log_info( " at size %d,%d (row pitch %d) out of %d,%d\n", (int)imageInfo.width, (int)imageInfo.arraySize, (int)imageInfo.rowPitch, (int)maxWidth, (int)maxArraySize );
239 int ret = test_copy_image_size_1D_array( context, queue, &imageInfo, seed );
240 if( ret )
241 return -1;
242 }
243 }
244
245 return 0;
246 }
247