PowerPC floating point little-endian [11 of 15]

http://sourceware.org/ml/libc-alpha/2013-07/msg00202.html

Another little-endian fix.

	* sysdeps/powerpc/fpu_control.h (_FPU_GETCW): Rewrite using
	64-bit int/double union.
	(_FPU_SETCW): Likewise.
	* sysdeps/powerpc/fpu/tst-setcontext-fpscr.c (_GET_DI_FPSCR): Likewise.
	(_SET_DI_FPSCR, _GET_SI_FPSCR, _SET_SI_FPSCR): Likewise.
This commit is contained in:
Alan Modra 2013-08-17 18:31:05 +09:30
parent da13146da1
commit 9c008155b7
3 changed files with 67 additions and 54 deletions

View File

@ -1,3 +1,11 @@
2013-10-04 Alan Modra <amodra@gmail.com>
* sysdeps/powerpc/fpu_control.h (_FPU_GETCW): Rewrite using
64-bit int/double union.
(_FPU_SETCW): Likewise.
* sysdeps/powerpc/fpu/tst-setcontext-fpscr.c (_GET_DI_FPSCR): Likewise.
(_SET_DI_FPSCR, _GET_SI_FPSCR, _SET_SI_FPSCR): Likewise.
2013-10-04 Alan Modra <amodra@gmail.com>
* sysdeps/powerpc/fpu/s_llround.c (__llround): Rewrite.

View File

@ -83,7 +83,7 @@ ElfW(Addr) query_auxv(int type)
return 0;
}
typedef unsigned long long di_fpscr_t __attribute__ ((__mode__ (__DI__)));
typedef unsigned int di_fpscr_t __attribute__ ((__mode__ (__DI__)));
typedef unsigned int si_fpscr_t __attribute__ ((__mode__ (__SI__)));
#define _FPSCR_RESERVED 0xfffffff8ffffff04ULL
@ -95,50 +95,51 @@ typedef unsigned int si_fpscr_t __attribute__ ((__mode__ (__SI__)));
#define _FPSCR_TEST1_RN 0x0000000000000002ULL
/* Macros for accessing the hardware control word on Power6[x]. */
# define _GET_DI_FPSCR(__fpscr) ({ \
union { double d; \
di_fpscr_t fpscr; } \
tmp __attribute__ ((__aligned__(8))); \
__asm__ ("mffs 0; stfd%U0 0,%0" : "=m" (tmp.d) : : "fr0"); \
(__fpscr)=tmp.fpscr; \
tmp.fpscr; })
#define _GET_DI_FPSCR(__fpscr) \
({union { double d; di_fpscr_t fpscr; } u; \
register double fr; \
__asm__ ("mffs %0" : "=f" (fr)); \
u.d = fr; \
(__fpscr) = u.fpscr; \
u.fpscr; \
})
/* We make sure to zero fp0 after we use it in order to prevent stale data
/* We make sure to zero fp after we use it in order to prevent stale data
in an fp register from making a test-case pass erroneously. */
# define _SET_DI_FPSCR(__fpscr) { \
union { double d; di_fpscr_t fpscr; } \
tmp __attribute__ ((__aligned__(8))); \
tmp.fpscr = __fpscr; \
# define _SET_DI_FPSCR(__fpscr) \
{ union { double d; di_fpscr_t fpscr; } u; \
register double fr; \
u.fpscr = __fpscr; \
fr = u.d; \
/* Set the entire 64-bit FPSCR. */ \
__asm__ ("lfd%U0 0,%0; " \
".machine push; " \
__asm__ (".machine push; " \
".machine \"power6\"; " \
"mtfsf 255,0,1,0; " \
".machine pop" : : "m" (tmp.d) : "fr0"); \
tmp.d = 0; \
__asm__("lfd%U0 0,%0" : : "m" (tmp.d) : "fr0"); \
}
"mtfsf 255,%0,1,0; " \
".machine pop" : : "f" (fr)); \
fr = 0.0; \
}
# define _GET_SI_FPSCR(__fpscr) ({ \
union { double d; \
si_fpscr_t cw[2]; } \
tmp __attribute__ ((__aligned__(8))); \
__asm__ ("mffs 0; stfd%U0 0,%0" : "=m" (tmp.d) : : "fr0"); \
(__fpscr)=tmp.cw[1]; \
tmp.cw[0]; })
# define _GET_SI_FPSCR(__fpscr) \
({union { double d; di_fpscr_t fpscr; } u; \
register double fr; \
__asm__ ("mffs %0" : "=f" (fr)); \
u.d = fr; \
(__fpscr) = (si_fpscr_t) u.fpscr; \
(si_fpscr_t) u.fpscr; \
})
/* We make sure to zero fp0 after we use it in order to prevent stale data
/* We make sure to zero fp after we use it in order to prevent stale data
in an fp register from making a test-case pass erroneously. */
# define _SET_SI_FPSCR(__fpscr) { \
union { double d; si_fpscr_t fpscr[2]; } \
tmp __attribute__ ((__aligned__(8))); \
# define _SET_SI_FPSCR(__fpscr) \
{ union { double d; di_fpscr_t fpscr; } u; \
register double fr; \
/* More-or-less arbitrary; this is a QNaN. */ \
tmp.fpscr[0] = 0xFFF80000; \
tmp.fpscr[1] = __fpscr; \
__asm__ ("lfd%U0 0,%0; mtfsf 255,0" : : "m" (tmp.d) : "fr0"); \
tmp.d = 0; \
__asm__("lfd%U0 0,%0" : : "m" (tmp.d) : "fr0"); \
}
u.fpscr = 0xfff80000ULL << 32; \
u.fpscr |= __fpscr & 0xffffffffULL; \
fr = u.d; \
__asm__ ("mtfsf 255,%0" : : "f" (fr)); \
fr = 0.0; \
}
void prime_special_regs(int which)
{

View File

@ -93,22 +93,26 @@ extern fpu_control_t __fpu_control;
# define _FPU_IEEE 0x000000f0
/* Type of the control word. */
typedef unsigned int fpu_control_t __attribute__ ((__mode__ (__SI__)));
typedef unsigned int fpu_control_t;
/* Macros for accessing the hardware control word. */
# define _FPU_GETCW(cw) ( { \
union { double __d; fpu_control_t __cw[2]; } \
__tmp __attribute__ ((__aligned__(8))); \
__asm__ ("mffs 0; stfd%U0 0,%0" : "=m" (__tmp.__d) : : "fr0"); \
(cw) = __tmp.__cw[1]; \
__tmp.__cw[1]; } )
# define _FPU_SETCW(cw) { \
union { double __d; fpu_control_t __cw[2]; } \
__tmp __attribute__ ((__aligned__(8))); \
__tmp.__cw[0] = 0xFFF80000; /* More-or-less arbitrary; this is a QNaN. */ \
__tmp.__cw[1] = (cw); \
__asm__ ("lfd%U0 0,%0; mtfsf 255,0" : : "m" (__tmp.__d) : "fr0"); \
}
# define _FPU_GETCW(cw) \
({union { double __d; unsigned long long __ll; } __u; \
register double __fr; \
__asm__ ("mffs %0" : "=f" (__fr)); \
__u.__d = __fr; \
(cw) = (fpu_control_t) __u.__ll; \
(fpu_control_t) __u.__ll; \
})
# define _FPU_SETCW(cw) \
{ union { double __d; unsigned long long __ll; } __u; \
register double __fr; \
__u.__ll = 0xfff80000LL << 32; /* This is a QNaN. */ \
__u.__ll |= (cw) & 0xffffffffLL; \
__fr = __u.__d; \
__asm__ ("mtfsf 255,%0" : : "f" (__fr)); \
}
/* Default control word set at startup. */
extern fpu_control_t __fpu_control;