glsl: move to compiler/
[mesa.git] / src / compiler / glsl / tests / uniform_initializer_utils.cpp
1 /*
2 * Copyright © 2012 Intel Corporation
3 *
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Software"),
6 * to deal in the Software without restriction, including without limitation
7 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
10 *
11 * The above copyright notice and this permission notice (including the next
12 * paragraph) shall be included in all copies or substantial portions of the
13 * Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21 * DEALINGS IN THE SOFTWARE.
22 */
23 #include <gtest/gtest.h>
24 #include "main/mtypes.h"
25 #include "main/macros.h"
26 #include "util/ralloc.h"
27 #include "uniform_initializer_utils.h"
28 #include <stdio.h>
29
30 void
31 fill_storage_array_with_sentinels(gl_constant_value *storage,
32 unsigned data_size,
33 unsigned red_zone_size)
34 {
35 for (unsigned i = 0; i < data_size; i++)
36 storage[i].u = 0xDEADBEEF;
37
38 for (unsigned i = 0; i < red_zone_size; i++)
39 storage[data_size + i].u = 0xBADDC0DE;
40 }
41
42 /**
43 * Verfiy that markers past the end of the real uniform are unmodified
44 */
45 static ::testing::AssertionResult
46 red_zone_is_intact(gl_constant_value *storage,
47 unsigned data_size,
48 unsigned red_zone_size)
49 {
50 for (unsigned i = 0; i < red_zone_size; i++) {
51 const unsigned idx = data_size + i;
52
53 if (storage[idx].u != 0xBADDC0DE)
54 return ::testing::AssertionFailure()
55 << "storage[" << idx << "].u = " << storage[idx].u
56 << ", exepected data values = " << data_size
57 << ", red-zone size = " << red_zone_size;
58 }
59
60 return ::testing::AssertionSuccess();
61 }
62
63 static const int values[] = {
64 2, 0, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53
65 };
66
67 /**
68 * Generate a single data element.
69 *
70 * This is by both \c generate_data and \c generate_array_data to create the
71 * data.
72 */
73 static void
74 generate_data_element(void *mem_ctx, const glsl_type *type,
75 ir_constant *&val, unsigned data_index_base)
76 {
77 /* Set the initial data values for the generated constant.
78 */
79 ir_constant_data data;
80 memset(&data, 0, sizeof(data));
81 for (unsigned i = 0; i < type->components(); i++) {
82 const unsigned idx = (i + data_index_base) % ARRAY_SIZE(values);
83 switch (type->base_type) {
84 case GLSL_TYPE_UINT:
85 case GLSL_TYPE_INT:
86 case GLSL_TYPE_SAMPLER:
87 case GLSL_TYPE_IMAGE:
88 data.i[i] = values[idx];
89 break;
90 case GLSL_TYPE_FLOAT:
91 data.f[i] = float(values[idx]);
92 break;
93 case GLSL_TYPE_BOOL:
94 data.b[i] = bool(values[idx]);
95 break;
96 case GLSL_TYPE_DOUBLE:
97 data.d[i] = double(values[idx]);
98 break;
99 case GLSL_TYPE_ATOMIC_UINT:
100 case GLSL_TYPE_STRUCT:
101 case GLSL_TYPE_ARRAY:
102 case GLSL_TYPE_VOID:
103 case GLSL_TYPE_ERROR:
104 case GLSL_TYPE_INTERFACE:
105 case GLSL_TYPE_SUBROUTINE:
106 ASSERT_TRUE(false);
107 break;
108 }
109 }
110
111 /* Generate and verify the constant.
112 */
113 val = new(mem_ctx) ir_constant(type, &data);
114
115 for (unsigned i = 0; i < type->components(); i++) {
116 switch (type->base_type) {
117 case GLSL_TYPE_UINT:
118 case GLSL_TYPE_INT:
119 case GLSL_TYPE_SAMPLER:
120 case GLSL_TYPE_IMAGE:
121 ASSERT_EQ(data.i[i], val->value.i[i]);
122 break;
123 case GLSL_TYPE_FLOAT:
124 ASSERT_EQ(data.f[i], val->value.f[i]);
125 break;
126 case GLSL_TYPE_BOOL:
127 ASSERT_EQ(data.b[i], val->value.b[i]);
128 break;
129 case GLSL_TYPE_DOUBLE:
130 ASSERT_EQ(data.d[i], val->value.d[i]);
131 break;
132 case GLSL_TYPE_ATOMIC_UINT:
133 case GLSL_TYPE_STRUCT:
134 case GLSL_TYPE_ARRAY:
135 case GLSL_TYPE_VOID:
136 case GLSL_TYPE_ERROR:
137 case GLSL_TYPE_INTERFACE:
138 case GLSL_TYPE_SUBROUTINE:
139 ASSERT_TRUE(false);
140 break;
141 }
142 }
143 }
144
145 void
146 generate_data(void *mem_ctx, enum glsl_base_type base_type,
147 unsigned columns, unsigned rows,
148 ir_constant *&val)
149 {
150 /* Determine what the type of the generated constant should be.
151 */
152 const glsl_type *const type =
153 glsl_type::get_instance(base_type, rows, columns);
154 ASSERT_FALSE(type->is_error());
155
156 generate_data_element(mem_ctx, type, val, 0);
157 }
158
159 void
160 generate_array_data(void *mem_ctx, enum glsl_base_type base_type,
161 unsigned columns, unsigned rows, unsigned array_size,
162 ir_constant *&val)
163 {
164 /* Determine what the type of the generated constant should be.
165 */
166 const glsl_type *const element_type =
167 glsl_type::get_instance(base_type, rows, columns);
168 ASSERT_FALSE(element_type->is_error());
169
170 const glsl_type *const array_type =
171 glsl_type::get_array_instance(element_type, array_size);
172 ASSERT_FALSE(array_type->is_error());
173
174 /* Set the initial data values for the generated constant.
175 */
176 exec_list values_for_array;
177 for (unsigned i = 0; i < array_size; i++) {
178 ir_constant *element;
179
180 generate_data_element(mem_ctx, element_type, element, i);
181 values_for_array.push_tail(element);
182 }
183
184 val = new(mem_ctx) ir_constant(array_type, &values_for_array);
185 }
186
187 /**
188 * Verify that the data stored for the uniform matches the initializer
189 *
190 * \param storage Backing storage for the uniform
191 * \param storage_array_size Array size of the backing storage. This must be
192 * less than or equal to the array size of the type
193 * of \c val. If \c val is not an array, this must
194 * be zero.
195 * \param val Value of the initializer for the unifrom.
196 * \param red_zone
197 */
198 void
199 verify_data(gl_constant_value *storage, unsigned storage_array_size,
200 ir_constant *val, unsigned red_zone_size,
201 unsigned int boolean_true)
202 {
203 if (val->type->base_type == GLSL_TYPE_ARRAY) {
204 const glsl_type *const element_type = val->array_elements[0]->type;
205
206 for (unsigned i = 0; i < storage_array_size; i++) {
207 verify_data(storage + (i * element_type->components()), 0,
208 val->array_elements[i], 0, boolean_true);
209 }
210
211 const unsigned components = element_type->components();
212
213 if (red_zone_size > 0) {
214 EXPECT_TRUE(red_zone_is_intact(storage,
215 storage_array_size * components,
216 red_zone_size));
217 }
218 } else {
219 ASSERT_EQ(0u, storage_array_size);
220 for (unsigned i = 0; i < val->type->components(); i++) {
221 switch (val->type->base_type) {
222 case GLSL_TYPE_UINT:
223 case GLSL_TYPE_INT:
224 case GLSL_TYPE_SAMPLER:
225 case GLSL_TYPE_IMAGE:
226 EXPECT_EQ(val->value.i[i], storage[i].i);
227 break;
228 case GLSL_TYPE_FLOAT:
229 EXPECT_EQ(val->value.f[i], storage[i].f);
230 break;
231 case GLSL_TYPE_BOOL:
232 EXPECT_EQ(val->value.b[i] ? boolean_true : 0, storage[i].i);
233 break;
234 case GLSL_TYPE_DOUBLE:
235 EXPECT_EQ(val->value.d[i], *(double *)&storage[i*2].i);
236 break;
237 case GLSL_TYPE_ATOMIC_UINT:
238 case GLSL_TYPE_STRUCT:
239 case GLSL_TYPE_ARRAY:
240 case GLSL_TYPE_VOID:
241 case GLSL_TYPE_ERROR:
242 case GLSL_TYPE_INTERFACE:
243 case GLSL_TYPE_SUBROUTINE:
244 ASSERT_TRUE(false);
245 break;
246 }
247 }
248
249 if (red_zone_size > 0) {
250 EXPECT_TRUE(red_zone_is_intact(storage,
251 val->type->components(),
252 red_zone_size));
253 }
254 }
255 }