glibc/sysdeps/sparc/fpu/fenv_private.h
Joseph Myers ff6b24501f Split fenv_private.h out of math_private.h more consistently.
On some architectures, the parts of math_private.h relating to the
floating-point environment are in a separate file fenv_private.h
included from math_private.h.  As this is purely an
architecture-specific convention used by several architectures,
however, all such architectures still need their own math_private.h,
even if it has nothing to do beyond #include <fenv_private.h> and
peculiarity of including the i386 file directly instead of having a
shared file in sysdeps/x86.

This patch makes the fenv_private.h name an architecture-independent
convention in glibc.  The include of fenv_private.h from
math_private.h becomes architecture-independent (until callers are
updated to include fenv_private.h directly so the include from
math_private.h is no longer needed).  Some architecture math_private.h
headers are removed if no longer needed, or renamed to fenv_private.h
if all they define belongs in that header; architecture fenv_private.h
headers now do require #include_next <fenv_private.h>.  The i386
fenv_private.h file moves to sysdeps/x86/fpu/ to reflect how it is
actually shared with x86_64.  The generic math_private.h gets a new
include of <stdbool.h>, as needed for bool in some prototypes in that
header (previously that was indirectly included via include/fenv.h,
which now only gets included too late in math_private.h, after those
prototypes).

Tested for x86_64 and x86, and tested with build-many-glibcs.py that
installed stripped shared libraries are unchanged by the patch.

	* sysdeps/aarch64/fpu/fenv_private.h: New file.  Based on ....
	* sysdeps/aarch64/fpu/math_private.h: ... this file.  All contents
	moved to fenv_private.h except for ...
	(TOINT_INTRINSICS): Kept in math_private.h.
	(roundtoint): Likewise.
	(converttoint): Likewise.
	* sysdeps/arm/fenv_private.h: Change multiple-include guard to
	[ARM_FENV_PRIVATE_H].  Include next <fenv_private.h>.
	* sysdeps/arm/math_private.h: Remove.
	* sysdeps/generic/fenv_private.h: New file.  Contents moved from
	....
	* sysdeps/generic/math_private.h: ... this file.  Include
	<stdbool.h>.  Do not include <fenv.h> or <get-rounding-mode.h>.
	Include <fenv_private.h>.  Remove functions and macros moved to
	fenv_private.h.
	* sysdeps/i386/fpu/math_private.h: Remove.
	* sysdeps/mips/math_private.h: Move to ....
	* sysdeps/mips/fpu/fenv_private.h: ... here.  Change
	multiple-include guard to [MIPS_FENV_PRIVATE_H].  Remove
	[__mips_hard_float] conditional.  Include next <fenv_private.h>.
	* sysdeps/powerpc/fpu/fenv_private.h: Change multiple-include
	guard to [POWERPC_FENV_PRIVATE_H].  Include next <fenv_private.h>.
	* sysdeps/powerpc/fpu/math_private.h: Do not include
	<fenv_private.h>.
	* sysdeps/riscv/rvf/math_private.h: Move to ....
	* sysdeps/riscv/rvf/fenv_private.h: ... here.  Change
	multiple-include guard to [RISCV_FENV_PRIVATE_H].  Include next
	<fenv_private.h>.
	* sysdeps/sparc/fpu/fenv_private.h: Change multiple-include guard
	to [SPARC_FENV_PRIVATE_H].  Include next <fenv_private.h>.
	* sysdeps/sparc/fpu/math_private.h: Remove.
	* sysdeps/i386/fpu/fenv_private.h: Move to ....
	* sysdeps/x86/fpu/fenv_private.h: ... here.  Change
	multiple-include guard to [X86_FENV_PRIVATE_H].  Include next
	<fenv_private.h>.
	* sysdeps/x86_64/fpu/math_private.h: Do not include
	<sysdeps/i386/fpu/fenv_private.h>.
2018-08-28 20:48:49 +00:00

185 lines
4.9 KiB
C

#ifndef SPARC_FENV_PRIVATE_H
#define SPARC_FENV_PRIVATE_H 1
#include <fenv.h>
static __always_inline void
libc_feholdexcept (fenv_t *e)
{
fenv_t etmp;
__fenv_stfsr(etmp);
*(e) = etmp;
etmp = etmp & ~((0x1f << 23) | FE_ALL_EXCEPT);
__fenv_ldfsr(etmp);
}
static __always_inline void
libc_fesetround (int r)
{
fenv_t etmp;
__fenv_stfsr(etmp);
etmp = (etmp & ~__FE_ROUND_MASK) | (r);
__fenv_ldfsr(etmp);
}
static __always_inline void
libc_feholdexcept_setround (fenv_t *e, int r)
{
fenv_t etmp;
__fenv_stfsr(etmp);
*(e) = etmp;
etmp = etmp & ~((0x1f << 23) | FE_ALL_EXCEPT);
etmp = (etmp & ~__FE_ROUND_MASK) | (r);
__fenv_ldfsr(etmp);
}
static __always_inline int
libc_fetestexcept (int e)
{
fenv_t etmp;
__fenv_stfsr(etmp);
return etmp & (e) & FE_ALL_EXCEPT;
}
static __always_inline void
libc_fesetenv (fenv_t *e)
{
__fenv_ldfsr(*e);
}
static __always_inline int
libc_feupdateenv_test (fenv_t *e, int ex)
{
fenv_t etmp;
__fenv_stfsr(etmp);
etmp &= FE_ALL_EXCEPT;
__fenv_ldfsr(*e);
__feraiseexcept (etmp);
return etmp & ex;
}
static __always_inline void
libc_feupdateenv (fenv_t *e)
{
libc_feupdateenv_test (e, 0);
}
static __always_inline void
libc_feholdsetround (fenv_t *e, int r)
{
fenv_t etmp;
__fenv_stfsr(etmp);
*(e) = etmp;
etmp = (etmp & ~__FE_ROUND_MASK) | (r);
__fenv_ldfsr(etmp);
}
static __always_inline void
libc_feresetround (fenv_t *e)
{
fenv_t etmp;
__fenv_stfsr(etmp);
etmp = (etmp & ~__FE_ROUND_MASK) | (*e & __FE_ROUND_MASK);
__fenv_ldfsr(etmp);
}
#define libc_feholdexceptf libc_feholdexcept
#define libc_fesetroundf libc_fesetround
#define libc_feholdexcept_setroundf libc_feholdexcept_setround
#define libc_fetestexceptf libc_fetestexcept
#define libc_fesetenvf libc_fesetenv
#define libc_feupdateenv_testf libc_feupdateenv_test
#define libc_feupdateenvf libc_feupdateenv
#define libc_feholdsetroundf libc_feholdsetround
#define libc_feresetroundf libc_feresetround
#define libc_feholdexcept libc_feholdexcept
#define libc_fesetround libc_fesetround
#define libc_feholdexcept_setround libc_feholdexcept_setround
#define libc_fetestexcept libc_fetestexcept
#define libc_fesetenv libc_fesetenv
#define libc_feupdateenv_test libc_feupdateenv_test
#define libc_feupdateenv libc_feupdateenv
#define libc_feholdsetround libc_feholdsetround
#define libc_feresetround libc_feresetround
#define libc_feholdexceptl libc_feholdexcept
#define libc_fesetroundl libc_fesetround
#define libc_feholdexcept_setroundl libc_feholdexcept_setround
#define libc_fetestexceptl libc_fetestexcept
#define libc_fesetenvl libc_fesetenv
#define libc_feupdateenv_testl libc_feupdateenv_test
#define libc_feupdateenvl libc_feupdateenv
#define libc_feholdsetroundl libc_feholdsetround
#define libc_feresetroundl libc_feresetround
/* We have support for rounding mode context. */
#define HAVE_RM_CTX 1
static __always_inline void
libc_feholdexcept_setround_sparc_ctx (struct rm_ctx *ctx, int round)
{
fenv_t new;
__fenv_stfsr(ctx->env);
new = ctx->env & ~((0x1f << 23) | FE_ALL_EXCEPT);
new = (new & ~__FE_ROUND_MASK) | round;
if (__glibc_unlikely (new != ctx->env))
{
__fenv_ldfsr(new);
ctx->updated_status = true;
}
else
ctx->updated_status = false;
}
static __always_inline void
libc_fesetenv_sparc_ctx (struct rm_ctx *ctx)
{
libc_fesetenv(&ctx->env);
}
static __always_inline void
libc_feupdateenv_sparc_ctx (struct rm_ctx *ctx)
{
if (__glibc_unlikely (ctx->updated_status))
libc_feupdateenv_test (&ctx->env, 0);
}
static __always_inline void
libc_feholdsetround_sparc_ctx (struct rm_ctx *ctx, int round)
{
fenv_t new;
__fenv_stfsr(ctx->env);
new = (ctx->env & ~__FE_ROUND_MASK) | round;
if (__glibc_unlikely (new != ctx->env))
{
__fenv_ldfsr(new);
ctx->updated_status = true;
}
else
ctx->updated_status = false;
}
#define libc_feholdexcept_setround_ctx libc_feholdexcept_setround_sparc_ctx
#define libc_feholdexcept_setroundf_ctx libc_feholdexcept_setround_sparc_ctx
#define libc_feholdexcept_setroundl_ctx libc_feholdexcept_setround_sparc_ctx
#define libc_fesetenv_ctx libc_fesetenv_sparc_ctx
#define libc_fesetenvf_ctx libc_fesetenv_sparc_ctx
#define libc_fesetenvl_ctx libc_fesetenv_sparc_ctx
#define libc_feupdateenv_ctx libc_feupdateenv_sparc_ctx
#define libc_feupdateenvf_ctx libc_feupdateenv_sparc_ctx
#define libc_feupdateenvl_ctx libc_feupdateenv_sparc_ctx
#define libc_feresetround_ctx libc_feupdateenv_sparc_ctx
#define libc_feresetroundf_ctx libc_feupdateenv_sparc_ctx
#define libc_feresetroundl_ctx libc_feupdateenv_sparc_ctx
#define libc_feholdsetround_ctx libc_feholdsetround_sparc_ctx
#define libc_feholdsetroundf_ctx libc_feholdsetround_sparc_ctx
#define libc_feholdsetroundl_ctx libc_feholdsetround_sparc_ctx
#include_next <fenv_private.h>
#endif /* SPARC_FENV_PRIVATE_H */