1 /* { dg-do run { target { power10_hw } } } */
2 /* { dg-do link { target { ! power10_hw } } } */
3 /* { dg-require-effective-target power10_ok } */
4 /* { dg-options "-mdejagnu-cpu=power10 -save-temps" } */
5 #include <altivec.h>
6
7 #define DEBUG 0
8
9 #if DEBUG
10 #include <stdio.h>
11 #endif
12
13 extern void abort (void);
14
15 int
16 main (int argc, char *argv [])
17 {
18 int i;
19 vector signed char vsrc_a_char, vsrc_b_char;
20 vector signed char vresult_char;
21 vector signed char expected_vresult_char;
22
23 vector unsigned char vsrc_a_uchar, vsrc_b_uchar, vsrc_c_uchar;
24 vector unsigned char vresult_uchar;
25 vector unsigned char expected_vresult_uchar;
26
27 vector signed short vsrc_a_short, vsrc_b_short, vsrc_c_short;
28 vector signed short vresult_short;
29 vector signed short expected_vresult_short;
30
31 vector unsigned short vsrc_a_ushort, vsrc_b_ushort, vsrc_c_ushort;
32 vector unsigned short vresult_ushort;
33 vector unsigned short expected_vresult_ushort;
34
35 vector int vsrc_a_int, vsrc_b_int, vsrc_c_int;
36 vector int vresult_int;
37 vector int expected_vresult_int;
38
39 vector unsigned int vsrc_a_uint, vsrc_b_uint, vsrc_c_uint;
40 vector unsigned int vresult_uint;
41 vector unsigned int expected_vresult_uint;
42
43 vector long long int vsrc_a_ll, vsrc_b_ll, vsrc_c_ll;
44 vector long long int vresult_ll;
45 vector long long int expected_vresult_ll;
46
47 vector unsigned long long int vsrc_a_ull, vsrc_b_ull, vsrc_c_ull;
48 vector unsigned long long int vresult_ull;
49 vector unsigned long long int expected_vresult_ull;
50
51 vector float vresult_f;
52 vector float expected_vresult_f;
53 vector float vsrc_a_f, vsrc_b_f;
54
55 vector double vsrc_a_d, vsrc_b_d;
56 vector double vresult_d;
57 vector double expected_vresult_d;
58
59 /* Vector blend */
60 vsrc_c_uchar = (vector unsigned char) { 0, 0x80, 0, 0x80, 0, 0x80, 0, 0x80,
61 0, 0x80, 0, 0x80, 0, 0x80, 0, 0x80 };
62
63 vsrc_a_char = (vector signed char) { -1, 3, 5, 7, 9, 11, 13, 15,
64 17, 19, 21, 23, 25, 27, 29 };
65 vsrc_b_char = (vector signed char) { 2, -4, 6, 8, 10, 12, 14, 16,
66 18, 20, 22, 24, 26, 28, 30, 32 };
67 vsrc_c_uchar = (vector unsigned char) { 0, 0x80, 0, 0x80, 0, 0x80, 0, 0x80,
68 0, 0x80, 0, 0x80, 0, 0x80, 0, 0x80 };
69 vresult_char = (vector signed char) { 0, 0, 0, 0, 0, 0, 0, 0,
70 0, 0, 0, 0, 0, 0, 0, 0 };
71 expected_vresult_char = (vector signed char) { -1, -4, 5, 8,
72 9, 12, 13, 16,
73 17, 20, 21, 24,
74 25, 28, 29, 32 };
75
76 vresult_char = vec_blendv (vsrc_a_char, vsrc_b_char, vsrc_c_uchar);
77
78 if (!vec_all_eq (vresult_char, expected_vresult_char)) {
79 #if DEBUG
80 printf("ERROR, vec_blendv (vsrc_a_char, vsrc_b_char, vsrc_c_uchar)\n");
81 for(i = 0; i < 16; i++)
82 printf(" vresult_char[%d] = %d, expected_vresult_char[%d] = %d\n",
83 i, vresult_char[i], i, expected_vresult_char[i]);
84 #else
85 abort();
86 #endif
87 }
88
89 vsrc_a_uchar = (vector unsigned char) { 1, 3, 5, 7, 9, 11, 13, 15,
90 17, 19, 21, 23, 25, 27, 29 };
91 vsrc_b_uchar = (vector unsigned char) { 2, 4, 6, 8, 10, 12, 14, 16,
92 18, 20, 22, 24, 26, 28, 30, 32 };
93 vsrc_c_uchar = (vector unsigned char) { 0, 0x80, 0, 0x80, 0, 0x80, 0, 0x80,
94 0, 0x80, 0, 0x80, 0, 0x80, 0, 0x80 };
95 vresult_uchar = (vector unsigned char) { 0, 0, 0, 0, 0, 0, 0, 0,
96 0, 0, 0, 0, 0, 0, 0, 0 };
97 expected_vresult_uchar = (vector unsigned char) { 1, 4, 5, 8,
98 9, 12, 13, 16,
99 17, 20, 21, 24,
100 25, 28, 29, 32 };
101
102 vresult_uchar = vec_blendv (vsrc_a_uchar, vsrc_b_uchar, vsrc_c_uchar);
103
104 if (!vec_all_eq (vresult_uchar, expected_vresult_uchar)) {
105 #if DEBUG
106 printf("ERROR, vec_blendv (vsrc_a_uchar, vsrc_b_uchar, vsrc_c_uchar)\n");
107 for(i = 0; i < 16; i++)
108 printf(" vresult_uchar[%d] = %d, expected_vresult_uchar[%d] = %d\n",
109 i, vresult_uchar[i], i, expected_vresult_uchar[i]);
110 #else
111 abort();
112 #endif
113 }
114
115 vsrc_a_short = (vector signed short) { -1, 3, 5, 7, 9, 11, 13, 15 };
116 vsrc_b_short = (vector signed short) { 2, -4, 6, 8, 10, 12, 14, 16 };
117 vsrc_c_ushort = (vector unsigned short) { 0, 0x8000, 0, 0x8000,
118 0, 0x8000, 0, 0x8000 };
119 vresult_short = (vector signed short) { 0, 0, 0, 0, 0, 0, 0, 0 };
120 expected_vresult_short = (vector signed short) { -1, -4, 5, 8,
121 9, 12, 13, 16 };
122
123 vresult_short = vec_blendv (vsrc_a_short, vsrc_b_short, vsrc_c_ushort);
124
125 if (!vec_all_eq (vresult_short, expected_vresult_short)) {
126 #if DEBUG
127 printf("ERROR, vec_blendv (vsrc_a_short, vsrc_b_short, vsrc_c_ushort)\n");
128 for(i = 0; i < 8; i++)
129 printf(" vresult_short[%d] = %d, expected_vresult_short[%d] = %d\n",
130 i, vresult_short[i], i, expected_vresult_short[i]);
131 #else
132 abort();
133 #endif
134 }
135
136 vsrc_a_ushort = (vector unsigned short) { 1, 3, 5, 7, 9, 11, 13, 15 };
137 vsrc_b_ushort = (vector unsigned short) { 2, 4, 6, 8, 10, 12, 14, 16 };
138 vsrc_c_ushort = (vector unsigned short) { 0, 0x8000, 0, 0x8000,
139 0, 0x8000, 0, 0x8000 };
140 vresult_ushort = (vector unsigned short) { 0, 0, 0, 0, 0, 0, 0, 0 };
141 expected_vresult_ushort = (vector unsigned short) { 1, 4, 5, 8,
142 9, 12, 13, 16 };
143
144 vresult_ushort = vec_blendv (vsrc_a_ushort, vsrc_b_ushort, vsrc_c_ushort);
145
146 if (!vec_all_eq (vresult_ushort, expected_vresult_ushort)) {
147 #if DEBUG
148 printf("ERROR, vec_blendv (vsrc_a_ushort, vsrc_b_ushort, "
149 "vsrc_c_ushort)\n");
150 for(i = 0; i < 8; i++)
151 printf(" vresult_ushort[%d] = %d, expected_vresult_ushort[%d] = %d\n",
152 i, vresult_ushort[i], i, expected_vresult_ushort[i]);
153 #else
154 abort();
155 #endif
156 }
157
158 vsrc_a_int = (vector signed int) { -1, -3, -5, -7 };
159 vsrc_b_int = (vector signed int) { 2, 4, 6, 8 };
160 vsrc_c_uint = (vector unsigned int) { 0, 0x80000000, 0, 0x80000000};
161 vresult_int = (vector signed int) { 0, 0, 0, 0 };
162 expected_vresult_int = (vector signed int) { -1, 4, -5, 8 };
163
164 vresult_int = vec_blendv (vsrc_a_int, vsrc_b_int, vsrc_c_uint);
165
166 if (!vec_all_eq (vresult_int, expected_vresult_int)) {
167 #if DEBUG
168 printf("ERROR, vec_blendv (vsrc_a_int, vsrc_b_int, vsrc_c_uint)\n");
169 for(i = 0; i < 4; i++)
170 printf(" vresult_int[%d] = %d, expected_vresult_int[%d] = %d\n",
171 i, vresult_int[i], i, expected_vresult_int[i]);
172 #else
173 abort();
174 #endif
175 }
176
177 vsrc_a_uint = (vector unsigned int) { 1, 3, 5, 7 };
178 vsrc_b_uint = (vector unsigned int) { 2, 4, 6, 8 };
179 vsrc_c_uint = (vector unsigned int) { 0, 0x80000000, 0, 0x80000000 };
180 vresult_uint = (vector unsigned int) { 0, 0, 0, 0 };
181 expected_vresult_uint = (vector unsigned int) { 1, 4, 5, 8 };
182
183 vresult_uint = vec_blendv (vsrc_a_uint, vsrc_b_uint, vsrc_c_uint);
184
185 if (!vec_all_eq (vresult_uint, expected_vresult_uint)) {
186 #if DEBUG
187 printf("ERROR, vec_blendv (vsrc_a_uint, vsrc_b_uint, vsrc_c_uint)\n");
188 for(i = 0; i < 4; i++)
189 printf(" vresult_uint[%d] = %d, expected_vresult_uint[%d] = %d\n",
190 i, vresult_uint[i], i, expected_vresult_uint[i]);
191 #else
192 abort();
193 #endif
194 }
195
196 vsrc_a_ll = (vector signed long long int) { -1, -3 };
197 vsrc_b_ll = (vector signed long long int) { 2, 4, };
198 vsrc_c_ull = (vector unsigned long long int) { 0, 0x8000000000000000ULL };
199 vresult_ll = (vector signed long long int) { 0, 0 };
200 expected_vresult_ll = (vector signed long long int) { -1, 4 };
201
202 vresult_ll = vec_blendv (vsrc_a_ll, vsrc_b_ll, vsrc_c_ull);
203
204 if (!vec_all_eq (vresult_ll, expected_vresult_ll)) {
205 #if DEBUG
206 printf("ERROR, vec_blendv (vsrc_a_ll, vsrc_b_ll, vsrc_c_ull)\n");
207 for(i = 0; i < 2; i++)
208 printf(" vresult_ll[%d] = %d, expected_vresult_ll[%d] = %d\n",
209 i, vresult_ll[i], i, expected_vresult_ll[i]);
210 #else
211 abort();
212 #endif
213 }
214
215 vsrc_a_ull = (vector unsigned long long) { 1, 3 };
216 vsrc_b_ull = (vector unsigned long long) { 2, 4 };
217 vsrc_c_ull = (vector unsigned long long int) { 0, 0x8000000000000000ULL };
218 vresult_ull = (vector unsigned long long) { 0, 0 };
219 expected_vresult_ull = (vector unsigned long long) { 1, 4 };
220
221 vresult_ull = vec_blendv (vsrc_a_ull, vsrc_b_ull, vsrc_c_ull);
222
223 if (!vec_all_eq (vresult_ull, expected_vresult_ull)) {
224 #if DEBUG
225 printf("ERROR, vec_blendv (vsrc_a_ull, vsrc_b_ull, vsrc_c_ull)\n");
226 for(i = 0; i < 2; i++)
227 printf(" vresult_ull[%d] = %d, expected_vresult_ull[%d] = %d\n",
228 i, vresult_ull[i], i, expected_vresult_ull[i]);
229 #else
230 abort();
231 #endif
232 }
233
234 vsrc_a_f = (vector float) { -1.0, -3.0, -5.0, -7.0 };
235 vsrc_b_f = (vector float) { 2.0, 4.0, 6.0, 8.0 };
236 vsrc_c_uint = (vector unsigned int) { 0, 0x80000000, 0, 0x80000000};
237 vresult_f = (vector float) { 0, 0, 0, 0 };
238 expected_vresult_f = (vector float) { -1, 4, -5, 8 };
239
240 vresult_f = vec_blendv (vsrc_a_f, vsrc_b_f, vsrc_c_uint);
241
242 if (!vec_all_eq (vresult_f, expected_vresult_f)) {
243 #if DEBUG
244 printf("ERROR, vec_blendv (vsrc_a_f, vsrc_b_f, vsrc_c_uint)\n");
245 for(i = 0; i < 4; i++)
246 printf(" vresult_f[%d] = %d, expected_vresult_f[%d] = %d\n",
247 i, vresult_f[i], i, expected_vresult_f[i]);
248 #else
249 abort();
250 #endif
251 }
252
253 vsrc_a_d = (vector double) { -1.0, -3.0 };
254 vsrc_b_d = (vector double) { 2.0, 4.0 };
255 vsrc_c_ull = (vector unsigned long long int) { 0, 0x8000000000000000ULL };
256 vresult_d = (vector double) { 0, 0 };
257 expected_vresult_d = (vector double) { -1, 4 };
258
259 vresult_d = vec_blendv (vsrc_a_d, vsrc_b_d, vsrc_c_ull);
260
261 if (!vec_all_eq (vresult_d, expected_vresult_d)) {
262 #if DEBUG
263 printf("ERROR, vec_blendv (vsrc_a_d, vsrc_b_d, vsrc_c_ull)\n");
264 for(i = 0; i < 4; i++)
265 printf(" vresult_d[%d] = %d, expected_vresult_d[%d] = %d\n",
266 i, vresult_d[i], i, expected_vresult_d[i]);
267 #else
268 abort();
269 #endif
270 }
271
272 return 0;
273 }
274
275 /* { dg-final { scan-assembler-times {\mxxblendvb\M} 2 } } */
276 /* { dg-final { scan-assembler-times {\mxxblendvh\M} 2 } } */
277 /* { dg-final { scan-assembler-times {\mxxblendvw\M} 3 } } */
278 /* { dg-final { scan-assembler-times {\mxxblendvd\M} 3 } } */