1ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 2ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown/* On amd64, to exercise x87, compile with 3ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown gcc4 -ffast-math -mfpmath=387 -mfancy-math-387 4ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 5ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown gcc4 really does generate all the sin cos tan stuff as 6ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown x87 insns inline. gcc 3.3 doesn't, which makes the test 7ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown pretty useless, but it should still pass. To be on the safe 8ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown side we need to link with -lm to handle the gcc 3.3 behaviour. 9ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown*/ 10ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 11ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown/* Derived from: */ 12ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 13ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown/* 14ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * x86 CPU test 15ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * 16ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * Copyright (c) 2003 Fabrice Bellard 17ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * 18ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * This program is free software; you can redistribute it and/or modify 19ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * it under the terms of the GNU General Public License as published by 20ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * the Free Software Foundation; either version 2 of the License, or 21ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * (at your option) any later version. 22ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * 23ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * This program is distributed in the hope that it will be useful, 24ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * but WITHOUT ANY WARRANTY; without even the implied warranty of 25ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 26ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * GNU General Public License for more details. 27ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * 28ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * You should have received a copy of the GNU General Public License 29ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * along with this program; if not, write to the Free Software 30ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 31ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown */ 32ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 33ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 34ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#include <stdlib.h> 35ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#include <stdio.h> 36ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#include <string.h> 37ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#include <inttypes.h> 38ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#include <math.h> 39ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 40ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown/**********************************************/ 41ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 42ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownvoid test_fops(double a, double b) 43ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 44ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f b=%f a+b=%f\n", a, b, a + b); 45ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f b=%f a-b=%f\n", a, b, a - b); 46ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f b=%f a*b=%f\n", a, b, a * b); 47ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f b=%f a/b=%f\n", a, b, a / b); 48ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown // requires fprem/fprem1 -- not done 49ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown //printf("a=%f b=%f fmod(a, b)=%f\n", a, b, fmod(a, b)); 50ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f sqrt(a)=%f\n", a, sqrt(a)); 51ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f sin(a)=%f\n", a, sin(a)); 52ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f cos(a)=%f\n", a, cos(a)); 53ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f tan(a)=%f\n", a, tan(a)); 54ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f log(a)=%f\n", a, log(a)); 55ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f exp(a)=%f\n", a, exp(a)); 56ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f b=%f atan2(a, b)=%f\n", a, b, atan2(a, b)); 57ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown /* just to test some op combining */ 58ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f asin(sin(a))=%f\n", a, asin(sin(a))); 59ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f acos(cos(a))=%f\n", a, acos(cos(a))); 60ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f atan(tan(a))=%f\n", a, atan(tan(a))); 61ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 62ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#define CC_C 0x0001 63ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#define CC_P 0x0004 64ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#define CC_A 0x0010 65ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#define CC_Z 0x0040 66ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#define CC_S 0x0080 67ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#define CC_O 0x0800 68ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 69ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 70ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownvoid test_fcmp(double a, double b) 71ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 72ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(%f<%f)=%d\n", 73ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown a, b, a < b); 74ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(%f<=%f)=%d\n", 75ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown a, b, a <= b); 76ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(%f==%f)=%d\n", 77ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown a, b, a == b); 78ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(%f>%f)=%d\n", 79ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown a, b, a > b); 80ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(%f<=%f)=%d\n", 81ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown a, b, a >= b); 82ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown { 83ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown unsigned long long int eflags; 84ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown /* test f(u)comi instruction */ 85ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm("fcomi %2, %1\n" 86ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown "pushfq\n" 87ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown "popq %0\n" 88ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown : "=r" (eflags) 89ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown : "t" (a), "u" (b)); 90ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("fcomi(%f %f)=%08llx\n", a, b, eflags & (CC_Z | CC_P | CC_C)); 91ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } 92ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 93ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 94ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownvoid test_fcvt(double a) 95ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 96ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown float fa; 97ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown long double la; 98ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown int16_t fpuc; 99ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown int i; 100ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown int64_t lla; 101ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown int ia; 102ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown int16_t wa; 103ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown double ra; 104ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 105ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown fa = a; 106ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown la = a; 107ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(float)%e = %e\n", a, fa); 108ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(long double)%f = %Lf\n", a, la); 109ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%016Lx\n", *(long long *)&a); 110ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("la=%016Lx %04x\n", *(long long *)&la, 111ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown *(unsigned short *)((char *)(&la) + 8)); 112ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 113ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown /* test all roundings */ 114ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fstcw %0" : "=m" (fpuc)); 115ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown for(i=0;i<4;i++) { 116ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown int16_t tmp = (fpuc & ~0x0c00) | (i << 10); 117ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fldcw %0" : : "m" (tmp)); 118ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown wa=0;//asm volatile ("fist %0" : "=m" (wa) : "t" (a)); 119ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fistl %0" : "=m" (ia) : "t" (a)); 120ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fistpll %0" : "=m" (lla) : "t" (a) : "st"); 121ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("frndint ; fstl %0" : "=m" (ra) : "t" (a)); 122ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fldcw %0" : : "m" (fpuc)); 123ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(short)a = %d\n", wa); 124ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(int)a = %d\n", ia); 125ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("(int64_t)a = %lld\n", (long long int)lla); 126ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("rint(a) = %f\n", ra); 127ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } 128ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 129ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 130ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#define TEST(N) \ 131ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm("fld" #N : "=t" (a)); \ 132ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("fld" #N "= %f\n", a); 133ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 134ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownvoid test_fconst(void) 135ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 136ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown double a; 137ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST(1); 138ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST(l2t); 139ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST(l2e); 140ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST(pi); 141ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST(lg2); 142ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST(ln2); 143ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST(z); 144ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 145ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 146ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownvoid test_fbcd(double a) 147ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 148ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown unsigned short bcd[5]; 149ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown double b; 150ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 151ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm("fbstp %0" : "=m" (bcd[0]) : "t" (a) : "st"); 152ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm("fbld %1" : "=t" (b) : "m" (bcd[0])); 153ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("a=%f bcd=%04x%04x%04x%04x%04x b=%f\n", 154ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown a, bcd[4], bcd[3], bcd[2], bcd[1], bcd[0], b); 155ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 156ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 157ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#define TEST_ENV(env, save, restore)\ 158ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{\ 159ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown memset((env), 0xaa, sizeof(*(env)));\ 160ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown for(i=0;i<5;i++)\ 161ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fldl %0" : : "m" (dtab[i]));\ 162ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm(save " %0\n" : : "m" (*(env)));\ 163ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm(restore " %0\n": : "m" (*(env)));\ 164ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown for(i=0;i<5;i++)\ 165ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fstpl %0" : "=m" (rtab[i]));\ 166ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown for(i=0;i<5;i++)\ 167ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("res[%d]=%f\n", i, rtab[i]);\ 168ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("fpuc=%04x fpus=%04x fptag=%04x\n",\ 169ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown (env)->fpuc,\ 170ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown (env)->fpus & 0xff00,\ 171ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown (env)->fptag);\ 172ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 173ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 174ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownvoid test_fenv(void) 175ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 176ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown struct __attribute__((packed)) { 177ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t fpuc; 178ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t dummy1; 179ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t fpus; 180ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t dummy2; 181ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t fptag; 182ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t dummy3; 183ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint32_t ignored[4]; 184ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown long double fpregs[8]; 185ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } float_env32; 186ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown struct __attribute__((packed)) { 187ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t fpuc; 188ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t fpus; 189ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t fptag; 190ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown uint16_t ignored[4]; 191ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown long double fpregs[8]; 192ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } float_env16; 193ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown double dtab[8]; 194ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown double rtab[8]; 195ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown int i; 196ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 197ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown for(i=0;i<8;i++) 198ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown dtab[i] = i + 1; 199ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 200ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_ENV(&float_env16, "data16 fnstenv", "data16 fldenv"); 201ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_ENV(&float_env16, "data16 fnsave", "data16 frstor"); 202ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_ENV(&float_env32, "fnstenv", "fldenv"); 203ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_ENV(&float_env32, "fnsave", "frstor"); 204ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 205ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown /* test for ffree */ 206ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown for(i=0;i<5;i++) 207ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fldl %0" : : "m" (dtab[i])); 208ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile("ffree %st(2)"); 209ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fnstenv %0\n" : : "m" (float_env32)); 210ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm volatile ("fninit"); 211ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("fptag=%04x\n", float_env32.fptag); 212ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 213ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 214ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 215ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#define TEST_FCMOV(a, b, eflags, CC)\ 216ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{\ 217ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown double res;\ 218ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown asm("pushq %3\n"\ 219ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown "popfq\n"\ 220ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown "fcmov" CC " %2, %0\n"\ 221ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown : "=t" (res)\ 222ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown : "0" (a), "u" (b), "g" ((long long int)eflags));\ 223ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown printf("fcmov%s eflags=0x%04llx-> %f\n", \ 224ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown CC, (long long int)eflags, res);\ 225ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 226ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 227ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownvoid test_fcmov(void) 228ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 229ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown double a, b; 230ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown long long int eflags, i; 231ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 232ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown a = 1.0; 233ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown b = 2.0; 234ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown for(i = 0; i < 4; i++) { 235ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown eflags = 0; 236ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if (i & 1) 237ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown eflags |= CC_C; 238ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if (i & 2) 239ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown eflags |= CC_Z; 240ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, eflags, "b"); 241ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, eflags, "e"); 242ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, eflags, "be"); 243ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, eflags, "nb"); 244ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, eflags, "ne"); 245ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, eflags, "nbe"); 246ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } 247ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, 0, "u"); 248ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, CC_P, "u"); 249ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, 0, "nu"); 250ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown TEST_FCMOV(a, b, CC_P, "nu"); 251ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 252ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 253ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownvoid test_floats(void) 254ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 255ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fops(2, 3); 256ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fops(1.4, -5); 257ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fcmp(2, -1); 258ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fcmp(2, 2); 259ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fcmp(2, 3); 260ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fcvt(0.5); 261ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fcvt(-0.5); 262ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fcvt(1.0/7.0); 263ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fcvt(-1.0/9.0); 264ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fcvt(32768); 265ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fcvt(-1e20); 266ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_fconst(); 267ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 268ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 269ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownint main ( void ) 270ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 271ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown test_floats(); 272ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown return 0; 273ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 274