1 /**************************************************************************
3 * Copyright © 2010 Luca Barbieri
5 * Permission is hereby granted, free of charge, to any person obtaining a
6 * copy of this software and associated documentation files (the "Software"),
7 * to deal in the Software without restriction, including without limitation
8 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9 * and/or sell copies of the Software, and to permit persons to whom the
10 * Software is furnished to do so, subject to the following conditions:
12 * The above copyright notice and this permission notice (including the next
13 * paragraph) shall be included in all copies or substantial portions of the
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
21 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22 * DEALINGS IN THE SOFTWARE.
24 **************************************************************************/
27 #include "translate/translate.h"
28 #include "util/u_memory.h"
29 #include "util/u_format.h"
30 #include "util/u_half.h"
31 #include "util/u_cpu_detect.h"
32 #include "rtasm/rtasm_cpu.h"
34 /* don't use this for serious use */
35 static double rand_double()
37 const double rm
= (double)RAND_MAX
+ 1;
41 for(i
= 0; i
< 4; ++i
)
44 v
+= (double)rand() / div
;
49 int main(int argc
, char** argv
)
51 struct translate
*(*create_fn
)(const struct translate_key
*key
) = 0;
53 struct translate_key key
;
54 unsigned output_format
;
55 unsigned input_format
;
56 unsigned buffer_size
= 4096;
57 unsigned char* buffer
[5];
58 unsigned char* byte_buffer
;
60 double* double_buffer
;
61 uint16_t *half_buffer
;
67 const float error
= 0.03125;
74 !strcmp(argv
[1], "default") )
75 create_fn
= translate_create
;
76 else if (!strcmp(argv
[1], "generic"))
77 create_fn
= translate_generic_create
;
78 else if (!strcmp(argv
[1], "x86"))
79 create_fn
= translate_sse2_create
;
80 else if (!strcmp(argv
[1], "nosse"))
82 util_cpu_caps
.has_sse
= 0;
83 util_cpu_caps
.has_sse2
= 0;
84 util_cpu_caps
.has_sse3
= 0;
85 util_cpu_caps
.has_sse4_1
= 0;
86 create_fn
= translate_sse2_create
;
88 else if (!strcmp(argv
[1], "sse"))
90 if(!util_cpu_caps
.has_sse
|| !rtasm_cpu_has_sse())
92 printf("Error: CPU doesn't support SSE (test with qemu)\n");
95 util_cpu_caps
.has_sse2
= 0;
96 util_cpu_caps
.has_sse3
= 0;
97 util_cpu_caps
.has_sse4_1
= 0;
98 create_fn
= translate_sse2_create
;
100 else if (!strcmp(argv
[1], "sse2"))
102 if(!util_cpu_caps
.has_sse2
|| !rtasm_cpu_has_sse())
104 printf("Error: CPU doesn't support SSE2 (test with qemu)\n");
107 util_cpu_caps
.has_sse3
= 0;
108 util_cpu_caps
.has_sse4_1
= 0;
109 create_fn
= translate_sse2_create
;
111 else if (!strcmp(argv
[1], "sse3"))
113 if(!util_cpu_caps
.has_sse3
|| !rtasm_cpu_has_sse())
115 printf("Error: CPU doesn't support SSE3 (test with qemu)\n");
118 util_cpu_caps
.has_sse4_1
= 0;
119 create_fn
= translate_sse2_create
;
121 else if (!strcmp(argv
[1], "sse4.1"))
123 if(!util_cpu_caps
.has_sse4_1
|| !rtasm_cpu_has_sse())
125 printf("Error: CPU doesn't support SSE4.1 (test with qemu)\n");
128 create_fn
= translate_sse2_create
;
133 printf("Usage: ./translate_test [default|generic|x86|nosse|sse|sse2|sse3|sse4.1]\n");
137 for (i
= 1; i
< ARRAY_SIZE(buffer
); ++i
)
138 buffer
[i
] = align_malloc(buffer_size
, 4096);
140 byte_buffer
= align_malloc(buffer_size
, 4096);
141 float_buffer
= align_malloc(buffer_size
, 4096);
142 double_buffer
= align_malloc(buffer_size
, 4096);
143 half_buffer
= align_malloc(buffer_size
, 4096);
145 elts
= align_malloc(count
* sizeof *elts
, 4096);
148 key
.element
[0].input_buffer
= 0;
149 key
.element
[0].input_offset
= 0;
150 key
.element
[0].output_offset
= 0;
151 key
.element
[0].type
= TRANSLATE_ELEMENT_NORMAL
;
152 key
.element
[0].instance_divisor
= 0;
156 /* avoid negative values that work badly when converted to unsigned format*/
157 for (i
= 0; i
< buffer_size
; ++i
)
158 byte_buffer
[i
] = rand() & 0x7f7f7f7f;
160 for (i
= 0; i
< buffer_size
/ sizeof(float); ++i
)
161 float_buffer
[i
] = (float)rand_double();
163 for (i
= 0; i
< buffer_size
/ sizeof(double); ++i
)
164 double_buffer
[i
] = rand_double();
166 for (i
= 0; i
< buffer_size
/ sizeof(double); ++i
)
167 half_buffer
[i
] = util_float_to_half((float) rand_double());
169 for (i
= 0; i
< count
; ++i
)
172 for (output_format
= 1; output_format
< PIPE_FORMAT_COUNT
; ++output_format
)
174 const struct util_format_description
* output_format_desc
= util_format_description(output_format
);
175 unsigned output_format_size
;
176 unsigned output_normalized
= 0;
178 if (!output_format_desc
179 || !output_format_desc
->fetch_rgba_float
180 || !output_format_desc
->pack_rgba_float
181 || output_format_desc
->colorspace
!= UTIL_FORMAT_COLORSPACE_RGB
182 || output_format_desc
->layout
!= UTIL_FORMAT_LAYOUT_PLAIN
183 || !translate_is_output_format_supported(output_format
))
186 for(i
= 0; i
< output_format_desc
->nr_channels
; ++i
)
188 if(output_format_desc
->channel
[i
].type
!= UTIL_FORMAT_TYPE_FLOAT
)
189 output_normalized
|= (1 << output_format_desc
->channel
[i
].normalized
);
192 output_format_size
= util_format_get_stride(output_format
, 1);
194 for (input_format
= 1; input_format
< PIPE_FORMAT_COUNT
; ++input_format
)
196 const struct util_format_description
* input_format_desc
= util_format_description(input_format
);
197 unsigned input_format_size
;
198 struct translate
* translate
[2];
200 unsigned used_generic
= 0;
201 unsigned input_normalized
= 0;
202 boolean input_is_float
= FALSE
;
204 if (!input_format_desc
205 || !input_format_desc
->fetch_rgba_float
206 || !input_format_desc
->pack_rgba_float
207 || input_format_desc
->colorspace
!= UTIL_FORMAT_COLORSPACE_RGB
208 || input_format_desc
->layout
!= UTIL_FORMAT_LAYOUT_PLAIN
209 || !translate_is_output_format_supported(input_format
))
212 input_format_size
= util_format_get_stride(input_format
, 1);
214 for(i
= 0; i
< input_format_desc
->nr_channels
; ++i
)
216 if(input_format_desc
->channel
[i
].type
== UTIL_FORMAT_TYPE_FLOAT
)
219 input_normalized
|= 1 << 1;
222 input_normalized
|= (1 << input_format_desc
->channel
[i
].normalized
);
225 if(((input_normalized
| output_normalized
) == 3)
226 || ((input_normalized
& 1) && (output_normalized
& 1)
227 && input_format_size
* output_format_desc
->nr_channels
> output_format_size
* input_format_desc
->nr_channels
))
230 key
.element
[0].input_format
= input_format
;
231 key
.element
[0].output_format
= output_format
;
232 key
.output_stride
= output_format_size
;
233 translate
[0] = create_fn(&key
);
237 key
.element
[0].input_format
= output_format
;
238 key
.element
[0].output_format
= input_format
;
239 key
.output_stride
= input_format_size
;
240 translate
[1] = create_fn(&key
);
244 translate
[1] = translate_generic_create(&key
);
249 for(i
= 1; i
< 5; ++i
)
250 memset(buffer
[i
], 0xcd - (0x22 * i
), 4096);
252 if(input_is_float
&& input_format_desc
->channel
[0].size
== 32)
253 buffer
[0] = (unsigned char*)float_buffer
;
254 else if(input_is_float
&& input_format_desc
->channel
[0].size
== 64)
255 buffer
[0] = (unsigned char*)double_buffer
;
256 else if(input_is_float
&& input_format_desc
->channel
[0].size
== 16)
257 buffer
[0] = (unsigned char*)half_buffer
;
258 else if(input_is_float
)
261 buffer
[0] = byte_buffer
;
263 translate
[0]->set_buffer(translate
[0], 0, buffer
[0], input_format_size
, count
- 1);
264 translate
[0]->run_elts(translate
[0], elts
, count
, 0, 0, buffer
[1]);
265 translate
[1]->set_buffer(translate
[1], 0, buffer
[1], output_format_size
, count
- 1);
266 translate
[1]->run_elts(translate
[1], elts
, count
, 0, 0, buffer
[2]);
267 translate
[0]->set_buffer(translate
[0], 0, buffer
[2], input_format_size
, count
- 1);
268 translate
[0]->run_elts(translate
[0], elts
, count
, 0, 0, buffer
[3]);
269 translate
[1]->set_buffer(translate
[1], 0, buffer
[3], output_format_size
, count
- 1);
270 translate
[1]->run_elts(translate
[1], elts
, count
, 0, 0, buffer
[4]);
272 for (i
= 0; i
< count
; ++i
)
276 input_format_desc
->fetch_rgba_float(a
, buffer
[2] + i
* input_format_size
, 0, 0);
277 input_format_desc
->fetch_rgba_float(b
, buffer
[4] + i
* input_format_size
, 0, 0);
279 for (j
= 0; j
< count
; ++j
)
281 float d
= a
[j
] - b
[j
];
282 if (d
> error
|| d
< -error
)
290 printf("%s%s: %s -> %s -> %s -> %s -> %s\n",
291 fail
? "FAIL" : "PASS",
292 used_generic
? "[GENERIC]" : "",
293 input_format_desc
->name
, output_format_desc
->name
, input_format_desc
->name
, output_format_desc
->name
, input_format_desc
->name
);
297 for (i
= 0; i
< ARRAY_SIZE(buffer
); ++i
)
299 unsigned format_size
= (i
& 1) ? output_format_size
: input_format_size
;
300 printf("%c ", (i
== 2 || i
== 4) ? '*' : ' ');
301 for (j
= 0; j
< count
; ++j
)
303 for (k
= 0; k
< format_size
; ++k
)
305 printf("%02x", buffer
[i
][j
* format_size
+ k
]);
318 translate
[1]->release(translate
[1]);
319 translate
[0]->release(translate
[0]);
323 printf("%u/%u tests passed for translate_%s\n", passed
, total
, argv
[1]);
324 return passed
!= total
;