Piotr Caban : msvcp140_t/tests: Add __std_smf_hypot3 tests.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 816c35e0ee57354d25d6115f64346da87550d922
URL:    https://gitlab.winehq.org/wine/wine/-/commit/816c35e0ee57354d25d6115f64346da...

Author: Piotr Caban 
Date:   Thu Jan 18 18:18:26 2024 +0100

msvcp140_t/tests: Add __std_smf_hypot3 tests.

---

configure                         |  1 +
 configure.ac                      |  1 +
 dlls/msvcp140_2/tests/Makefile.in |  4 ++
 dlls/msvcp140_2/tests/math.c      | 81 +++++++++++++++++++++++++++++++++++++++
 4 files changed, 87 insertions(+)

diff --git a/configure b/configure
index 3939f1873a4..e9fc3a8ef5a 100755
--- a/configure
+++ b/configure
@@ -22059,6 +22059,7 @@ wine_fn_config_makefile dlls/msvcp140/tests enable_tests
 wine_fn_config_makefile dlls/msvcp140_1 enable_msvcp140_1
 wine_fn_config_makefile dlls/msvcp140_1/tests enable_tests
 wine_fn_config_makefile dlls/msvcp140_2 enable_msvcp140_2
+wine_fn_config_makefile dlls/msvcp140_2/tests enable_tests
 wine_fn_config_makefile dlls/msvcp140_atomic_wait enable_msvcp140_atomic_wait
 wine_fn_config_makefile dlls/msvcp140_atomic_wait/tests enable_tests
 wine_fn_config_makefile dlls/msvcp140_codecvt_ids enable_msvcp140_codecvt_ids
diff --git a/configure.ac b/configure.ac
index 9488b3263cc..da661323375 100644
--- a/configure.ac
+++ b/configure.ac
@@ -2876,6 +2876,7 @@ WINE_CONFIG_MAKEFILE(dlls/msvcp140/tests)
 WINE_CONFIG_MAKEFILE(dlls/msvcp140_1)
 WINE_CONFIG_MAKEFILE(dlls/msvcp140_1/tests)
 WINE_CONFIG_MAKEFILE(dlls/msvcp140_2)
+WINE_CONFIG_MAKEFILE(dlls/msvcp140_2/tests)
 WINE_CONFIG_MAKEFILE(dlls/msvcp140_atomic_wait)
 WINE_CONFIG_MAKEFILE(dlls/msvcp140_atomic_wait/tests)
 WINE_CONFIG_MAKEFILE(dlls/msvcp140_codecvt_ids)
diff --git a/dlls/msvcp140_2/tests/Makefile.in b/dlls/msvcp140_2/tests/Makefile.in
new file mode 100644
index 00000000000..3024ebdd358
--- /dev/null
+++ b/dlls/msvcp140_2/tests/Makefile.in
@@ -0,0 +1,4 @@
+TESTDLL   = msvcp140_2.dll
+
+SOURCES = \
+	math.c
diff --git a/dlls/msvcp140_2/tests/math.c b/dlls/msvcp140_2/tests/math.c
new file mode 100644
index 00000000000..dc61d9b6db2
--- /dev/null
+++ b/dlls/msvcp140_2/tests/math.c
@@ -0,0 +1,81 @@
+/*
+ * Special math functions
+ *
+ * Copyright 2024 Piotr Caban for CodeWeavers
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+ */
+
+#include "wine/test.h"
+#include <math.h>
+
+static double (__stdcall *p___std_smf_hypot3)(double x, double y, double z);
+
+#define SETNOFAIL(x,y) x = (void*)GetProcAddress(msvcp, y)
+#define SET(x,y) do { SETNOFAIL(x, y); ok(x != NULL, "Export '%s' not found\n", y); } while(0)
+static BOOL init(void)
+{
+    HMODULE msvcp = LoadLibraryA("msvcp140_2.dll");
+
+    if (!msvcp)
+    {
+        win_skip("msvcp140_2.dll not installed\n");
+        return FALSE;
+    }
+
+#ifdef __i386__
+    SET(p___std_smf_hypot3, "___std_smf_hypot3@24");
+#else
+    SET(p___std_smf_hypot3, "__std_smf_hypot3");
+#endif
+
+    return TRUE;
+}
+
+static inline BOOL compare_double(double f, double g, unsigned int ulps)
+{
+    ULONGLONG x = *(ULONGLONG *)&f;
+    ULONGLONG y = *(ULONGLONG *)&g;
+
+    if (f < 0)
+        x = ~x + 1;
+    else
+        x |= ((ULONGLONG)1) << 63;
+    if (g < 0)
+        y = ~y + 1;
+    else
+        y |= ((ULONGLONG)1) << 63;
+
+    return (x > y ? x - y : y - x) <= ulps;
+}
+
+static void test_hypot3(void)
+{
+    double r;
+
+    r = p___std_smf_hypot3(0, 0, 0);
+    ok(compare_double(r, 0.0, 1), "r = %.23e\n", r);
+
+    r = p___std_smf_hypot3(9, 12, 20);
+    ok(compare_double(r, 25.0, 1), "r = %.23e\n", r);
+}
+
+START_TEST(math)
+{
+    if (!init())
+        return;
+
+    test_hypot3();
+}