1/* Test for the long double conversions in *err* functions.
2 Copyright (C) 2018-2024 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
18
19#include <err.h>
20#include <errno.h>
21#include <error.h>
22#include <stdarg.h>
23#include <string.h>
24
25#include <support/capture_subprocess.h>
26#include <support/check.h>
27
28struct tests
29{
30 void *callback;
31 const char *expected;
32};
33
34va_list args;
35
36static void
37callback_err (void *closure)
38{
39 errno = 0;
40 err (status: 0, format: "%Lf", (long double) -1);
41}
42
43static void
44callback_errx (void *closure)
45{
46 errno = 0;
47 errx (status: 0, format: "%Lf", (long double) -1);
48}
49
50static void
51callback_verr (void *closure)
52{
53 errno = 0;
54 verr (0, "%Lf", args);
55}
56
57static void
58callback_verrx (void *closure)
59{
60 errno = 0;
61 verrx (0, "%Lf", args);
62}
63
64static void
65callback_error (void *closure)
66{
67 errno = 0;
68 error (status: 0, errnum: 0, format: "%Lf", (long double) -1);
69}
70
71static void
72callback_error_at_line (void *closure)
73{
74 errno = 0;
75 error_at_line (status: 0, errnum: 0, fname: "", lineno: 0, format: "%Lf", (long double) -1);
76}
77
78static void
79do_one_test (void *callback, const char *expected, ...)
80{
81 struct support_capture_subprocess result;
82
83 va_start (args, expected);
84
85 /* Call 'callback', which fills in the output and error buffers. */
86 result = support_capture_subprocess (callback, NULL);
87
88 /* Filter out the name of the program (which should always end with
89 -error), so that the test case can be reused by ldbl-opt and
90 ldbl-128ibm-compat. */
91 const char *needle = "-error:";
92 char *message;
93 message = strstr (result.err.buffer, needle);
94 if (message == NULL)
95 FAIL_EXIT1 ("test case error");
96 message += strlen (needle);
97
98 /* Verify that the output message is as expected. */
99 TEST_COMPARE_STRING (message, expected);
100
101 va_end (args);
102}
103
104static int
105do_test (void)
106{
107 struct tests tests[] = {
108 { &callback_err, " -1.000000: Success\n" },
109 { &callback_errx, " -1.000000\n" },
110 { &callback_verr, " -1.000000: Success\n" },
111 { &callback_verrx, " -1.000000\n" },
112 { &callback_error, " -1.000000\n" },
113 { &callback_error_at_line, ":0: -1.000000\n" }
114 };
115
116 for (int i = 0; i < sizeof (tests) / sizeof (tests[0]); i++)
117 {
118 do_one_test (callback: tests[i].callback, expected: tests[i].expected, (long double) -1);
119 }
120
121 return 0;
122}
123
124#include <support/test-driver.c>
125

source code of glibc/misc/tst-ldbl-error.c