gcc/testsuite/gcc.target/powerpc/vsx-store-element-truncate-short.c

   1 /*
   2    Test of vec_xst_trunc (truncate and store rightmost vector element) */
   3
   4 /* { dg-do run { target power10_hw } } */
   5 /* { dg-do compile { target { ! power10_hw } } } */
   6 /* { dg-require-effective-target power10_ok } */
   7 /* { dg-require-effective-target int128 } */
   8
   9 /* Deliberately set optization to zero for this test to confirm
  10    the stxvr*x instruction is generated. At higher optimization levels
  11    the instruction we are looking for is sometimes replaced by other
  12    store instructions.  */
  13 /* { dg-options "-mdejagnu-cpu=power10 -O0 -save-temps" } */
  14
  15 /* { dg-final { scan-assembler-times {\mstxvrhx\M} 2 } } */
  16 /* { dg-final { scan-assembler-times {\msthx\M} 0 } } */
  17
  18 #include <altivec.h>
  19 #include <stdio.h>
  20 #include <inttypes.h>
  21 #include <string.h>
  22 #include <stdlib.h>
  23
  24 vector signed __int128 store_this_s[4] = {
  25 { (__int128) 0x7000000000000000 << 64 | (__int128) 0x123456789abcdef8ULL},
  26 { (__int128) 0x8000000000000000 << 64 | (__int128) 0xfedcba9876543217ULL},
  27 { (__int128) 0x1000000000000000 << 64 | (__int128) 0xccccccccccccccccULL},
  28 { (__int128) 0xf000000000000000 << 64 | (__int128) 0xaaaaaaaaaaaaaaaaULL}
  29 };
  30
  31 vector unsigned __int128 store_this_us[4] = {
  32 { (unsigned __int128) 0x7000000000000000 << 64 | (unsigned __int128) 0x123456789abcdef8ULL},
  33 { (unsigned __int128) 0x8000000000000000 << 64 | (unsigned __int128) 0xfedcba9876543217ULL},
  34 { (unsigned __int128) 0x1000000000000000 << 64 | (unsigned __int128) 0xeeeeeeeeeeeeeeeeULL},
  35 { (unsigned __int128) 0xf000000000000000 << 64 | (unsigned __int128) 0x5555555555555555ULL}
  36 };
  37
  38 #define NUM_VEC_ELEMS 8
  39
  40 vector signed short signed_expected[4] = {
  41         {0xdef8, 0x0, 0x0   , 0x0, 0x0   , 0x0, 0x0   , 0x0},
  42         {0x0   , 0x0, 0x3217, 0x0, 0x0   , 0x0, 0x0   , 0x0},
  43         {0x0   , 0x0, 0x0   , 0x0, 0xcccc, 0x0, 0x0   , 0x0},
  44         {0x0   , 0x0, 0x0   , 0x0, 0x0   , 0x0, 0xaaaa, 0x0}
  45         };
  46 vector unsigned short unsigned_expected[4] = {
  47         {0xdef8, 0x0, 0x0   , 0x0, 0x0   , 0x0, 0x0   , 0x0},
  48         {0x0   , 0x0, 0x3217, 0x0, 0x0   , 0x0, 0x0   , 0x0},
  49         {0x0   , 0x0, 0x0   , 0x0, 0xeeee, 0x0, 0x0   , 0x0},
  50         {0x0   , 0x0, 0x0   , 0x0, 0x0   , 0x0, 0x5555, 0x0}
  51 };
  52
  53 unsigned long long rawbuffer[32];
  54 signed short * vsbuffer = (short *)rawbuffer;
  55 unsigned short * vubuffer = (unsigned short *)rawbuffer;
  56
  57 void reset_buffer() {
  58         memset (&rawbuffer,0,sizeof(rawbuffer));
  59 }
  60
  61 #define PRINT_VEC(V) \
  62    for (int j=0;j<NUM_VEC_ELEMS;j++) {  printf ("(0x%lx) ", V[j] ); }
  63
  64 void test_signed_store(vector signed __int128 myvec, int offset, signed short * store_data ) {
  65         vec_xst_trunc (myvec, offset, store_data);
  66 }
  67
  68 void test_unsigned_store(vector unsigned __int128 myvec, int offset, unsigned short * store_data )   {
  69         vec_xst_trunc (myvec, offset, store_data);
  70 }
  71
  72 int main (int argc, char *argv [])
  73 {
  74    int i;
  75    int memcmpresult;
  76    int mismatch=0;
  77    int verbose=0;
  78
  79 #if VERBOSE
  80    verbose=1;
  81    printf("%s %s\n", __DATE__, __TIME__);
  82 #endif
  83
  84    if (verbose) {
  85       printf("expected results from signed tests:\n");
  86       for (i = 0; i < 4 ; i++ ) {
  87          PRINT_VEC(signed_expected[i]);
  88          printf("\n");
  89       }
  90    }
  91
  92    for (i = 0; i < 4 ; i++ ) {
  93       reset_buffer();
  94       test_signed_store (store_this_s[i], 4*i, vsbuffer);
  95       memcmpresult = memcmp(rawbuffer,&signed_expected[i],sizeof(vector short));
  96       if (memcmpresult) {
  97          printf("mismatch signed buffer, i %d (memcmpresult:%d) \n",i,memcmpresult);
  98          mismatch++;
  99          if (verbose) {
 100             printf("results: ");
 101             PRINT_VEC(vsbuffer);
 102             printf("\n");
 103          }
 104       }
 105    }
 106
 107    for (i = 0; i < 4 ; i++ ) {
 108       reset_buffer();
 109       test_unsigned_store (store_this_us[i], 4*i, vubuffer);
 110       memcmpresult = memcmp(rawbuffer,&unsigned_expected[i],sizeof(vector short));
 111       if (memcmpresult) {
 112          printf("mismatch unsigned buffer, i %d (memcmpresult:%d) \n",i,memcmpresult);
 113          mismatch++;
 114          if (verbose) {
 115             printf("results :");
 116             PRINT_VEC(vubuffer);
 117             printf("\n");
 118          }
 119       }
 120    }
 121
 122    if (mismatch) {
 123       printf("%d mismatches. \n",mismatch);
 124       abort();
 125    }
 126    return 0;
 127 }
 128