1 // SPDX-License-Identifier: GPL-2.0
2 #undef _GNU_SOURCE
3 #define _GNU_SOURCE 1
4 #undef __USE_GNU
5 #define __USE_GNU 1
6 #include <unistd.h>
7 #include <stdlib.h>
8 #include <string.h>
9 #include <stdio.h>
10 #include <signal.h>
11 #include <sys/types.h>
12 #include <sys/select.h>
13 #include <sys/time.h>
14 #include <sys/wait.h>
15 #include <fenv.h>
16
17 unsigned long long res64 = -1;
18 unsigned int res32 = -1;
19 unsigned short res16 = -1;
20
test(void)21 int test(void)
22 {
23 int ex;
24
25 feclearexcept(FE_DIVBYZERO|FE_INEXACT|FE_INVALID|FE_OVERFLOW|FE_UNDERFLOW);
26 asm volatile ("\n"
27 " fld1""\n"
28 " fisttp res16""\n"
29 " fld1""\n"
30 " fisttpl res32""\n"
31 " fld1""\n"
32 " fisttpll res64""\n"
33 : : : "memory"
34 );
35 if (res16 != 1 || res32 != 1 || res64 != 1) {
36 printf("[BAD]\tfisttp 1\n");
37 return 1;
38 }
39 ex = fetestexcept(FE_DIVBYZERO|FE_INEXACT|FE_INVALID|FE_OVERFLOW|FE_UNDERFLOW);
40 if (ex != 0) {
41 printf("[BAD]\tfisttp 1: wrong exception state\n");
42 return 1;
43 }
44
45 feclearexcept(FE_DIVBYZERO|FE_INEXACT|FE_INVALID|FE_OVERFLOW|FE_UNDERFLOW);
46 asm volatile ("\n"
47 " fldpi""\n"
48 " fisttp res16""\n"
49 " fldpi""\n"
50 " fisttpl res32""\n"
51 " fldpi""\n"
52 " fisttpll res64""\n"
53 : : : "memory"
54 );
55 if (res16 != 3 || res32 != 3 || res64 != 3) {
56 printf("[BAD]\tfisttp pi\n");
57 return 1;
58 }
59 ex = fetestexcept(FE_DIVBYZERO|FE_INEXACT|FE_INVALID|FE_OVERFLOW|FE_UNDERFLOW);
60 if (ex != FE_INEXACT) {
61 printf("[BAD]\tfisttp pi: wrong exception state\n");
62 return 1;
63 }
64
65 feclearexcept(FE_DIVBYZERO|FE_INEXACT|FE_INVALID|FE_OVERFLOW|FE_UNDERFLOW);
66 asm volatile ("\n"
67 " fldpi""\n"
68 " fchs""\n"
69 " fisttp res16""\n"
70 " fldpi""\n"
71 " fchs""\n"
72 " fisttpl res32""\n"
73 " fldpi""\n"
74 " fchs""\n"
75 " fisttpll res64""\n"
76 : : : "memory"
77 );
78 if (res16 != 0xfffd || res32 != 0xfffffffd || res64 != 0xfffffffffffffffdULL) {
79 printf("[BAD]\tfisttp -pi\n");
80 return 1;
81 }
82 ex = fetestexcept(FE_DIVBYZERO|FE_INEXACT|FE_INVALID|FE_OVERFLOW|FE_UNDERFLOW);
83 if (ex != FE_INEXACT) {
84 printf("[BAD]\tfisttp -pi: wrong exception state\n");
85 return 1;
86 }
87
88 feclearexcept(FE_DIVBYZERO|FE_INEXACT|FE_INVALID|FE_OVERFLOW|FE_UNDERFLOW);
89 asm volatile ("\n"
90 " fldln2""\n"
91 " fisttp res16""\n"
92 " fldln2""\n"
93 " fisttpl res32""\n"
94 " fldln2""\n"
95 " fisttpll res64""\n"
96 : : : "memory"
97 );
98 /* Test truncation to zero (round-to-nearest would give 1 here) */
99 if (res16 != 0 || res32 != 0 || res64 != 0) {
100 printf("[BAD]\tfisttp ln2\n");
101 return 1;
102 }
103 ex = fetestexcept(FE_DIVBYZERO|FE_INEXACT|FE_INVALID|FE_OVERFLOW|FE_UNDERFLOW);
104 if (ex != FE_INEXACT) {
105 printf("[BAD]\tfisttp ln2: wrong exception state\n");
106 return 1;
107 }
108
109 return 0;
110 }
111
sighandler(int sig)112 void sighandler(int sig)
113 {
114 printf("[FAIL]\tGot signal %d, exiting\n", sig);
115 exit(1);
116 }
117
main(int argc,char ** argv,char ** envp)118 int main(int argc, char **argv, char **envp)
119 {
120 int err = 0;
121
122 /* SIGILL triggers on 32-bit kernels w/o fisttp emulation
123 * when run with "no387 nofxsr". Other signals are caught
124 * just in case.
125 */
126 signal(SIGILL, sighandler);
127 signal(SIGFPE, sighandler);
128 signal(SIGSEGV, sighandler);
129
130 printf("[RUN]\tTesting fisttp instructions\n");
131 err |= test();
132 if (!err)
133 printf("[OK]\tfisttp\n");
134 else
135 printf("[FAIL]\tfisttp errors: %d\n", err);
136
137 return err;
138 }
139