/* { dg-do compile { target arm*-*-* alpha*-*-* i?86-*-* powerpc*-*-* rs6000-*-* x86_64-*-* s390*-*-* } } */
|
/* { dg-do compile { target arm*-*-* alpha*-*-* i?86-*-* powerpc*-*-* rs6000-*-* x86_64-*-* s390*-*-* } } */
|
/* { dg-require-effective-target stdint_types } */
|
/* { dg-require-effective-target stdint_types } */
|
/* { dg-options "-O2 -fdump-tree-bswap" } */
|
/* { dg-options "-O2 -fdump-tree-bswap" } */
|
|
|
#include <stdint.h>
|
#include <stdint.h>
|
|
|
#define __const_swab32(x) ((uint32_t)( \
|
#define __const_swab32(x) ((uint32_t)( \
|
(((uint32_t)(x) & (uint32_t)0x000000ffUL) << 24) | \
|
(((uint32_t)(x) & (uint32_t)0x000000ffUL) << 24) | \
|
(((uint32_t)(x) & (uint32_t)0x0000ff00UL) << 8) | \
|
(((uint32_t)(x) & (uint32_t)0x0000ff00UL) << 8) | \
|
(((uint32_t)(x) & (uint32_t)0x00ff0000UL) >> 8) | \
|
(((uint32_t)(x) & (uint32_t)0x00ff0000UL) >> 8) | \
|
(((uint32_t)(x) & (uint32_t)0xff000000UL) >> 24)))
|
(((uint32_t)(x) & (uint32_t)0xff000000UL) >> 24)))
|
|
|
/* This byte swap implementation is used by the Linux kernel and the
|
/* This byte swap implementation is used by the Linux kernel and the
|
GNU C library. */
|
GNU C library. */
|
|
|
uint32_t
|
uint32_t
|
swap32_a (uint32_t in)
|
swap32_a (uint32_t in)
|
{
|
{
|
return __const_swab32 (in);
|
return __const_swab32 (in);
|
}
|
}
|
|
|
/* The OpenSSH byte swap implementation. */
|
/* The OpenSSH byte swap implementation. */
|
uint32_t
|
uint32_t
|
swap32_b (uint32_t in)
|
swap32_b (uint32_t in)
|
{
|
{
|
uint32_t a;
|
uint32_t a;
|
|
|
a = (in << 16) | (in >> 16);
|
a = (in << 16) | (in >> 16);
|
a = ((a & 0x00ff00ff) << 8) | ((a & 0xff00ff00) >> 8);
|
a = ((a & 0x00ff00ff) << 8) | ((a & 0xff00ff00) >> 8);
|
|
|
return a;
|
return a;
|
}
|
}
|
|
|
/* This variant is currently used by libgcc. The difference is that
|
/* This variant is currently used by libgcc. The difference is that
|
the bswap source and destination have a signed integer type which
|
the bswap source and destination have a signed integer type which
|
requires a slightly higher search depth in order to dive through
|
requires a slightly higher search depth in order to dive through
|
the cast as well. */
|
the cast as well. */
|
|
|
typedef int SItype __attribute__ ((mode (SI)));
|
typedef int SItype __attribute__ ((mode (SI)));
|
|
|
SItype
|
SItype
|
swap32_c (SItype u)
|
swap32_c (SItype u)
|
{
|
{
|
return ((((u) & 0xff000000) >> 24)
|
return ((((u) & 0xff000000) >> 24)
|
| (((u) & 0x00ff0000) >> 8)
|
| (((u) & 0x00ff0000) >> 8)
|
| (((u) & 0x0000ff00) << 8)
|
| (((u) & 0x0000ff00) << 8)
|
| (((u) & 0x000000ff) << 24));
|
| (((u) & 0x000000ff) << 24));
|
}
|
}
|
|
|
/* { dg-final { scan-tree-dump-times "32 bit bswap implementation found at" 3 "bswap" } } */
|
/* { dg-final { scan-tree-dump-times "32 bit bswap implementation found at" 3 "bswap" } } */
|
/* { dg-final { cleanup-tree-dump "bswap" } } */
|
/* { dg-final { cleanup-tree-dump "bswap" } } */
|
|
|
