comparison utils/gengeneric.c @ 37:4b5a557aa64f

*: turns out extern is a practical joke. rewrite to be always inline again the sample benchmark performs about 3x as well with optimizations disabled :)
author Paper <paper@tflc.us>
date Sat, 26 Apr 2025 01:04:35 -0400
parents
children fd42f9b1b95e
comparison
equal deleted inserted replaced
36:677c03c382b8 37:4b5a557aa64f
1 /**
2 * vec - a tiny SIMD vector library in plain C99
3 *
4 * Copyright (c) 2024 Paper
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in all
14 * copies or substantial portions of the Software.
15 *
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 THE
19 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
22 * SOFTWARE.
23 **/
24
25 /* Use this file to generate include/vec/impl/generic.h !!
26 *
27 * `gcc -o gengeneric gengeneric.c` */
28
29 #include <stdio.h>
30 #include <stdlib.h>
31 #include <string.h>
32 #include <ctype.h>
33
34 #define ARRAY_SIZE(x) (sizeof(x)/sizeof((x)[0]))
35
36 /* XXX: would it be faster to unroll literally everything instead of defining everything,
37 * and then unpacking it all? */
38 static const char *header =
39 "/**\n"
40 " * vec - a tiny SIMD vector library in plain C99\n"
41 " * \n"
42 " * Copyright (c) 2024 Paper\n"
43 " * \n"
44 " * Permission is hereby granted, free of charge, to any person obtaining a copy\n"
45 " * of this software and associated documentation files (the \"Software\"), to deal\n"
46 " * in the Software without restriction, including without limitation the rights\n"
47 " * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell\n"
48 " * copies of the Software, and to permit persons to whom the Software is\n"
49 " * furnished to do so, subject to the following conditions:\n"
50 " * \n"
51 " * The above copyright notice and this permission notice shall be included in all\n"
52 " * copies or substantial portions of the Software.\n"
53 " * \n"
54 " * THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\n"
55 " * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,\n"
56 " * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE\n"
57 " * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER\n"
58 " * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,\n"
59 " * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE\n"
60 " * SOFTWARE.\n"
61 "**/\n"
62 "\n"
63 "/* This file is automatically generated! Do not edit it directly!\n"
64 " * Edit the code that generates it in utils/gengeneric.c --paper */\n"
65 "\n"
66 "#ifndef VEC_IMPL_GENERIC_H_\n"
67 "#define VEC_IMPL_GENERIC_H_\n"
68 "\n"
69 "#include <string.h>\n"
70 "\n"
71 "// -----------------------------------------------------------------\n"
72 "\n"
73 "#define VEC_GENERIC_OPERATION(op, sign, bits, size) \\\n"
74 " do { \\\n"
75 " int i; \\\n"
76 " \\\n"
77 " for (i = 0; i < size; i++) \\\n"
78 " vec1.generic[i] = (op); \\\n"
79 " \\\n"
80 " return vec1; \\\n"
81 " } while (0)\n"
82 "\n"
83 "#define VEC_GENERIC_BUILTIN_OPERATION(op, sign, bits, size) \\\n"
84 " VEC_GENERIC_OPERATION(vec1.generic[i] op vec2.generic[i], sign, bits, size)\n"
85 "\n"
86 "#define VEC_GENERIC_CMP(op, sign, bits, size) \\\n"
87 " VEC_GENERIC_OPERATION((vec1.generic[i] op vec2.generic[i]) ? (vec_##sign##int##bits)VEC_MAX_OF_TYPE(vec_uint##bits) : 0, sign, bits, size)\n"
88 "\n"
89 "/* okay, now we can do this crap: */\n"
90 "\n"
91 "#define VEC_GENERIC_SPLAT(sign, bits, size) \\\n"
92 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_splat(vec_##sign##int##bits x) \\\n"
93 " { \\\n"
94 " v##sign##int##bits##x##size vec; \\\n"
95 " for (int i = 0; i < size; i++) \\\n"
96 " vec.generic[i] = x; \\\n"
97 " return vec; \\\n"
98 " }\n"
99 "\n"
100 "#define VEC_GENERIC_LOAD_EX(name, sign, bits, size) \\\n"
101 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_##name(const vec_##sign##int##bits in[size]) \\\n"
102 " { \\\n"
103 " v##sign##int##bits##x##size vec; \\\n"
104 " memcpy(&vec, in, sizeof(vec_##sign##int##bits) * size); \\\n"
105 " return vec; \\\n"
106 " }\n"
107 "\n"
108 "#define VEC_GENERIC_LOAD_ALIGNED(sign, bits, size) VEC_GENERIC_LOAD_EX(load_aligned, sign, bits, size)\n"
109 "#define VEC_GENERIC_LOAD(sign, bits, size) VEC_GENERIC_LOAD_EX(load, sign, bits, size)\n"
110 "\n"
111 "#define VEC_GENERIC_STORE_EX(name, sign, bits, size) \\\n"
112 " VEC_FUNC_IMPL void v##sign##int##bits##x##size##_##name(v##sign##int##bits##x##size vec, vec_##sign##int##bits out[size]) \\\n"
113 " { \\\n"
114 " memcpy(out, &vec, sizeof(vec_##sign##int##bits) * size); \\\n"
115 " }\n"
116 "\n"
117 "#define VEC_GENERIC_STORE_ALIGNED(sign, bits, size) VEC_GENERIC_STORE_EX(store_aligned, sign, bits, size)\n"
118 "#define VEC_GENERIC_STORE(sign, bits, size) VEC_GENERIC_STORE_EX(store, sign, bits, size)\n"
119 "\n"
120 "#define VEC_GENERIC_ADD(sign, bits, size) \\\n"
121 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_add(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
122 " { \\\n"
123 " VEC_GENERIC_BUILTIN_OPERATION(+, sign, bits, size); \\\n"
124 " }\n"
125 "\n"
126 "#define VEC_GENERIC_SUB(sign, bits, size) \\\n"
127 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_sub(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
128 " { \\\n"
129 " VEC_GENERIC_BUILTIN_OPERATION(-, sign, bits, size); \\\n"
130 " }\n"
131 "\n"
132 "#define VEC_GENERIC_MUL(sign, bits, size) \\\n"
133 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_mul(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
134 " { \\\n"
135 " VEC_GENERIC_BUILTIN_OPERATION(*, sign, bits, size); \\\n"
136 " }\n"
137 "\n"
138 "#define VEC_GENERIC_DIV(sign, bits, size) \\\n"
139 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_div(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
140 " { \\\n"
141 " VEC_GENERIC_OPERATION(vec2.generic[i] ? (vec1.generic[i] / vec2.generic[i]) : 0, sign, bits, size); \\\n"
142 " }\n"
143 "\n"
144 "#define VEC_GENERIC_AVG(sign, bits, size) \\\n"
145 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_avg(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
146 " { \\\n"
147 " for (int i = 0; i < size; i++) \\\n"
148 " vec1.generic[i] = vec_##sign##avg(vec1.generic[i], vec2.generic[i]); \\\n"
149 " \\\n"
150 " return vec1; \\\n"
151 " }\n"
152 "\n"
153 "#define VEC_GENERIC_AND(sign, bits, size) \\\n"
154 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_and(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
155 " { \\\n"
156 " VEC_GENERIC_BUILTIN_OPERATION(&, sign, bits, size); \\\n"
157 " }\n"
158 "\n"
159 "#define VEC_GENERIC_OR(sign, bits, size) \\\n"
160 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_or(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
161 " { \\\n"
162 " VEC_GENERIC_BUILTIN_OPERATION(|, sign, bits, size); \\\n"
163 " }\n"
164 "\n"
165 "#define VEC_GENERIC_XOR(sign, bits, size) \\\n"
166 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_xor(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
167 " { \\\n"
168 " VEC_GENERIC_BUILTIN_OPERATION(^, sign, bits, size); \\\n"
169 " }\n"
170 "\n"
171 "#define VEC_GENERIC_NOT(sign, bits, size) \\\n"
172 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_not(v##sign##int##bits##x##size vec) \\\n"
173 " { \\\n"
174 " return v##sign##int##bits##x##size##_xor(vec, v##sign##int##bits##x##size##_splat((vec_##sign##int##bits)VEC_MAX_OF_TYPE(vec_uint##bits))); \\\n"
175 " }\n"
176 "\n"
177 "#define VEC_GENERIC_CMPLT(sign, bits, size) \\\n"
178 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_cmplt(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
179 " { \\\n"
180 " VEC_GENERIC_CMP(<, sign, bits, size); \\\n"
181 " }\n"
182 "\n"
183 "#define VEC_GENERIC_CMPLE(sign, bits, size) \\\n"
184 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_cmple(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
185 " { \\\n"
186 " return v##sign##int##bits##x##size##_not(v##sign##int##bits##x##size##_cmpgt(vec1, vec2)); \\\n"
187 " }\n"
188 "\n"
189 "#define VEC_GENERIC_CMPEQ(sign, bits, size) \\\n"
190 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_cmpeq(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
191 " { \\\n"
192 " VEC_GENERIC_CMP(==, sign, bits, size); \\\n"
193 " }\n"
194 "\n"
195 "#define VEC_GENERIC_CMPGE(sign, bits, size) \\\n"
196 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_cmpge(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
197 " { \\\n"
198 " return v##sign##int##bits##x##size##_not(v##sign##int##bits##x##size##_cmplt(vec1, vec2)); \\\n"
199 " }\n"
200 "\n"
201 "#define VEC_GENERIC_CMPGT(sign, bits, size) \\\n"
202 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_cmpgt(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
203 " { \\\n"
204 " VEC_GENERIC_CMP(>, sign, bits, size); \\\n"
205 " }\n"
206 "\n"
207 "#define VEC_GENERIC_LSHIFT(sign, bits, size) \\\n"
208 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_lshift(v##sign##int##bits##x##size vec1, vuint##bits##x##size vec2) \\\n"
209 " { \\\n"
210 " VEC_GENERIC_OPERATION(vec_##sign##lshift(vec1.generic[i], vec2.generic[i]), sign, bits, size); \\\n"
211 " }\n"
212 "\n"
213 "#define VEC_GENERIC_RSHIFT(sign, bits, size) \\\n"
214 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_rshift(v##sign##int##bits##x##size vec1, vuint##bits##x##size vec2) \\\n"
215 " { \\\n"
216 " VEC_GENERIC_OPERATION(vec_##sign##rshift(vec1.generic[i], vec2.generic[i]), sign, bits, size); \\\n"
217 " }\n"
218 "\n"
219 "#define VEC_GENERIC_LRSHIFT(sign, bits, size) \\\n"
220 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_lrshift(v##sign##int##bits##x##size vec1, vuint##bits##x##size vec2) \\\n"
221 " { \\\n"
222 " VEC_GENERIC_OPERATION(vec_urshift((vec_uint##bits)vec1.generic[i], vec2.generic[i]), sign, bits, size); \\\n"
223 " }\n"
224 "\n"
225 "#define VEC_GENERIC_MIN(sign, bits, size) \\\n"
226 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_min(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
227 " { \\\n"
228 " v##sign##int##bits##x##size cmplt = v##sign##int##bits##x##size##_cmplt(vec1, vec2); \\\n"
229 " \\\n"
230 " v##sign##int##bits##x##size a = v##sign##int##bits##x##size##_and(vec1, cmplt); \\\n"
231 " v##sign##int##bits##x##size b = v##sign##int##bits##x##size##_and(vec2, v##sign##int##bits##x##size##_not(cmplt)); \\\n"
232 " \\\n"
233 " return v##sign##int##bits##x##size##_or(a, b); \\\n"
234 " }\n"
235 "\n"
236 "#define VEC_GENERIC_MAX(sign, bits, size) \\\n"
237 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_max(v##sign##int##bits##x##size vec1, v##sign##int##bits##x##size vec2) \\\n"
238 " { \\\n"
239 " v##sign##int##bits##x##size cmplt = v##sign##int##bits##x##size##_cmpgt(vec1, vec2); \\\n"
240 " \\\n"
241 " v##sign##int##bits##x##size a = v##sign##int##bits##x##size##_and(vec1, cmplt); \\\n"
242 " v##sign##int##bits##x##size b = v##sign##int##bits##x##size##_and(vec2, v##sign##int##bits##x##size##_not(cmplt)); \\\n"
243 " \\\n"
244 " return v##sign##int##bits##x##size##_or(a, b); \\\n"
245 " }\n"
246 "\n"
247 "#define VEC_GENERIC_DBL_SPLAT(sign, bits, size, halfsize) \\\n"
248 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_splat(vec_##sign##int##bits x) \\\n"
249 " { \\\n"
250 " v##sign##int##bits##x##size vec; \\\n"
251 " \\\n"
252 " vec.generic[0] = v##sign##int##bits##x##halfsize##_splat(x); \\\n"
253 " vec.generic[1] = v##sign##int##bits##x##halfsize##_splat(x); \\\n"
254 " \\\n"
255 " return vec; \\\n"
256 " }\n"
257 "\n"
258 "#define VEC_GENERIC_DBL_LOAD_EX(name, sign, bits, size, halfsize) \\\n"
259 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_##name(const vec_##sign##int##bits x[size]) \\\n"
260 " { \\\n"
261 " v##sign##int##bits##x##size vec; \\\n"
262 " \\\n"
263 " vec.generic[0] = v##sign##int##bits##x##halfsize##_##name(x); \\\n"
264 " vec.generic[1] = v##sign##int##bits##x##halfsize##_##name(x + halfsize); \\\n"
265 " \\\n"
266 " return vec; \\\n"
267 " }\n"
268 "\n"
269 "#define VEC_GENERIC_DBL_LOAD(sign, bits, size, halfsize) VEC_GENERIC_DBL_LOAD_EX(load, sign, bits, size, halfsize)\n"
270 "#define VEC_GENERIC_DBL_LOAD_ALIGNED(sign, bits, size, halfsize) VEC_GENERIC_DBL_LOAD_EX(load_aligned, sign, bits, size, halfsize)\n"
271 "\n"
272 "#define VEC_GENERIC_DBL_STORE_EX(name, sign, bits, size, halfsize) \\\n"
273 " VEC_FUNC_IMPL void v##sign##int##bits##x##size##_##name(v##sign##int##bits##x##size vec, vec_##sign##int##bits x[size]) \\\n"
274 " { \\\n"
275 " v##sign##int##bits##x##halfsize##_##name(vec.generic[0], x); \\\n"
276 " v##sign##int##bits##x##halfsize##_##name(vec.generic[1], x + halfsize); \\\n"
277 " }\n"
278 "\n"
279 "#define VEC_GENERIC_DBL_STORE(sign, bits, size, halfsize) VEC_GENERIC_DBL_STORE_EX(store, sign, bits, size, halfsize)\n"
280 "#define VEC_GENERIC_DBL_STORE_ALIGNED(sign, bits, size, halfsize) VEC_GENERIC_DBL_STORE_EX(store_aligned, sign, bits, size, halfsize)\n"
281 "\n"
282 "#define VEC_GENERIC_DBL_OP(name, sign, bits, size, halfsize, secondsign) \\\n"
283 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_##name(v##sign##int##bits##x##size vec1, v##secondsign##int##bits##x##size vec2) \\\n"
284 " { \\\n"
285 " vec1.generic[0] = v##sign##int##bits##x##halfsize##_##name(vec1.generic[0], vec2.generic[0]); \\\n"
286 " vec1.generic[1] = v##sign##int##bits##x##halfsize##_##name(vec1.generic[1], vec2.generic[1]); \\\n"
287 " \\\n"
288 " return vec1; \\\n"
289 " }\n"
290 "\n"
291 "#define VEC_GENERIC_DBL_ADD(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(add, sign, bits, size, halfsize, sign)\n"
292 "#define VEC_GENERIC_DBL_SUB(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(sub, sign, bits, size, halfsize, sign)\n"
293 "#define VEC_GENERIC_DBL_MUL(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(mul, sign, bits, size, halfsize, sign)\n"
294 "#define VEC_GENERIC_DBL_DIV(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(div, sign, bits, size, halfsize, sign)\n"
295 "#define VEC_GENERIC_DBL_AVG(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(avg, sign, bits, size, halfsize, sign)\n"
296 "#define VEC_GENERIC_DBL_LSHIFT(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(lshift, sign, bits, size, halfsize, u)\n"
297 "#define VEC_GENERIC_DBL_RSHIFT(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(rshift, sign, bits, size, halfsize, u)\n"
298 "#define VEC_GENERIC_DBL_LRSHIFT(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(lrshift, sign, bits, size, halfsize, u)\n"
299 "#define VEC_GENERIC_DBL_AND(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(and, sign, bits, size, halfsize, sign)\n"
300 "#define VEC_GENERIC_DBL_OR(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(or, sign, bits, size, halfsize, sign)\n"
301 "#define VEC_GENERIC_DBL_XOR(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(xor, sign, bits, size, halfsize, sign)\n"
302 "#define VEC_GENERIC_DBL_MIN(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(min, sign, bits, size, halfsize, sign)\n"
303 "#define VEC_GENERIC_DBL_MAX(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(max, sign, bits, size, halfsize, sign)\n"
304 "#define VEC_GENERIC_DBL_CMPLT(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(cmplt, sign, bits, size, halfsize, sign)\n"
305 "#define VEC_GENERIC_DBL_CMPLE(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(cmple, sign, bits, size, halfsize, sign)\n"
306 "#define VEC_GENERIC_DBL_CMPEQ(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(cmpeq, sign, bits, size, halfsize, sign)\n"
307 "#define VEC_GENERIC_DBL_CMPGE(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(cmpge, sign, bits, size, halfsize, sign)\n"
308 "#define VEC_GENERIC_DBL_CMPGT(sign, bits, size, halfsize) VEC_GENERIC_DBL_OP(cmpgt, sign, bits, size, halfsize, sign)\n"
309 "\n"
310 "#define VEC_GENERIC_DBL_NOT(sign, bits, size, halfsize) \\\n"
311 " VEC_FUNC_IMPL v##sign##int##bits##x##size v##sign##int##bits##x##size##_not(v##sign##int##bits##x##size vec) \\\n"
312 " { \\\n"
313 " vec.generic[0] = v##sign##int##bits##x##halfsize##_not(vec.generic[0]); \\\n"
314 " vec.generic[1] = v##sign##int##bits##x##halfsize##_not(vec.generic[1]); \\\n"
315 " \\\n"
316 " return vec; \\\n"
317 " }\n"
318 "\n"
319 "/* ------------------------------------------------------------------------ */\n"
320 "/* PREPROCESSOR HELL INCOMING */\n";
321
322 static const char *footer =
323 "#endif /* VEC_IMPL_GENERIC_H_ */\n";
324
325 /* ------------------------------------------------------------------------ */
326
327 static void print_generic_op(const char *op, int is_signed, int bits, int size)
328 {
329 printf(
330 "#ifndef V%sINT%dx%d_%s_DEFINED\n"
331 "VEC_GENERIC_%s(%s, %d, %d)\n"
332 "# define V%sINT%dx%d_%s_DEFINED\n"
333 "#endif\n",
334 (is_signed ? "" : "U"), bits, size, op, op, (is_signed ? "/* nothing */" : "u"), bits, size, (is_signed ? "" : "U"), bits, size, op);
335 }
336
337 static void print_generic_dbl_op(const char *op, int is_signed, int bits, int size)
338 {
339 printf(
340 "#ifndef V%sINT%dx%d_%s_DEFINED\n"
341 "VEC_GENERIC_DBL_%s(%s, %d, %d, %d)\n"
342 "# define V%sINT%dx%d_%s_DEFINED\n"
343 "#endif\n\n",
344 (is_signed ? "" : "U"), bits, size, op, op, (is_signed ? "/* nothing */" : "u"), bits, size, size / 2, (is_signed ? "" : "U"), bits, size, op);
345 }
346
347 typedef void (*print_op_spec)(const char *op, int is_signed, int bits, int size);
348
349 static inline void print_ops(int is_signed, int bits, int size, print_op_spec print_op)
350 {
351 /* all supported operations here */
352 static const char *ops[] = {
353 "SPLAT",
354 "LOAD_ALIGNED",
355 "LOAD",
356 "STORE_ALIGNED",
357 "STORE",
358 "ADD",
359 "SUB",
360 "MUL",
361 "DIV",
362 "AVG",
363 "AND",
364 "OR",
365 "XOR",
366 "NOT",
367 "CMPLT",
368 "CMPEQ",
369 "CMPGT",
370 "CMPLE", /* these two must be after CMPLT and CMPGT respectfully, */
371 "CMPGE", /* because their definitions call those functions */
372 "MIN",
373 "MAX",
374 "RSHIFT",
375 "LRSHIFT",
376 "LSHIFT",
377 NULL,
378 };
379 int i;
380
381 printf("\n\n/* v%sint%dx%d */\n\n", (is_signed ? "u" : ""), bits, size);
382
383 for (i = 0; ops[i]; i++)
384 print_op(ops[i], is_signed, bits, size);
385 }
386
387 int main(void)
388 {
389 static struct {
390 int bits, size;
391 print_op_spec print_op;
392 } defs[] = {
393 /* -- 8-bit */
394 {8, 2, print_generic_op},
395 {8, 4, print_generic_dbl_op},
396 {8, 8, print_generic_dbl_op},
397 {8, 16, print_generic_dbl_op},
398 {8, 32, print_generic_dbl_op},
399 {8, 64, print_generic_dbl_op},
400
401 /* -- 16-bit */
402 {16, 2, print_generic_op},
403 {16, 4, print_generic_dbl_op},
404 {16, 8, print_generic_dbl_op},
405 {16, 16, print_generic_dbl_op},
406 {16, 32, print_generic_dbl_op},
407
408 /* -- 32-bit */
409 {32, 2, print_generic_op},
410 {32, 4, print_generic_dbl_op},
411 {32, 8, print_generic_dbl_op},
412 {32, 16, print_generic_dbl_op},
413
414 /* -- 64-bit */
415 {64, 2, print_generic_op},
416 {64, 4, print_generic_dbl_op},
417 {64, 8, print_generic_dbl_op},
418 };
419 int i;
420
421 puts(header);
422
423 for (i = 0; i < ARRAY_SIZE(defs); i++) {
424 print_ops(1, defs[i].bits, defs[i].size, defs[i].print_op);
425 print_ops(0, defs[i].bits, defs[i].size, defs[i].print_op);
426 }
427
428 puts(footer);
429 }