Thomas Huth | 9e3eb3b | 2022-10-12 20:27:55 +0200 | [diff] [blame] | 1 | /* |
| 2 | * Test the VECTOR ISOLATE STRING (vistr) instruction |
| 3 | */ |
| 4 | #include <stdint.h> |
| 5 | #include <stdio.h> |
| 6 | #include "vx.h" |
| 7 | |
| 8 | static inline void vistr(S390Vector *v1, S390Vector *v2, |
| 9 | const uint8_t m3, const uint8_t m5) |
| 10 | { |
| 11 | asm volatile("vistr %[v1], %[v2], %[m3], %[m5]\n" |
| 12 | : [v1] "=v" (v1->v) |
| 13 | : [v2] "v" (v2->v) |
| 14 | , [m3] "i" (m3) |
| 15 | , [m5] "i" (m5) |
| 16 | : "cc"); |
| 17 | } |
| 18 | |
| 19 | int main(int argc, char *argv[]) |
| 20 | { |
| 21 | S390Vector vd = {}; |
| 22 | S390Vector vs16 = { |
| 23 | .h[0] = 0x1234, .h[1] = 0x0056, .h[2] = 0x7800, .h[3] = 0x0000, |
| 24 | .h[4] = 0x0078, .h[5] = 0x0000, .h[6] = 0x6543, .h[7] = 0x2100 |
| 25 | }; |
| 26 | S390Vector vs32 = { |
| 27 | .w[0] = 0x12340000, .w[1] = 0x78654300, |
| 28 | .w[2] = 0x0, .w[3] = 0x12, |
| 29 | }; |
| 30 | |
| 31 | vistr(&vd, &vs16, 1, 0); |
| 32 | if (vd.h[0] != 0x1234 || vd.h[1] != 0x0056 || vd.h[2] != 0x7800 || |
| 33 | vd.h[3] || vd.h[4] || vd.h[5] || vd.h[6] || vd.h[7]) { |
| 34 | puts("ERROR: vitrh failed!"); |
| 35 | return 1; |
| 36 | } |
| 37 | |
| 38 | vistr(&vd, &vs32, 2, 0); |
| 39 | if (vd.w[0] != 0x12340000 || vd.w[1] != 0x78654300 || vd.w[2] || vd.w[3]) { |
| 40 | puts("ERROR: vitrf failed!"); |
| 41 | return 1; |
| 42 | } |
| 43 | |
| 44 | return 0; |
| 45 | } |