1 /* Test for the long double conversions in *err* functions.
2 Copyright (C) 2018-2022 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
28 struct tests
29 {
30 void *callback;
31 const char *expected;
32 };
33
34 va_list args;
35
36 static void
callback_err(void * closure)37 callback_err (void *closure)
38 {
39 errno = 0;
40 err (0, "%Lf", (long double) -1);
41 }
42
43 static void
callback_errx(void * closure)44 callback_errx (void *closure)
45 {
46 errno = 0;
47 errx (0, "%Lf", (long double) -1);
48 }
49
50 static void
callback_verr(void * closure)51 callback_verr (void *closure)
52 {
53 errno = 0;
54 verr (0, "%Lf", args);
55 }
56
57 static void
callback_verrx(void * closure)58 callback_verrx (void *closure)
59 {
60 errno = 0;
61 verrx (0, "%Lf", args);
62 }
63
64 static void
callback_error(void * closure)65 callback_error (void *closure)
66 {
67 errno = 0;
68 error (0, 0, "%Lf", (long double) -1);
69 }
70
71 static void
callback_error_at_line(void * closure)72 callback_error_at_line (void *closure)
73 {
74 errno = 0;
75 error_at_line (0, 0, "", 0, "%Lf", (long double) -1);
76 }
77
78 static void
do_one_test(void * callback,const char * expected,...)79 do_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
104 static int
do_test(void)105 do_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 (tests[i].callback, tests[i].expected, (long double) -1);
119 }
120
121 return 0;
122 }
123
124 #include <support/test-driver.c>
125