sunrpc: Fix netname build with older gcc
[glibc.git] / elf / tst-create_format1.c
blobca58fa19c672afd35047fb753ec23166201168ae
1 /* Check _dl_exception_create_format.
2 Copyright (C) 2018-2023 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
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.
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.
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/>. */
19 #include <ldsodefs.h>
20 #include <array_length.h>
22 #include <support/check.h>
23 #include <support/xunistd.h>
24 #include <support/capture_subprocess.h>
26 #define TEST(es, objn, fmt, ...) \
27 ({ \
28 struct dl_exception exception; \
29 _dl_exception_create_format (&exception, objn, fmt, __VA_ARGS__); \
30 TEST_COMPARE_STRING (exception.objname, objn == NULL ? "" : objn); \
31 TEST_COMPARE_STRING (exception.errstring, es); \
32 _dl_exception_free (&exception); \
35 static void
36 do_test_invalid_conversion (void *closure)
38 TEST ("(null)", NULL, "%p", NULL);
41 /* Exit status after abnormal termination. */
42 static int invalid_status;
44 static void
45 init_invalid_status (void)
47 pid_t pid = xfork ();
48 if (pid == 0)
49 _exit (127);
50 xwaitpid (pid, &invalid_status, 0);
51 if (WIFEXITED (invalid_status))
52 invalid_status = WEXITSTATUS (invalid_status);
55 static int
56 do_test (void)
58 init_invalid_status ();
60 TEST ("test", NULL, "%s", "test");
61 TEST ("test-test", NULL, "%s-test", "test");
62 TEST ("test", "test", "%s", "test");
63 TEST ("test-test", "test", "%s-test", "test");
65 TEST ("test%", NULL, "%s%%", "test");
66 TEST ("test%-test", NULL, "%s%%-test", "test");
67 TEST ("test%", "test", "%s%%", "test");
68 TEST ("test%-test", "test", "%s%%-test", "test");
70 TEST ("0000007b", NULL, "%x", 123);
71 TEST ("0000007b-test", NULL, "%x-test", 123);
72 TEST ("0000007b", "test", "%x", 123);
73 TEST ("0000007b-test", "test", "%x-test", 123);
75 #define TEST_LONG(es, objn, fmt, ...) \
76 ({ \
77 if (sizeof (int) == sizeof (long int)) \
78 TEST (es, objn, fmt, __VA_ARGS__); \
79 else \
80 TEST ("ffffffff" es, objn, fmt, __VA_ARGS__); \
83 TEST_LONG ("fffffffd", NULL, "%lx", (long int)~2ul);
84 TEST_LONG ("fffffffd-test", NULL, "%lx-test", (long int)~2ul);
85 TEST_LONG ("fffffffd", "test", "%lx", (long int)~2ul);
86 TEST_LONG ("fffffffd-test", "test", "%lx-test", (long int)~2ul);
88 TEST_LONG ("fffffffe", NULL, "%zx", (size_t)~1ul);
89 TEST_LONG ("fffffffe-test", NULL, "%zx-test", (size_t)~1ul);
90 TEST_LONG ("fffffffe", "test", "%zx", (size_t)~1ul);
91 TEST_LONG ("fffffffe-test", "test", "%zx-test", (size_t)~1ul);
93 struct support_capture_subprocess result;
94 result = support_capture_subprocess (do_test_invalid_conversion, NULL);
95 support_capture_subprocess_check (&result, "dl-exception",
96 invalid_status, sc_allow_stderr);
97 TEST_COMPARE_STRING (result.err.buffer,
98 "Fatal error: invalid format in exception string\n");
100 return 0;
103 #include <support/test-driver.c>