1  /* { dg-require-effective-target stdint_types } */
       2  /* { dg-options "-O2 -mdejagnu-cpu=power5" } */
       3  
       4  #include <stdint.h>
       5  
       6  /* This is a clone of gcc-dg/optimize-bswapsi-1.c, redone to use load and stores
       7     to test whether lwbrx/stwbrx is generated for normal power systems.  */
       8  
       9  #define __const_swab32(x) ((uint32_t)(				      \
      10          (((uint32_t)(x) & (uint32_t)0x000000ffUL) << 24) |            \
      11          (((uint32_t)(x) & (uint32_t)0x0000ff00UL) <<  8) |            \
      12          (((uint32_t)(x) & (uint32_t)0x00ff0000UL) >>  8) |            \
      13          (((uint32_t)(x) & (uint32_t)0xff000000UL) >> 24)))
      14  
      15  /* This byte swap implementation is used by the Linux kernel and the
      16     GNU C library.  */
      17  
      18  uint32_t
      19  swap32_a_load (uint32_t *in)
      20  {
      21    return __const_swab32 (*in);
      22  }
      23  
      24  /* The OpenSSH byte swap implementation.  */
      25  uint32_t
      26  swap32_b_load (uint32_t *in)
      27  {
      28    uint32_t a;
      29  
      30    a = (*in << 16) | (*in >> 16);
      31    a = ((a & 0x00ff00ff) << 8) | ((a & 0xff00ff00) >> 8);
      32  
      33    return a;
      34  }
      35  
      36  void
      37  swap32_a_store (uint32_t *out, uint32_t in)
      38  {
      39    *out = __const_swab32 (in);
      40  }
      41  
      42  /* The OpenSSH byte swap implementation.  */
      43  void
      44  swap32_b_store (uint32_t *out, uint32_t in)
      45  {
      46    uint32_t a;
      47  
      48    a = (in << 16) | (in >> 16);
      49    a = ((a & 0x00ff00ff) << 8) | ((a & 0xff00ff00) >> 8);
      50  
      51    *out = a;
      52  }
      53  
      54  /* { dg-final { scan-assembler-times "lwbrx" 2 } } */
      55  /* { dg-final { scan-assembler-times "stwbrx" 2 } } */