1 | /* Copyright (C) 2015-2022 Free Software Foundation, Inc. |
2 | This file is part of the GNU C Library. |
3 | |
4 | The GNU C Library is free software; you can redistribute it and/or |
5 | modify it under the terms of the GNU Lesser General Public |
6 | License as published by the Free Software Foundation; either |
7 | version 2.1 of the License, or (at your option) any later version. |
8 | |
9 | The GNU C Library is distributed in the hope that it will be useful, |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
12 | Lesser General Public License for more details. |
13 | |
14 | You should have received a copy of the GNU Lesser General Public |
15 | License along with the GNU C Library; if not, see |
16 | <https://www.gnu.org/licenses/>. */ |
17 | |
18 | #include <errno.h> |
19 | #include <pthread.h> |
20 | #include <stdio.h> |
21 | #include <string.h> |
22 | |
23 | |
24 | static pthread_once_t once = PTHREAD_ONCE_INIT; |
25 | |
26 | // Exception type thrown from the pthread_once init routine. |
27 | struct OnceException { }; |
28 | |
29 | // Test iteration counter. |
30 | static int niter; |
31 | |
32 | static void |
33 | init_routine (void) |
34 | { |
35 | if (niter < 2) |
36 | throw OnceException (); |
37 | } |
38 | |
39 | // Verify that an exception thrown from the pthread_once init routine |
40 | // is propagated to the pthread_once caller and that the function can |
41 | // be subsequently invoked to attempt the initialization again. |
42 | static int |
43 | do_test (void) |
44 | { |
45 | int result = 1; |
46 | |
47 | // Repeat three times, having the init routine throw the first two |
48 | // times and succeed on the final attempt. |
49 | for (niter = 0; niter != 3; ++niter) { |
50 | |
51 | try { |
52 | int rc = pthread_once (once_control: &once, init_routine: init_routine); |
53 | if (rc) |
54 | fprintf (stderr, format: "pthread_once failed: %i (%s)\n" , |
55 | rc, strerror (errnum: rc)); |
56 | |
57 | if (niter < 2) |
58 | fputs (s: "pthread_once unexpectedly returned without" |
59 | " throwing an exception" , stderr); |
60 | } |
61 | catch (OnceException) { |
62 | if (niter > 1) |
63 | fputs (s: "pthread_once unexpectedly threw" , stderr); |
64 | result = 0; |
65 | } |
66 | catch (...) { |
67 | fputs (s: "pthread_once threw an unknown exception" , stderr); |
68 | } |
69 | |
70 | // Abort the test on the first failure. |
71 | if (result) |
72 | break; |
73 | } |
74 | |
75 | return result; |
76 | } |
77 | |
78 | #define TEST_FUNCTION do_test () |
79 | #include "../test-skeleton.c" |
80 | |