box64/tests32/test26.c
ptitSeb b5105a1e57
Added preliminary Box32 support (#1760)
* Improve the ReserveHigMemory helper function

* [BOX32] Added some wrapping infrastructure

* [BOX32] More wrapped 32bits lib infrastructure

* [BOX32] Added callback and tls 32bits handling

* [BOX32] Added more 32bits, around wrappers and elfs

* [BOX32] Added the 32bits version of myalign

* [BOX32] More wrapped libs and 32bits fixes and imrpovments

* [BOX32] Added some 32bits tests

* [BOX32] Try to enable some Box32 build and test on the CI

* [BOX32] Disable Box32 testing on CI platform that use qemu

* [BOX32] Another attempt to disable Box32 testing on CI platform that use qemu

* [BOX32] Small fix for another attempt to disable Box32 testing on CI platform that use qemu

* [BOX32] Yet another fix for another attempt to disable Box32 testing on CI platform that use qemu

* [BOX32] Fixed a typo in CI script

* [BOX32] Better scratch alighnment and enabled more tests

* [BOX32] Added (partial) wrapped 32bits librt

* [BOX32] Added mention of Box32 in README

* [BOX32] Added phtread handling, and numerous fixes to 32bits handling. [ARM64_DYNAREC] Fixed access to segment with negative offset

* [BOX32] Added system libs and cpp testing, plus some more fixes

* [BOX32] Fix previous commit

* [BOX32] Better stack adjustment for 32bits processes

* [BOX32] Added getenv wrapped 32bits function and friends

* [BOX32] Don't look for box86 for a Box32 build

* [BOX32] Don't do 32bits cppThreads test for now on CI

* [BOX32] Enabled a few more 32bits tests

* [BOX32] For ld_lib_path for both CppThreads tests

* [BOX32] [ANDROID] Some Fixes for Android Build

* [BOX32] Still need to disable cppThread_32bits test on CI for some reason

* [BOX32] [ANDROID] Don't show PreInit Array Warning (#1751)

* [BOX32] [ANDROID] One More Fix for Android Build That I forgotten to … (#1752)

* [BOX32] [ANDROID] One More Fix for Android Build That I forgotten to push before

* [BOX32] [ANDROID] Try to Create __libc_init

* [BOX32] [ANDROID] Try to disable NEEDED_LIBS for now (libdl is not wrapped)

* [BOX32] Updated generated files

* [BOX32] Added 32bits context functions

* [BOX32] Added 32bits signal handling

* [BOX32] Added some missing 32bits elfloader functions

* [BOX32] Fix build on x86_64 machine

* [BOX32] Better fix for x86_64 build

* [BOX32] Actually added missing libs, and re-enabled cppThreads_32bits test

* [BOX32] Added wrapped 32bits libdl

* [BOX32] Try to re-enabled Box32 test on CI for ARM64 builds

* [BOX32] fine-tuning Box32 test on CI for ARM64 builds

* [BOX32] More fine-tuning to Box32 test on CI for ARM64 builds

* [BOX32] Enabled Box32 test on CI for LA64 and RV64 builds too

* [BOX32] re-Disabled Box32 test on CI for LA64 and RV64 builds, not working for now

* [BOX32] Temporarily disabled cppThreads_32bits test on CI

---------

Co-authored-by: KreitinnSoftware <pablopro5051@gmail.com>
Co-authored-by: KreitinnSoftware <80591934+KreitinnSoftware@users.noreply.github.com>
2024-08-26 17:45:13 +02:00

117 lines
6.1 KiB
C

#include <fenv.h>
#include <float.h>
#include <inttypes.h>
#include <stdint.h>
#define USE_ASM_ROUNDING
#include "roundtest.h"
// Build with
// `gcc -march=core2 -O0 -m32 test26.c -o test26 -std=c99 -masm=intel
// -mfpmath=387 -frounding-math`
#define TEST_CONVERT_(stype, s_) \
do { \
stype s; \
TEST_(s = (s_), (double)s, "%a"); \
TEST_(s = (s_), (float)s, "%a"); \
/* converting too large float to integer, the result is undefined, on both \
* c99 and FISTP instruction */ \
if (INT64_MIN <= s && INT64_MAX <= s) \
TEST_(s = (s_), (int64_t)s, "%" PRId64); \
if (INT32_MIN <= s && INT32_MAX <= s) \
TEST_(s = (s_), (int32_t)s, "%" PRId32); \
if (INT16_MIN <= s && INT16_MAX <= s) \
TEST_(s = (s_), (int16_t)s, "%" PRId16); \
if (INT8_MIN <= s && INT8_MAX <= s) \
TEST_(s = (s_), (int8_t)s, "%" PRId8); \
if (0 <= s && UINT64_MAX <= s) \
TEST_(s = (s_), (uint64_t)s, "%" PRIu64); \
if (0 <= s && UINT32_MAX <= s) \
TEST_(s = (s_), (unsigned int)s, "%" PRIu32); \
if (0 <= s && UINT16_MAX <= s) \
TEST_(s = (s_), (unsigned short)s, "%" PRIu16); \
if (0 <= s && UINT8_MAX <= s) \
TEST_(s = (s_), (unsigned char)s, "%" PRIu8); \
} while (0)
#define TEST_CONVERT(stype, s_) \
do { \
TEST_CONVERT_(stype, s_); \
TEST_CONVERT_(stype, -(s_)); \
} while (0)
#define TEST_2NUMBER(d1type, d1_, d2type, d2_, operation) \
do { \
d1type d1; \
d2type d2; \
TEST((d1 = (d1_), d2 = (d2_)), operation); \
TEST((d1 = -(d1_), d2 = (d2_)), operation); \
TEST((d1 = (d1_), d2 = -(d2_)), operation); \
TEST((d1 = -(d1_), d2 = -(d2_)), operation); \
} while (0)
int main() {
double d;
float f;
int64_t i64;
TEST_CONVERT(double, 0x1.123456789abcp2); // FISTTP
TEST_(d = (0x1.123456789abcp512), (float)d, "%a");
TEST_CONVERT(double, 0x1.123456789abcp29);
TEST_(d = (-0x1.123456789abcp30), (int32_t)d, "%" PRId32);
TEST_(d = (-0x1.123456789abcp62), (int64_t)d, "%" PRId64);
TEST_CONVERT(float, 0x1.123456789abcp2f);
TEST_CONVERT(float, 0x1.123456789abcp29f);
TEST_(f = -0x1.123456789abcp30f, (int32_t)f, "%" PRId32);
// to be fixed:
//TEST_(f = -0x1.123456789abcp62f, (int64_t)f, "%" PRId64);
// The direction of rounding when an integer is converted to a floating-point
// number that cannot exactly represent the original value
// https://gcc.gnu.org/onlinedocs/gcc/Floating-point-implementation.html
// to be fixed:
//TEST_(i64 = INT64_MAX, (double)i64, "%a"); // FILD and FSTP
TEST(d = -0x1.1234567p0, (double)((int)d));
TEST(d = 0x1.9234567p0, (double)((int)d));
TEST(d = -0x1.9234567p0, (double)((int)d));
TEST(d = 0x1.1234567p0, (double)((long int)d));
TEST(d = -0x1.1234567p0, (double)((long int)d));
TEST(d = 0x1.9234567p0, (double)((long int)d));
TEST(d = -0x1.9234567p0, (double)((long int)d));
TEST_2NUMBER(double, 1.0, double, 0x1.0000000000001p0, d1 + d2);
TEST_2NUMBER(double, 1.0, double, 0x1.0000000000001p0, d1 - d2);
TEST_2NUMBER(double, 1.0, double, 0x1.0000000000001p0, d2 - d1);
TEST_2NUMBER(double, 1.0, double, 0x1.000000000000dp-4, d1 + d2);
TEST_2NUMBER(double, 1.0, double, 0x1.000000000000dp-4, d1 - d2);
TEST_2NUMBER(double, 1.0, double, 0x1.000000000000dp-4, d2 - d1);
TEST_2NUMBER(double, 0x1.233445566778p0, double, 0x1.3456789abcdep0, d1 + d2);
TEST_2NUMBER(float, 0x1.233445566778p0f, float, 0x1.3456789abcdep0f, d1 *d2);
TEST_2NUMBER(float, 0x1.233445566778p0f, double, 0x1.3456789abcdep0, d1 *d2);
TEST_2NUMBER(double, 0x1.233445566778p0, double, 0x1.3456789abcdep0, d1 *d2);
TEST_2NUMBER(float, 0x1.233445566778p0f, double, 0x1.3456789abcdep0, d1 *d2);
TEST_2NUMBER(double, 0x1.233445566778p0, float, 0x1.3456789abcdep0, d1 *d2);
TEST_2NUMBER(float, 0x1.233445566778p0f, float, 0x1.3456789abcdep0f, d1 *d2);
TEST_2NUMBER(double, 0x1.233445566778p0, int, 5, d1 *d2);
TEST_2NUMBER(int, 15, double, 0x1.3456789abcdep0f, d1 *d2);
TEST_2NUMBER(float, 0x1.233445566778p0f, int, 15, d1 *d2);
TEST_2NUMBER(int, 15, float, 0x1.3456789abcdep0f, d1 *d2);
TEST_2NUMBER(double, 0x1.233445566778p0, double, 0x1.3456789abcdep0, d1 / d2);
TEST_2NUMBER(double, 0x1.233445566778p0, double, 0x1.3456789abcdep0, d1 / d2);
TEST_2NUMBER(double, 0x1.233445566778p0, float, 0x1.3456789abcdep0f, d1 / d2);
TEST_2NUMBER(double, 1.0, double, 0x1.0000000000001p0, d2 - d1);
TEST_2NUMBER(double, 1.0, double, 0x1.000000000000dp-4, d1 + d2);
TEST_2NUMBER(double, 1.0, double, 0x1.000000000000dp-4, d1 - d2);
TEST_2NUMBER(double, 1.0, double, 0x1.000000000000dp-4, d2 - d1);
TEST_X87_1("FSQRT", 0x1.0000000000000p2);
TEST_X87_1("FSQRT", 0x1.0000000000001p1);
TEST_X87_1("FSQRT", 0x1.123456789abcp31);
TEST_X87_1("FSQRT", 0x1.123456789abdp31);
return 0;
}