1 /* Test that gettext() in multithreaded applications works correctly if
2    different threads operate in different locales referring to the same
3    catalog file but with different encodings.
4    Copyright (C) 2005-2022 Free Software Foundation, Inc.
5    This file is part of the GNU C Library.
6 
7    The GNU C Library is free software; you can redistribute it and/or
8    modify it under the terms of the GNU Lesser General Public
9    License as published by the Free Software Foundation; either
10    version 2.1 of the License, or (at your option) any later version.
11 
12    The GNU C Library is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15    Lesser General Public License for more details.
16 
17    You should have received a copy of the GNU Lesser General Public
18    License along with the GNU C Library; if not, see
19    <https://www.gnu.org/licenses/>.  */
20 
21 #include <libintl.h>
22 #include <locale.h>
23 #include <pthread.h>
24 #include <stdio.h>
25 #include <stdlib.h>
26 #include <string.h>
27 
28 /* Set to 1 if the program is not behaving correctly.  */
29 int result;
30 
31 /* Denotes which thread should run next.  */
32 int flipflop;
33 /* Lock and wait queue used to switch between the threads.  */
34 pthread_mutex_t lock;
35 pthread_cond_t waitqueue;
36 
37 /* Waits until the flipflop has a given value.
38    Before the call, the lock is unlocked.  After the call, it is locked.  */
39 static void
waitfor(int value)40 waitfor (int value)
41 {
42   if (pthread_mutex_lock (&lock))
43     exit (10);
44   while (flipflop != value)
45     if (pthread_cond_wait (&waitqueue, &lock))
46       exit (11);
47 }
48 
49 /* Sets the flipflop to a given value.
50    Before the call, the lock is locked.  After the call, it is unlocked.  */
51 static void
setto(int value)52 setto (int value)
53 {
54   flipflop = value;
55   if (pthread_cond_signal (&waitqueue))
56     exit (20);
57   if (pthread_mutex_unlock (&lock))
58     exit (21);
59 }
60 
61 void *
thread1_execution(void * arg)62 thread1_execution (void *arg)
63 {
64   char *s;
65 
66   waitfor (1);
67   uselocale (newlocale (LC_ALL_MASK, "de_DE.ISO-8859-1", NULL));
68   setto (2);
69 
70   /* Here we expect output in ISO-8859-1.  */
71 
72   waitfor (1);
73   s = gettext ("cheese");
74   puts (s);
75   if (strcmp (s, "K\344se"))
76     {
77       fprintf (stderr, "thread 1 call 1 returned: %s\n", s);
78       result = 1;
79     }
80   setto (2);
81 
82   waitfor (1);
83   s = gettext ("cheese");
84   puts (s);
85   if (strcmp (s, "K\344se"))
86     {
87       fprintf (stderr, "thread 1 call 2 returned: %s\n", s);
88       result = 1;
89     }
90   setto (2);
91 
92   return NULL;
93 }
94 
95 void *
thread2_execution(void * arg)96 thread2_execution (void *arg)
97 {
98   char *s;
99 
100   waitfor (2);
101   uselocale (newlocale (LC_ALL_MASK, "de_DE.UTF-8", NULL));
102   setto (1);
103 
104   /* Here we expect output in UTF-8.  */
105 
106   waitfor (2);
107   s = gettext ("cheese");
108   puts (s);
109   if (strcmp (s, "K\303\244se"))
110     {
111       fprintf (stderr, "thread 2 call 1 returned: %s\n", s);
112       result = 1;
113     }
114   setto (1);
115 
116   waitfor (2);
117   s = gettext ("cheese");
118   puts (s);
119   if (strcmp (s, "K\303\244se"))
120     {
121       fprintf (stderr, "thread 2 call 2 returned: %s\n", s);
122       result = 1;
123     }
124   setto (1);
125 
126   return NULL;
127 }
128 
129 int
main(void)130 main (void)
131 {
132   pthread_t thread1;
133   pthread_t thread2;
134 
135   unsetenv ("LANGUAGE");
136   unsetenv ("OUTPUT_CHARSET");
137   textdomain ("codeset");
138   bindtextdomain ("codeset", OBJPFX "domaindir");
139   result = 0;
140 
141   flipflop = 1;
142   if (pthread_mutex_init (&lock, NULL))
143     exit (2);
144   if (pthread_cond_init (&waitqueue, NULL))
145     exit (2);
146   if (pthread_create (&thread1, NULL, &thread1_execution, NULL))
147     exit (2);
148   if (pthread_create (&thread2, NULL, &thread2_execution, NULL))
149     exit (2);
150   if (pthread_join (thread2, NULL))
151     exit (3);
152 
153   return result;
154 }
155