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 swap32_a_load(uint32_t * in)19swap32_a_load (uint32_t *in) 20 { 21 return __const_swab32 (*in); 22 } 23 24 /* The OpenSSH byte swap implementation. */ 25 uint32_t swap32_b_load(uint32_t * in)26swap32_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 swap32_a_store(uint32_t * out,uint32_t in)37swap32_a_store (uint32_t *out, uint32_t in) 38 { 39 *out = __const_swab32 (in); 40 } 41 42 /* The OpenSSH byte swap implementation. */ 43 void swap32_b_store(uint32_t * out,uint32_t in)44swap32_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 } } */ 56