qemu

FORK: QEMU emulator
git clone https://git.neptards.moe/neptards/qemu.git
Log | Files | Refs | Submodules | LICENSE

vistr.c (1224B)


      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 }