1 /* { dg-do run } */
2 /* { dg-options "-O2 -fno-strict-aliasing -msse2" } */
3 /* { dg-additional-options "-mno-mmx" { target { ! ia32 } } } */
4
5 #include "sse2-check.h"
6 #include "mmx-vals.h"
7
8 __attribute__((noinline, noclone))
9 static void
10 test_pshufw (long long *ll1, unsigned int imm, long long *r)
11 {
12 __m64 t1 = *(__m64 *) ll1;
13 switch (imm)
14 {
15 case 0:
16 *(__m64 *) r = _m_pshufw (t1, 0);
17 break;
18 case 1:
19 *(__m64 *) r = _m_pshufw (t1, 1);
20 break;
21 case 2:
22 *(__m64 *) r = _m_pshufw (t1, 2);
23 break;
24 case 3:
25 *(__m64 *) r = _m_pshufw (t1, 3);
26 break;
27 case 4:
28 *(__m64 *) r = _m_pshufw (t1, 4);
29 break;
30 case 5:
31 *(__m64 *) r = _m_pshufw (t1, 5);
32 break;
33 case 6:
34 *(__m64 *) r = _m_pshufw (t1, 6);
35 break;
36 case 7:
37 *(__m64 *) r = _m_pshufw (t1, 7);
38 break;
39 case 8:
40 *(__m64 *) r = _m_pshufw (t1, 8);
41 break;
42 case 9:
43 *(__m64 *) r = _m_pshufw (t1, 9);
44 break;
45 case 10:
46 *(__m64 *) r = _m_pshufw (t1, 10);
47 break;
48 case 11:
49 *(__m64 *) r = _m_pshufw (t1, 11);
50 break;
51 case 12:
52 *(__m64 *) r = _m_pshufw (t1, 12);
53 break;
54 case 13:
55 *(__m64 *) r = _m_pshufw (t1, 13);
56 break;
57 case 14:
58 *(__m64 *) r = _m_pshufw (t1, 14);
59 break;
60 case 15:
61 *(__m64 *) r = _m_pshufw (t1, 15);
62 break;
63 case 16:
64 *(__m64 *) r = _m_pshufw (t1, 16);
65 break;
66 case 17:
67 *(__m64 *) r = _m_pshufw (t1, 17);
68 break;
69 case 18:
70 *(__m64 *) r = _m_pshufw (t1, 18);
71 break;
72 case 19:
73 *(__m64 *) r = _m_pshufw (t1, 19);
74 break;
75 case 20:
76 *(__m64 *) r = _m_pshufw (t1, 20);
77 break;
78 case 21:
79 *(__m64 *) r = _m_pshufw (t1, 21);
80 break;
81 case 22:
82 *(__m64 *) r = _m_pshufw (t1, 22);
83 break;
84 case 23:
85 *(__m64 *) r = _m_pshufw (t1, 23);
86 break;
87 case 24:
88 *(__m64 *) r = _m_pshufw (t1, 24);
89 break;
90 case 25:
91 *(__m64 *) r = _m_pshufw (t1, 25);
92 break;
93 case 26:
94 *(__m64 *) r = _m_pshufw (t1, 26);
95 break;
96 case 27:
97 *(__m64 *) r = _m_pshufw (t1, 27);
98 break;
99 case 28:
100 *(__m64 *) r = _m_pshufw (t1, 28);
101 break;
102 case 29:
103 *(__m64 *) r = _m_pshufw (t1, 29);
104 break;
105 case 30:
106 *(__m64 *) r = _m_pshufw (t1, 30);
107 break;
108 case 31:
109 *(__m64 *) r = _m_pshufw (t1, 31);
110 break;
111 case 32:
112 *(__m64 *) r = _m_pshufw (t1, 32);
113 break;
114 case 33:
115 *(__m64 *) r = _m_pshufw (t1, 33);
116 break;
117 case 34:
118 *(__m64 *) r = _m_pshufw (t1, 34);
119 break;
120 case 35:
121 *(__m64 *) r = _m_pshufw (t1, 35);
122 break;
123 case 36:
124 *(__m64 *) r = _m_pshufw (t1, 36);
125 break;
126 case 37:
127 *(__m64 *) r = _m_pshufw (t1, 37);
128 break;
129 case 38:
130 *(__m64 *) r = _m_pshufw (t1, 38);
131 break;
132 case 39:
133 *(__m64 *) r = _m_pshufw (t1, 39);
134 break;
135 case 40:
136 *(__m64 *) r = _m_pshufw (t1, 40);
137 break;
138 case 41:
139 *(__m64 *) r = _m_pshufw (t1, 41);
140 break;
141 case 42:
142 *(__m64 *) r = _m_pshufw (t1, 42);
143 break;
144 case 43:
145 *(__m64 *) r = _m_pshufw (t1, 43);
146 break;
147 case 44:
148 *(__m64 *) r = _m_pshufw (t1, 44);
149 break;
150 case 45:
151 *(__m64 *) r = _m_pshufw (t1, 45);
152 break;
153 case 46:
154 *(__m64 *) r = _m_pshufw (t1, 46);
155 break;
156 case 47:
157 *(__m64 *) r = _m_pshufw (t1, 47);
158 break;
159 case 48:
160 *(__m64 *) r = _m_pshufw (t1, 48);
161 break;
162 case 49:
163 *(__m64 *) r = _m_pshufw (t1, 49);
164 break;
165 case 50:
166 *(__m64 *) r = _m_pshufw (t1, 50);
167 break;
168 case 51:
169 *(__m64 *) r = _m_pshufw (t1, 51);
170 break;
171 case 52:
172 *(__m64 *) r = _m_pshufw (t1, 52);
173 break;
174 case 53:
175 *(__m64 *) r = _m_pshufw (t1, 53);
176 break;
177 case 54:
178 *(__m64 *) r = _m_pshufw (t1, 54);
179 break;
180 case 55:
181 *(__m64 *) r = _m_pshufw (t1, 55);
182 break;
183 case 56:
184 *(__m64 *) r = _m_pshufw (t1, 56);
185 break;
186 case 57:
187 *(__m64 *) r = _m_pshufw (t1, 57);
188 break;
189 case 58:
190 *(__m64 *) r = _m_pshufw (t1, 58);
191 break;
192 case 59:
193 *(__m64 *) r = _m_pshufw (t1, 59);
194 break;
195 case 60:
196 *(__m64 *) r = _m_pshufw (t1, 60);
197 break;
198 case 61:
199 *(__m64 *) r = _m_pshufw (t1, 61);
200 break;
201 case 62:
202 *(__m64 *) r = _m_pshufw (t1, 62);
203 break;
204 case 63:
205 *(__m64 *) r = _m_pshufw (t1, 63);
206 break;
207 default:
208 break;
209 }
210 }
211
212 /* Routine to manually compute the results */
213 static void
214 compute_correct_result (long long *src_p, unsigned int imm,
215 long long *res_p)
216 {
217 unsigned long long src = *(unsigned long long *) src_p;
218 unsigned short *res = (unsigned short *) res_p;
219 int i;
220 unsigned int shift;
221 for (i = 0; i < 4; i++)
222 {
223 shift = ((imm >> (2 * i)) & 0x3) * 16;
224 res[i] = (src >> shift) & 0xffff;
225 }
226 }
227
228 static void
229 sse2_test (void)
230 {
231 int i;
232 long long r, ck;
233 int fail = 0;
234
235 /* Run the MMX tests */
236 for (i = 0; i < MMX_num_ops; i++)
237 {
238 if (i > 63)
239 break;
240 test_pshufw (&MMXops[i], i, &r);
241 compute_correct_result (&MMXops[i], i, &ck);
242 if (ck != r)
243 fail++;
244 }
245
246 if (fail != 0)
247 abort ();
248 }