1 /**************************************************************************
3 * Copyright 2009 VMware, Inc.
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the
8 * "Software"), to deal in the Software without restriction, including
9 * without limitation the rights to use, copy, modify, merge, publish,
10 * distribute, sub license, and/or sell copies of the Software, and to
11 * permit persons to whom the Software is furnished to do so, subject to
12 * the following conditions:
14 * The above copyright notice and this permission notice (including the
15 * next paragraph) shall be included in all copies or substantial portions
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
21 * IN NO EVENT SHALL VMWARE AND/OR ITS SUPPLIERS BE LIABLE FOR
22 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
23 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
24 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
26 **************************************************************************/
33 #include "util/u_memory.h"
34 #include "util/u_pointer.h"
35 #include "util/u_string.h"
36 #include "util/u_format.h"
37 #include "util/u_format_tests.h"
38 #include "util/u_format_s3tc.h"
40 #include "gallivm/lp_bld.h"
41 #include "gallivm/lp_bld_debug.h"
42 #include "gallivm/lp_bld_format.h"
43 #include "gallivm/lp_bld_init.h"
49 write_tsv_header(FILE *fp)
60 write_tsv_row(FILE *fp,
61 const struct util_format_description *desc,
64 fprintf(fp, "%s\t", success ? "pass" : "fail");
66 fprintf(fp, "%s\n", desc->name);
73 (*fetch_ptr_t)(void *unpacked, const void *packed,
74 unsigned i, unsigned j);
78 add_fetch_rgba_test(struct gallivm_state *gallivm, unsigned verbose,
79 const struct util_format_description *desc,
83 LLVMContextRef context = gallivm->context;
84 LLVMModuleRef module = gallivm->module;
85 LLVMBuilderRef builder = gallivm->builder;
86 LLVMPassManagerRef passmgr = gallivm->passmgr;
89 LLVMValueRef packed_ptr;
90 LLVMValueRef offset = LLVMConstNull(LLVMInt32TypeInContext(context));
91 LLVMValueRef rgba_ptr;
94 LLVMBasicBlockRef block;
97 util_snprintf(name, sizeof name, "fetch_%s_%s", desc->short_name,
98 type.floating ? "float" : "unorm8");
100 args[0] = LLVMPointerType(lp_build_vec_type(gallivm, type), 0);
101 args[1] = LLVMPointerType(LLVMInt8TypeInContext(context), 0);
102 args[3] = args[2] = LLVMInt32TypeInContext(context);
104 func = LLVMAddFunction(module, name,
105 LLVMFunctionType(LLVMVoidTypeInContext(context),
106 args, Elements(args), 0));
107 LLVMSetFunctionCallConv(func, LLVMCCallConv);
108 rgba_ptr = LLVMGetParam(func, 0);
109 packed_ptr = LLVMGetParam(func, 1);
110 i = LLVMGetParam(func, 2);
111 j = LLVMGetParam(func, 3);
113 block = LLVMAppendBasicBlockInContext(context, func, "entry");
114 LLVMPositionBuilderAtEnd(builder, block);
116 rgba = lp_build_fetch_rgba_aos(gallivm, desc, type,
117 packed_ptr, offset, i, j);
119 LLVMBuildStore(builder, rgba, rgba_ptr);
121 LLVMBuildRetVoid(builder);
123 if (LLVMVerifyFunction(func, LLVMPrintMessageAction)) {
128 LLVMRunFunctionPassManager(passmgr, func);
140 test_format_float(struct gallivm_state *gallivm, unsigned verbose, FILE *fp,
141 const struct util_format_description *desc)
143 LLVMValueRef fetch = NULL;
144 LLVMExecutionEngineRef engine = gallivm->engine;
145 fetch_ptr_t fetch_ptr;
146 PIPE_ALIGN_VAR(16) float unpacked[4];
147 boolean first = TRUE;
148 boolean success = TRUE;
152 fetch = add_fetch_rgba_test(gallivm, verbose, desc, lp_float32_vec4_type());
154 f = LLVMGetPointerToGlobal(engine, fetch);
155 fetch_ptr = (fetch_ptr_t) pointer_to_func(f);
161 for (l = 0; l < util_format_nr_test_cases; ++l) {
162 const struct util_format_test_case *test = &util_format_test_cases[l];
164 if (test->format == desc->format) {
167 printf("Testing %s (float) ...\n",
172 for (i = 0; i < desc->block.height; ++i) {
173 for (j = 0; j < desc->block.width; ++j) {
176 memset(unpacked, 0, sizeof unpacked);
178 fetch_ptr(unpacked, test->packed, j, i);
181 for(k = 0; k < 4; ++k)
182 if (fabs((float)test->unpacked[i][j][k] - unpacked[k]) > FLT_EPSILON)
187 printf(" Packed: %02x %02x %02x %02x\n",
188 test->packed[0], test->packed[1], test->packed[2], test->packed[3]);
189 printf(" Unpacked (%u,%u): %f %f %f %f obtained\n",
191 unpacked[0], unpacked[1], unpacked[2], unpacked[3]);
192 printf(" %f %f %f %f expected\n",
193 test->unpacked[i][j][0],
194 test->unpacked[i][j][1],
195 test->unpacked[i][j][2],
196 test->unpacked[i][j][3]);
206 LLVMDumpValue(fetch);
210 LLVMFreeMachineCodeForFunction(engine, fetch);
211 LLVMDeleteFunction(fetch);
214 write_tsv_row(fp, desc, success);
222 test_format_unorm8(struct gallivm_state *gallivm,
223 unsigned verbose, FILE *fp,
224 const struct util_format_description *desc)
226 LLVMValueRef fetch = NULL;
227 fetch_ptr_t fetch_ptr;
229 boolean first = TRUE;
230 boolean success = TRUE;
234 fetch = add_fetch_rgba_test(gallivm, verbose, desc, lp_unorm8_vec4_type());
236 f = LLVMGetPointerToGlobal(gallivm->engine, fetch);
237 fetch_ptr = (fetch_ptr_t) pointer_to_func(f);
243 for (l = 0; l < util_format_nr_test_cases; ++l) {
244 const struct util_format_test_case *test = &util_format_test_cases[l];
246 if (test->format == desc->format) {
249 printf("Testing %s (unorm8) ...\n",
254 for (i = 0; i < desc->block.height; ++i) {
255 for (j = 0; j < desc->block.width; ++j) {
258 memset(unpacked, 0, sizeof unpacked);
260 fetch_ptr(unpacked, test->packed, j, i);
263 for(k = 0; k < 4; ++k) {
264 int error = float_to_ubyte(test->unpacked[i][j][k]) - unpacked[k];
273 printf(" Packed: %02x %02x %02x %02x\n",
274 test->packed[0], test->packed[1], test->packed[2], test->packed[3]);
275 printf(" Unpacked (%u,%u): %02x %02x %02x %02x obtained\n",
277 unpacked[0], unpacked[1], unpacked[2], unpacked[3]);
278 printf(" %02x %02x %02x %02x expected\n",
279 float_to_ubyte(test->unpacked[i][j][0]),
280 float_to_ubyte(test->unpacked[i][j][1]),
281 float_to_ubyte(test->unpacked[i][j][2]),
282 float_to_ubyte(test->unpacked[i][j][3]));
291 LLVMDumpValue(fetch);
293 LLVMFreeMachineCodeForFunction(gallivm->engine, fetch);
294 LLVMDeleteFunction(fetch);
297 write_tsv_row(fp, desc, success);
306 test_one(struct gallivm_state *gallivm,
307 unsigned verbose, FILE *fp,
308 const struct util_format_description *format_desc)
310 boolean success = TRUE;
312 if (!test_format_float(gallivm, verbose, fp, format_desc)) {
316 if (!test_format_unorm8(gallivm, verbose, fp, format_desc)) {
325 test_all(struct gallivm_state *gallivm, unsigned verbose, FILE *fp)
327 enum pipe_format format;
328 boolean success = TRUE;
330 util_format_s3tc_init();
332 for (format = 1; format < PIPE_FORMAT_COUNT; ++format) {
333 const struct util_format_description *format_desc;
335 format_desc = util_format_description(format);
344 if (format_desc->colorspace == UTIL_FORMAT_COLORSPACE_ZS) {
348 if (format_desc->layout == UTIL_FORMAT_LAYOUT_S3TC &&
349 !util_format_s3tc_enabled) {
353 if (!test_one(gallivm, verbose, fp, format_desc)) {
363 test_some(struct gallivm_state *gallivm, unsigned verbose, FILE *fp,
366 return test_all(gallivm, verbose, fp);
371 test_single(struct gallivm_state *gallivm, unsigned verbose, FILE *fp)
373 printf("no test_single()");