Test FPU/SSE Context Save and Restore. More...

#include <inttypes.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <math.h>
#include <signal.h>
#include <ucontext.h>

Data Structures
struct	Context_Control_sse

Macros
#define	SSE_TEST_IRQ 10

#define	MXCSR_FZ (1<<15) /* Flush to zero */

#define	MXCSR_RC(x) (((x)&3)<<13) /* Rounding ctrl */

#define	MXCSR_PM (1<<12) /* Precision msk */

#define	MXCSR_UM (1<<11) /* Underflow msk */

#define	MXCSR_OM (1<<10) /* Overflow msk */

#define	MXCSR_ZM (1<< 9) /* Divbyzero msk */

#define	MXCSR_DM (1<< 8) /* Denormal msk */

#define	MXCSR_IM (1<< 7) /* Invalidop msk */

#define	MXCSR_DAZ (1<< 6) /* Denorml are 0 */

#define	MXCSR_PE (1<< 5) /* Precision flg */

#define	MXCSR_UE (1<< 4) /* Underflow flg */

#define	MXCSR_OE (1<< 3) /* Overflow flg */

#define	MXCSR_ZE (1<< 2) /* Divbyzero flg */

#define	MXCSR_DE (1<< 1) /* Denormal flg */

#define	MXCSR_IE (1<< 0) /* Invalidop flg */

#define	MXCSR_ALLM (MXCSR_PM \| MXCSR_UM \| MXCSR_OM \| MXCSR_ZM \| MXCSR_DM \| MXCSR_IM)

#define	MXCSR_ALLE (MXCSR_PE \| MXCSR_UE \| MXCSR_OE \| MXCSR_ZE \| MXCSR_DE \| MXCSR_IE)

#define	FPSR_B (1<<15) /* FPU busy */

#define	FPSR_C3 (1<<14) /* Cond code C3 */

#define	FPSR_TOP(x) (((x)&7)<<11) /* TOP */

#define	FPSR_C2 (1<<10) /* Cond code C2 */

#define	FPSR_C1 (1<< 9) /* Cond code C1 */

#define	FPSR_C0 (1<< 8) /* Cond code C0 */

#define	FPSR_ES (1<< 7) /* Error summary */

#define	FPSR_SF (1<< 6) /* Stack fault */

#define	FPSR_PE (1<< 5) /* Precision flg */

#define	FPSR_UE (1<< 4) /* Underflow flg */

#define	FPSR_OE (1<< 3) /* Overflow flg */

#define	FPSR_ZE (1<< 2) /* Divbyzero flg */

#define	FPSR_DE (1<< 1) /* Denormal flg */

#define	FPSR_IE (1<< 0) /* Invalidop flg */

#define	FPCW_X (1<<12) /* Infinity ctrl */

#define	FPCW_RC(x) (((x)&3)<<10) /* Rounding ctrl */

#define	FPCW_PC(x) (((x)&3)<< 8) /* Precision ctl */

#define	FPCW_PM (1<< 5) /* Precision msk */

#define	FPCW_UM (1<< 4) /* Underflow msk */

#define	FPCW_OM (1<< 3) /* Overflow msk */

#define	FPCW_ZM (1<< 2) /* Divbyzero msk */

#define	FPCW_DM (1<< 1) /* Denormal msk */

#define	FPCW_IM (1<< 0) /* Invalidop msk */

#define	FPCW_ALLM (FPCW_PM \| FPCW_UM \| FPCW_OM \| FPCW_ZM \| FPCW_DM \| FPCW_IM)

#define	FPSR_ALLE (FPSR_ES \| FPSR_SF \| FPSR_PE \| FPSR_UE \| FPSR_OE \| FPSR_ZE \| FPSR_DE \| FPSR_IE)

#define	FPUCLOBBER

#define	SSECLOBBER

#define	H08 "0x%02"PRIx8

#define	H16 "0x%04"PRIx16

#define	H32 "0x%08"PRIx32

#define	F16 "mismatch ("H16" != "H16")\n"

#define	FLDCMP(fld, fmt)

#define	FLTCMP(i)

#define	XMMCMP(i)

#define	FP_EXC 0

#define	IRQ_EXC 1

#define	SSE_EXC -1

#define	__INTRAISE(x) " int $32+"#x" \n"

#define	INTRAISE(x) __INTRAISE(x)

#define	SSE_TEST_HP_FAILED 1

#define	SSE_TEST_FSPR_FAILED 2

#define	SSE_TEST_CTXTCMP_FAILED 4

#define	MKCASE(X) case FPE_##X: msg="FPE_"#X; break;

#define	CLRXMM(i) __asm__ volatile("pxor %%xmm"#i", %%xmm"#i:::"xmm"#i)

Typedefs
typedef uint8_t __v8	__attribute__((vector_size(16)))

Functions
struct Context_Control_sse	__attribute__ ((aligned(16)))

void	fp_st1 (uint8_t(*p_dst)[10], double v)

void	fp_st (Context_Control_sse *p_ctxt, int i, double v)

double	fp_ld1 (uint8_t(*p_src)[10])

double	fp_ld (Context_Control_sse *p_ctxt, int i)

void	all_clobber (uint32_t v1, uint32_t v2)

	__asm__ ("all_clobber: \ " finit \" " movq 0(%esp), %xmm0 \" " punpcklqdq %xmm0, %xmm0 \" " movdqa %xmm0, %xmm1 \" " movdqa %xmm0, %xmm2 \" " movdqa %xmm0, %xmm3 \" " movdqa %xmm0, %xmm4 \" " movdqa %xmm0, %xmm5 \" " movdqa %xmm0, %xmm6 \" " movdqa %xmm0, %xmm7 \" " ret \")

void	init_ctxt (Context_Control_sse *p_ctxt)

	__asm__ ("init_ctxt: \ " finit \" " mov 4(%esp), %eax\" " fxsave(%eax) \" " fwait \" " ret \")

	__asm__ ("do_raise: \ " fwait \" " test %eax, %eax \" " je 2f \" " jl 1f \" " jmp 2f \" "1:sqrtps %xmm0, %xmm0 \" "2: \" " ret \")

int	main (int argc, char **argv)

uint32_t	mfcr4 ()

void	mtcr4 (uint32_t rval)

uint32_t	mfmxcsr ()

void	mtmxcsr (uint32_t rval)

float	sseraise ()

Variables
uint16_t	fcw

uint16_t	fsw

uint8_t	ftw

uint8_t	res_1

uint16_t	fop

uint32_t	fpu_ip

uint16_t	cs

uint16_t	res_2

uint32_t	fpu_dp

uint16_t	ds

uint16_t	res_3

uint32_t	mxcsr

uint32_t	mxcsr_mask

struct {
uint8_t fpreg [10]

uint8_t res_4 [6]

}	fp_mmregs [8]

uint8_t	xmmregs [8][16]

uint8_t	res_5 [224]

int	sse_test_debug = 0

Detailed Description

Test FPU/SSE Context Save and Restore.

Macro Definition Documentation

◆ FLDCMP

#define FLDCMP	(	fld,
		fmt
	)

Value:

if ( a->fld != b->fld ) { \
        rval = 1;             \
        if ( !quiet )         \
           fprintf(stderr,#fld" mismatch ("fmt" != "fmt")\n",a->fld, b->fld); \
    }

◆ FLTCMP

#define FLTCMP ( i )

Value:

do {                                            \
        if (   ( (a->ftw ^ b->ftw) & (1<<i))        \
            || ( (a->ftw & b->ftw  & (1<<i)) &&     \
                 memcmp(a->fp_mmregs[i].fpreg,      \
                    b->fp_mmregs[i].fpreg,          \
                    sizeof(a->fp_mmregs[i].fpreg))  \
               )                                    \
           ) {                                      \
            rval = 1;                               \
            if ( !quiet ) {                         \
              double fa = fp_ld(a, i);              \
              double fb = fp_ld(b, i);              \
              if ( ((a->ftw ^ b->ftw) & (1<<i)) )   \
                fprintf(stderr,"fpreg[%u] TAG mismatch (%u != %u)\n",i,(a->ftw & (1<<i)) ? 1 : 0,(b->ftw & (1<<i)) ? 1 : 0); \
              else                                  \
                fprintf(stderr,"fpreg[%u] mismatch (%g != %g)\n",i,fa,fb); \
            }                                       \
        }                                           \
    } while (0)

◆ FPUCLOBBER

#define FPUCLOBBER

Value:

"st","st(1)","st(2)","st(3)",   \
    "st(4)","st(5)","st(6)","st(7)",\
    "fpsr","fpcr"

◆ SSECLOBBER

#define SSECLOBBER

Value:

"xmm0","xmm1","xmm2","xmm3", \

"xmm4","xmm5","xmm6","xmm7"

◆ XMMCMP

#define XMMCMP ( i )

Value:

do {                                            \
        if ( memcmp(&a->xmmregs[i],                 \
                    &b->xmmregs[i],                 \
                    sizeof(a->xmmregs[i]))          \
           ) {                                      \
            rval = 1;                               \
            if ( !quiet ) {                         \
              int _jj;                              \
              fprintf(stderr,"xmmreg[%u] mismatch:\n", i); \
              fprintf(stderr,"    ");               \
              for (_jj=0; _jj<16; _jj++)            \
                fprintf(stderr,"%02x ",a->xmmregs[i][_jj]); \
              fprintf(stderr,"\n !=\n");            \
              fprintf(stderr,"    ");               \
              for (_jj=0; _jj<16; _jj++)            \
                fprintf(stderr,"%02x ",b->xmmregs[i][_jj]); \
              fprintf(stderr,"\n");                 \
            }                                       \
        }                                           \
    } while (0)

Data Structures

Macros

Typedefs

Functions

Variables

Detailed Description

Macro Definition Documentation

◆ FLDCMP

◆ FLTCMP

◆ FPUCLOBBER

◆ SSECLOBBER

◆ XMMCMP